Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Macro inserir soma ...
 
Notifications
Clear all

Macro inserir soma de um determinado intervalo de células

 
2024 - VBA & Macros
Post Recente por juliovaz 9 anos atrás
3 Posts
2 Usuários
0 Reactions
694 Visualizações
RSS
 juliovaz
(@juliovaz)
Posts: 0
New Member
Topic starter
 

Olá pessoal, bom dia. estou fazendo uma planilha de pedido de material e queria uma macro que fizesse a soma do valor dos materiais pedidos em uma determinada célula. O problema que um pedido nunca é igual ao outro, tipo (exemplo) vai ter pedido em que vou preencher a célula G7 até G20 e a soma vai ficar na G21, e vai ter pedido que vai somar de G7 até G40 ficando a soma na G41. Faço pelo gravador de macro mas ele fica igual pra todos os casos, somando o mesmo intervalo sempre. Alguém pode me ajudar?
desde ja agradeço.

 
Postado : 16/05/2015 2:45 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Talvez isso lhe ajude.

Sub AleVBA_15833()
    Dim LR As Long
    LR = Range("G" & Rows.Count).End(xlUp).Row
    Range("G" & LR + 1).Formula = "=SUBTOTAL(9,G7:G" & LR & ")"
End Sub

Não testado!

Att

 
Postado : 16/05/2015 8:00 am
 juliovaz
(@juliovaz)
Posts: 0
New Member
Topic starter
 

òtimo, deu certinho. Muito obrigado Alexandre.

 
Postado : 27/05/2015 3:04 am
Forum Jump:
  Tópico Anterior
Próximo Tópico