Gruppe
Allgemein
Problem
Wie kann ich feststellen, ob eine bestimmte Zelle in der aktuellen Markierung enthalten ist?
StandardModule: basMain
Sub Markiert()
Dim rng As Range
Set rng = Range("B5")
If Intersect(rng, Selection) Is Nothing Then
MsgBox "Zelle " & rng.Address & " ist nicht markiert!"
Else
MsgBox "Zelle " & rng.Address & " ist markiert!"
End If
End Sub