Como calcular uma célula apenas uma vez?

Question

Eu tenho o cell N29 calculando alguns valores com base nos dados de streaming. Quando uma condição é atendida na célula Q29 , o cálculo ou o valor final deve ser passado para a célula O29 e não mais ser calculado em nenhuma célula.

Por exemplo: Se a célula Q29 = y então O29 deve ser igual ao último cálculo de N29 (e não mais calcular) e N29 deve ser definido como 0 e não calcular mais.

    

Answer 1

Inclua a seguinte macro de evento na área de código da planilha:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Q29 As Range
    Set Q29 = Range("Q29")
    If Intersect(Target, Q29) Is Nothing Then Exit Sub
    If Q29 <> "y" Then Exit Sub
    Application.EnableEvents = False
        Range("O29").Value = Range("N29").Value
        Range("N29").Value = 0
    Application.EnableEvents = True
End Sub

as macros devem estar ativadas para que isso funcione!