Surgiu mais uma dúvida aqui... eu to querendo que cada vez que eu cadastre um novo produto no local de estoque atual eu tenha a fórmula que calcule a diferença entre entrada e consumo dos produtos... e não to conseguindo resolver esta situação...
por exemplo:
supondo que esta é a minha tabela:
A B C D
E F
1 | código | Descrição | Estoque atual | Data de Cadastro | Entrada | Consumo |
2 | 01 | Luva | =(E2-F2)
| 12/04/2016 | 0 | 0 |
assim que eu cadastrasse a formula "=(E2-F2)" iria para a célula abaixo:
3 | 01 | Luva | =(E3-F3) | 12/04/2016 | 0
| 0 |
eu utilizei este código abaixo para efetuar os cadastros, mas... no lugar de estoque atual queria que ele selecionasse a linha daquele produto indicado pelo código e fizesse o cálculo .
Tem como me ajudar??
Desde já sou imensamente grato!!!
Private Sub botaocadastroprodutos_Click()
totalproduto = Worksheets("informacoes").UsedRange.Rows.Count
caixacodigocadastro.RowSource = "informacoes!a2:a" & totalproduto
Worksheets("informacoes").Select
totalregistro = Worksheets("informacoes").UsedRange.Rows.Count + 1
Cells(totalregistro, 1) = caixacodigocadastro
Cells(totalregistro, 2) = caixadescricaocadastro
Cells(totalregistro, 3) = caixaestoqueatualcadastro1
Cells(totalregistro, 4) = datacadastro1
Cells(totalregistro, 5) = valorcadastro1
Cells(totalregistro, 6) = fornecedorcadastro1
Cells(totalregistro, 7) = previsaocadastro1
Cells(totalregistro, 8) = caixagrupo
MsgBox "Produto cadastrado com sucesso!"
caixacodigocadastro = ""
caixadescricaocadastro = ""
caixaestoqueatualcadastro1 = ""
datacadastro1 = ""
valorcadastro1 = ""
fornecedorcadastro1 = ""
previsaocadastro1 = ""
caixagrupo = ""
caixacodigocadastro.SetFocus
End Sub