Gruppe
Ereignis
Problem
Die Auswahl von Zellen in mehreren Zeilen soll verhindert werden.
ClassModule: Tabelle1 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Selection.Rows.Count > 1 Then Target.Cells(1).Select End Sub