Totalizador de vazão

[Mestreoda]

Uma célula apresenta valor oscilante, como totalizar em outra célula todo volume que a primeira vem apresentando? Exemplo a cada segundo é indicado valores de 0 a 100litros/s conforme passa o tempo outra célula registra o total acumulando...

[Frank K Hosaka]

Supondo que a célula A1 tem o valor oscilante e a célula B1 vai acumular esses valores, eu iria usar o botão direito na guia da planilha, e selecionaria Exibir Código, e lá escreveria o seguinte código

 

Private Sub Worksheet_Change(ByVal Target As Range)
    Set KeyCells = Range("A1")
    If Not Application.Intersect(KeyCells, Range(Target.Address)) _
           Is Nothing Then
        Range("B1").Value = Range("B1").Value + Range("A1").Value
    End If
End Sub