Notifications
Clear all

LOCALIZAR E SOMAR VBA

2 Posts
2 Usuários
0 Likes
1,310 Visualizações
(@mayzzz)
Posts: 0
New Member
Topic starter
 

Oi gente, como vai? Preciso de ajuda em um tópico...

Criei uma planilha com um formulário onde quando eu preencho as informações e aperto em "adicionar" ele procura o valor que coloquei na listbox e adiciona o valor da caixa quantidade na aba "quantidade" da planilha somando com o que já está lá. Porém não estou conseguindo fazer esse código funcionar. Alguém pode me ajudar por favor? A primeira parte do procurar até vai, mas quando preciso mudar de coluna e somar os valores enrosca.

 

Fiz esse código:

Private Sub botao_adc_Click()

  Set Procurar = Cells.Find(What:=caixa_produto, After:=ActiveCell, _
        LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows, _
        SearchDirection:=xlNext, MatchCase:=False).Offset(0, 3)

  If Not (Procurar Is Nothing) Then
    Procurar.Select
  End If

End Sub
 
_______________________________
Editado pela Moderação. Motivo: Procure utilizar o botão Código (< >) sempre que for inserir código VBA ou Fórmulas. O Planilhando agradece!
 
Postado : 15/11/2021 10:23 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Mayzzz,

Bom dia!

Não sei se você ainda precisa da resposta para essa dúvida. Se precisar, sugiro que você anexe aqui o próprio arquivo ao invés de apenas uma imagem dele.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 15/12/2021 12:01 pm