Re: Bei Change von Zellen
21.10.2002 16:14:55
Andre B
Sobald du durch einen anderen Code wieder Änderungen in dieser Zelle ("J6") tätigst, greift dieser Code natürlich auch wieder.
Also die Gefahr einer Schleife ist natürlich gegeben, aber eine andere Möglichkeit gibt´s nicht.Wo liegen denn deine 1000 Zellen? Wenn die in einer Spalte liegen, kann man den Code auch allgemeiner fassen.
Wenn dieselben Zellen nochmals geändert werden ist das ´n Problem.
Ich würde es dann ungefähr so machen:
Den Code umschreiben und von einer Bedingung abhängig machen.
Private Sub Worksheet_Change(ByVal Target As Range)
If [A1] = "X" then exit sub
If Target.Address = "$J$6" Then
Range("C17").Select
End If
End Sub
Dieses "X" lasse ich dann durch ein Makro einfügen und dann können diese Zellen wieder geändert werden ohne das der Code ausgelöst wird.
Zur manuellen Eingabe, muß dieses "X" nur wieder entfernt werden und schon ist der Code wieder aktiv.
Gruß Andre