Notifications
Clear all

Pesquisa e soma com valor existente na segunda coluna

3 Posts
2 Usuários
0 Reactions
889 Visualizações
(@rafnakb)
Posts: 44
Eminent Member
Topic starter
 

Olá. Gostaria de uma ajuda com VBA.
Tenho uma coluna A com códigos de 10 produtos, uma coluna B com a quantidade de cada um e
uma coluna C com a quantidade de defeitos ao produzi-lo.
Fiz um simples userform apenas para lançar uma atualização. Digito o código numa txtbox1, outro txtbox2 lanço a quatidade
do lote e em outro txtbox3 a quantidade de defeitos daquele lote; e por fim um Botão Salvar.
O processo que queria seria:
1) Clico em Salvar
2) Procura o código do txtbox1 na coluna A
3) Soma a quantidade do txtbox2 com o valor já existente na coluna B
4) Soma a quantidade do txtbox3 com o valor já existente na coluna C

Se puderem me ajudar, agradeço.

 
Postado : 27/07/2016 8:31 am
(@edcronos2)
Posts: 346
Reputable Member
 

seria mais ou menos assim

rang=range("a1:a" & Cells(Rows.Count, 1).End(xlUp).Row
for l=1 to ubound(rang,1)
if rang(l,1)=txtbox1.value then l2=l exit for
next
cells(l2,2).value2=cells(l2,2).value2 + txtbox2.value
cells(l2,3).value2=cells(l2,3).value2 + txtbox3.value
 
Postado : 27/07/2016 8:48 am
(@rafnakb)
Posts: 44
Eminent Member
Topic starter
 

Obrigado edcronos2.
Me resolveu um problema aqui no meu trabalho.

 
Postado : 27/07/2016 8:55 am