Como Criar Controle de Estoque Excel Vba

Para criar um controle de estoque em Excel VBA, siga os passos abaixo:

  1. Abra o Excel e crie uma nova planilha. Insira os seguintes títulos nas colunas: "Produto", "Quantidade", "Preço Unitário", "Valor Total".
  2. Insira os dados dos produtos nas colunas correspondentes.
  3. Crie um botão para adicionar novos produtos à planilha. Para isso, vá até a guia Desenvolvedor e selecione Inserir > Botão de Formulário.
  4. Clique no botão de formulário criado e selecione Atribuir Macro. Crie uma nova macro com o seguinte código:

Sub AdicionarProduto()'Insere novo produto na planilha'Dim linha As Integerlinha = Cells(Rows.Count, "A").End(xlUp).Row + 1Range("A" & linha).Select End Sub

  1. Adicione o código para atualizar a quantidade e o valor total do produto. Para isso, crie uma nova macro com o seguinte código:

Sub AtualizarProduto()'Atualiza a quantidade e o valor total do produto'Dim linha As IntegerDim qtd As DoubleDim preco As DoubleDim total As Double

linha = ActiveCell.Row qtd = Cells(linha, "B").Value preco = Cells(linha, "C").Value total = qtd * preco Cells(linha, "D").Value = total 

End Sub

  1. Crie um botão para atualizar as informações dos produtos. Para isso, siga os passos do item 3 e selecione a macro criada no passo 5.
  2. Por fim, crie uma macro para calcular o valor total do estoque. Para isso, crie uma nova macro com o seguinte código:

Sub CalcularEstoque()'Calcula o valor total do estoque'Dim linha As IntegerDim totalEstoque As Double

linha = Cells(Rows.Count, "A").End(xlUp).Row totalEstoque = Application.Sum(Range("D2:D" & linha)) MsgBox "O valor total do estoque é de R$" & totalEstoque 

End Sub

  1. Adicione um botão para calcular o valor total do estoque e selecione a macro criada no passo 7.

Pronto! Agora você tem um controle de estoque em Excel VBA. Basta inserir os dados dos produtos e utilizar as macros criadas para atualizar e calcular as informações do estoque.

Veja também mais Como Fazer com a letra C

Comentários