Bonjour Gemeinde,

mein Wissen bezüglich VBA habe ich mir aus dem Internet zusammenkopiert und stehe jetzt vor dem Problem das das Projekt zu groß ist. Daher bitte ich Euch um Hilfe.

Ich habe ein Dokument mit 1000 Zeilen - von Spalte A bis R.
Jede Zeile gibt Informationen zu einem Kunden wieder. Wenn einer dieser Werte geändert wird, soll in Spalte S das Änderungsdatum erscheinen - Zeile für Zeile.

Bisher habe ich dies folgend gelöst:

Private Sub worksheet_change(ByVal Target As Range)
If Target.Address = "$A$3" Or Target.Address = "$B$3" Or Target.Address = "$C$3" Or Target.Address = "$D$3" Or Target.Address = "$E$3" Or Target.Address = "$F$3" Or Target.Address = "$G$3" Or Target.Address = "$H$3" Or Target.Address = "$I$3" Or Target.Address = "$J$3" Or Target.Address = "$K$3" Or Target.Address = "$L$3" Or Target.Address = "$M$3" Or Target.Address = "$N$3" Or Target.Address = "$O$3" Or Target.Address = "$P$3" Or Target.Address = "$Q$3" Or Target.Address = "$R$3" Then [S3] = Date
End Sub

Bei bis zu 130 Zeilen ist dies möglich, jedoch meldet Excel aber der 131 Zeile folgendes:
Fehler beim Kompilieren:
Prozedur zu groß

Was tun?