SelectionChange - nur bei einzelnen Zellen
22.09.2003 19:12:40
Christoph
ich möchte eine Worksheet_SelectionChange-Anweisung nur im Bereich C8 bis Q8 ausführen. Das bekommen ich noch hin(siehe unten).
Doch nun zu meiner Frage:
Wenn ich in diesem Bereich mehr als eine Zelle markiere (also z.B. C8 bis E8), dann soll die SelectionChange Anweisung ebenfalls nicht ausgeführt werden, sondern eben nur, wenn eine einzelne Zelle aus dem Bereich markiert ist.
wie geht das?
kann mir jemand helfen?
schon vorab vielen Dank
Gruß
Christoph
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row <> 8 Then Exit Sub
If Target.Column < 3 Then Exit Sub
If Target.Column > 17 Then Exit Sub
j = Target.Column 'das ist nur ein Fehlversuch
If Target.Range <> Cells(8, j) Then Exit Sub 'Objekt nicht definiert etc.
Call Bearbeiten
End Sub