Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Ajuda - Procurar e ...
 
Notifications
Clear all

Ajuda - Procurar e Somar

 
2024 - VBA & Macros
5 Posts
1 Usuários
0 Reactions
1,011 Visualizações
RSS
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia a todos,

Estou com um problema para criar uma macro em uma planilha. Segue imagem:

Preciso de uma macro que, ao digitar o número da ferramenta em A4 e a Quantidade em C4, ele procure o valor de A4 na coluna A (A5:A11) e some o valor de C4 a quantidade correspondente ao item da coluna A na coluna C.

Como mostra na imagem, eu gostaria que ao pressionar o botão Somar, a quantidade da ferramenta 3 que já é de 3000 somasse mais 3000 (Célula C4) e ficasse ao todo com 6000.

Não sei se fui muito claro... quem souber e puder me ajudar eu agradeço.

Obrigado. :D

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/10/2011 8:11 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Pastore, devido as restrições aqui no serviço, a imagem não aparece, o ideal seria anexar um exemplo reduzido com os resultados que pretende.

Apesar que pelo que mencionou acredito que possa ser resolvido com Formulas, tipo PROCV, SOMARPRODUTO entre outras, não necessitando VBA, a não ser que queira mesmo em VBA.

Então se possivel anexe o exemplo.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/10/2011 8:32 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia Mauro,

Hospedei o arquivo no 4 shared em http://www.4shared.com/file/lBjQ8p3Y/Exemplo.html

Tem alguns numeros de ferramentas e suas quantidades. Na linha 3 eu queria fazer um campo para inserir dados, ou seja, quem estiver operando a planilha escolhe o número da ferramenta através de uma validação de dados (lista) e escreve uma quantidade. Ao pressionar um botão, a quantidade informada deve ser somada a que ja existe na parte de baixo da tabela

Não sei se fui muito claro... qualquer dúvida eu respondo aqui

Muito obrigado!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/10/2011 8:58 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Segue uma possibilidade
Utilizado o codigo abaixo

Sub Soma()
Dim nRow As Long
'Encontra a posição do registro na range
nRow = Application.Match(Sheets("Plan1").Cells(4, 1).Value, Sheets("Plan1").Range("A6:A100"), 0)
'aplica corrção para o numero da linah na planilha
nRow = nRow + 5
'Soma o valor de C4 (Cells(4,3) como o valor existente
Sheets("Plan1").Cells(nRow, 3) = Sheets("Plan1").Cells(nRow, 3).Value + Sheets("Plan1").Cells(4, 3).Value

End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/10/2011 11:20 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Reinaldo,

Muito obrigado pela sua ajuda! Acabou com os meus problemas!! Funcionou certinho! :lol:

Obrigado também ao Mauro

:)

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/10/2011 11:59 am
Forum Jump:
  Tópico Anterior
Próximo Tópico