Macro inserir soma de um determinado intervalo de células

2024 - VBA & Macros

Post Recente por juliovaz 10 anos atrás

3 Posts

2 Usuários

0 Reactions

708 Visualizações

RSS

juliovaz

(@juliovaz)

Posts: 9

Active 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

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

Postado : 16/05/2015 8:00 am