Gruppe
Allgemein
Problem
Die Anzahl der Einträge pro Zeile ist bis zu Zeile 6 auf maximal 1 Eintrag zu begrenzen.
StandardModule: basMain
Sub Pruefen()
If Intersect(Range("A1:D4"), ActiveCell) Is Nothing Then
MsgBox "Outside"
Else
MsgBox "Inside"
End If
End Sub