Mehrfachmarkierung ausschließen
12.12.2003 15:12:21
toni
gibt es eine Möglichkeit, das Markieren mehrer Zellen zu unterbinden ?
Mit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then
MsgBox "Mehrfachauswahl ist nicht gestattet.", 48, "Hinweis"
Cells(Target.Row, Target.Column).Select
End If
End Sub
kann ich zwar eine Meldung ausgeben und der Fokus wird auf die erste selektierte Zelle gesetzt, aber damit ist mir nicht geholfen.
Hintergrund:
Wenn auf meinem Arbeitsblatt eine Zelle angesteuert wird, öffnet sich (je nach Spalte) eine Userform. Wählt der Anwender nun mehrere Zellen aus, werden nacheinander alle Useformen der entsprechenden Spalten geöffnet.
Das nervt und führt hin und wieder zu Fehlern.
Weiss jemand Rat ???
Ciao, Toni
Anzeige