Schleife bei Worksheet_Change
20.02.2008 13:18:27
Luftibus
ändere ich den Wert inZelle D4, wird mit unten stehendem Code in der Zelle E4 der Text "Hier neu auswählen" ausgegeben.
Wer kann mir sagen, wie die Schleife aussehen muss, wenn ich den gleichen Mechanismus in den Zellen D4:E18 anwenden möchte (Bsp. Änderung in D7, Textausgabe in E7 / Änderung in D12, Textausgabe in E12 / etc.)?
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$D$4" Then
Range("$E$4").FormulaR1C1 = "Hier neu auswählen!"
End If
End Sub
Herzlichen Dank für eure Unterstützung!
Gruss Luftibus