excel vba planilha evento change calcular preço custo planilha excel vba

Excel vba Planilha Evento change calcula preço venda base margem ou custo

Excel vba Planilha Evento change calcula preço venda base margem ou custo Este procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), usando o evento change da folha de planilha ao escrever ou alterar dados calcula o preço de venda com base na margem de Lucro ou preço de custo.
‘ — SEM FORMULAS USANDO EVENTO CHANGE DA FOLHA DE PLANILHA.

‘ 1 – Poderá obter a margem ao digitar o preço de Custo e Posteriormente o Preço de Venda
‘ 2 – Poderá obter o Preço de Venda após digitar o Preço de Custo e Margem de Lucro (calcula preço Venda)
Excelente exemplo para treinamento com VBA.
‘//==========’ CALCULANDO O PREÇO VENDA
(BAIXE O EXEMPLO DE PLANILHA NO FINAL DA PÁGINA)

(PELA MARGEM COLUNA(C) OU DIGITANDO PREÇO VENDA X CUSTO – OU MARGEM)

‘//========’Repetindo….
1º -Se antes o preço de venda ou o preço de compra, procedimento calcula margem
2º – Se a margem(Coluna(C)) for inserida (%), o preço de venda é calculado

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False

If Not Intersect([a2:a13], Target) Is Nothing And Target.Count = 1 Then
Target.Offset(0, 2) = (Target.Offset(, 1) – Target) / Target
End If

If Not Intersect([b2:b13], Target) Is Nothing And Target.Count = 1 Then
Target.Offset(0, 1) = (Target – Target.Offset(0, -1)) / Target.Offset(0, -1)
End If

If Not Intersect([c2:c13], Target) Is Nothing And Target.Count = 1 Then
Target.Offset(0, -1) = Target.Offset(0, -2) * (1 + Target)
End If

Application.EnableEvents = True
End Sub

Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.