Formel umstellen
04.01.2003 17:04:28
Ralf
Ich habe da ein Problem ich möchte gerne diese Formel nicht nur für die celle a1 haben, sondern für den cellenbereich a1 -a36.
muss ich jedes mal die formel dafür umändern oder gibt es da eine Leichtere Möglichkeit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target <> [a1] Then Exit Sub
With Application
.EnableEvents = False
If [a1] > 8 Then
[a3] = [a1] - 8
[a1] = [a1] - [a3]
End If
.EnableEvents = True
End With
End Sub