|
Ich habe noch eine Zusatzfrage zu dem Script.
Ich habe noch versucht eine wenn-Formel einzubauen, da kommt aber eine Fehlermeldung. Was mache ich das noch falsch?
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Cells(1, 1)) Is Nothing Then
If Target.Value = "" Then
Range("A1").Formula = "=wenn(B1+B2>4;"test";"nichts")"
End If
End If
End Sub
|