Gruppe
Ereignis
Problem
Die WENN-Formel in B1 soll nur bei der ersten Werteänderung in A1 berechnet werden.
ClassModule: Tabelle1
Private Sub Worksheet_Calculate()
With Range("B1")
If .HasFormula Then
.Value = .Value
End If
End With
End Sub