Planilha Excel VBA calcular preço venda base margem e custo Estas funções personalizadas e macros do Aplicativo Microsoft Excel VBA(Visual Basic Application), vão calcular o preço real de venda de determinados itens, aqui simulamos somente o preço com percentuais diversos, como Alertou nosso Amigo da Area de Finanças Marco, “a maioria dos empresários ao fazer seus preços de vendas de forma errada” podendo deixar de ganhar ou tomar prejuizos”, simplesmente aumenta um percentual no preço seus produtos: Por exemplo R$ 100,00 x 25% = R$ 125,00 ‘esta errado’, porque se conceder esse desconto de 25% no valor de 125,00 = novo valor é R$ 93,75 – e não 125,00 (que é o preço inicial do produto) então esta errado:
FORMA CORRETA:
Você tem que pegar o Preço de Custo dividir pelo (Percentual – 100) por exemplo 25% = 100 – 25 = (75)
Pegue o Seu valor inicial que é R100,00 e divida por 75, obterá então R$ 133,00, que se conceder o desconto de 25%, obterá o valor de R$ 100,00 (Preço Original).
Abaixo fiz duas Funções personalizadas para demonstrar isso, é um bom treinamento com VBA, observe que usei
a instrução For Next, para percorrer linha por linha e fazer os dois calculos em duas colunas distintas.
Retornando o Preço de Venda e também o Preço Custo (Concedendo o Desconto Relativo).
‘//===========’
Function AchaCusto(valor, pct As Double) As Double
AchaCusto = valor * (1 – pct)
End Function
‘//===========’
Function CalculaVENDA(valor, pct As Double) As Double
CalculaVENDA = valor / (1 – pct)
End Function
‘//===========’
Sub sbx_calcula_custo_real()
Dim i As Long
For i = 4 To Cells(Rows.Count, “d”).End(xlUp).Row
Cells(i, “j”).Value = Format(CalculaVENDA(Cells(i, “d”), Cells(i, “f”)), “R$ ##,###,##0.00”)
Cells(i, “L”).Value = Format(AchaCusto(Cells(i, “j”), Cells(i, “f”)), “R$ ##,###,##0.00”)
Next i
End Sub
‘//===========’
Sub sbx_limpar_teste()
X = Cells(Rows.Count, “d”).End(xlUp).Row
Range(Cells(4, “j”), Cells(X, “l”)).ClearContents
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.
Baixe o exemplo de planilha contendo os macros acima:
Planilha Excel VBA calcular preco venda base margem e custo