Página 1 de 1

Dúvida em relação a soma

Enviado: 14 Abr 2019 às 15:21
por SirArucard
Boa tarde!

Estou com uma dúvida em relação a soma no excel. Deixa eu exemplificar minha dúvida:

Vamos supor que A1 é a quantidade de números de folhas. Vamos supor que atualmente seja 35. Se futuramente forem colocadas mais 177 folhas, teria alguma fórmula que se utilize no A1 para que tudo o que eu colocar depois automaticamente some com o valor anterior? Tipo, se tem 35 lá no A1, quando colocar o valor 177 automaticamente vire 212, ao invés de toda hora ter que usar a calculadora?

Espero ter sido claro em minha dúvida.


Sucesso!

Re: Dúvida em relação a soma

Enviado: 14 Abr 2019 às 16:54
por babdallas
Veja se é isso. Se entendi o que você deseja, só sei fazer via VBA na mesma célula.

Dúvida em relação a soma

Enviado: 14 Abr 2019 às 17:11
por SirArucard
É exatamente isso! Como você conseguiu? Me ensina?



Sucesso!

Re: Dúvida em relação a soma

Enviado: 15 Abr 2019 às 09:49
por babdallas
Usando VBA. Ao selecionar a célula A1, o evento da planilha SelectionChange captura o valor atual da célula e atribui a uma variável de escopo de Módulo (Private).
Ao mudar o valor da célula A1 (através de evento Change da planilha), modifica-se o valor da célula somando o valor atual (que foi digitado) com o valor anterior capturado no evento SelectionChange explicado anteriormente.
Não se fui claro. Veja os códigos realizados na planilha cuja célula A1 está sendo modificada:
Código: Selecionar todos
Option Explicit
Private dblNum As Double


Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    Target.Value2 = Target.Value2 + dblNum
    
    Application.EnableEvents = True
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" And VBA.IsNumeric(Target.Value) Then dblNum = Target.Value2
End Sub

Dúvida em relação a soma

Enviado: 25 Abr 2019 às 19:26
por SirArucard
Boa noite. É possível sem usar VBA? Alguma fórmula direto no excel?


Sucesso!