Feststellen, ob eine Zelle in einem bestimmten Excel-Zellbereich liegt

11. Mai 2011
Martin Althaus Von Martin Althaus, Excel, Office ...

So prüfen Sie, ob die aktive Zelle sich in einem zuvor definierten Zellbereich Ihrer Tabelle befindet

Die aktive Zelle befindet sich im Zielbereich

Die aktive Zelle befindet sich im Zielbereich

In vielen Makros wird auf die Position der aktiven Zelle reagiert. Aber wie stellen Sie fest, ob sich die aktive Zelle in einem bestimmten Zellbereich befindet? Es ist nicht nötig, diesen Umstand aufwendig mit IF-Kommandos abzufragen. Nutzen Sie einfach die Funktionen von VBA, um Schnittmengen zwischen Bereichen herzustellen. Das folgende Excel-Makro zeigt, wie das geht:

Sub IstZelleImBereich()
Dim Testbereich As Range
Set Testbereich = Range("b5:c60")
If Intersect(ActiveCell, Testbereich) Is Nothing Then
MsgBox "Die aktive Zelle befindet sich nicht im Bereich " & _
 Testbereich.Address(False, False)
Else
MsgBox "Die aktive Zelle befindet sich im Bereich " & _
 Testbereich.Address(False, False)
End If
End Sub

Um das Makro zu verwenden, klicken Sie zunächst eine Zelle an. Anschließend rufen Sie das Makro auf. Es prüft, ob die aktive Zelle sich im Zellbereich befindet, den Sie im Makro definiert haben. Wenn das nicht der Fall ist, zeigt Excel das mit einem Hinweisfenster an:

Die aktive Zelle und der Zielbereich überschneiden sich nicht

Wenn sich die aktive Zelle hingegen im festgelegten Zellbereich befindet, zeigt das Makro diesen Umstand ebenfalls mit einem Hinweisfenster an:

Die aktive Zelle befindet sich im Zielbereich

Welchen Zielbereich Sie im Makro auf eine Überschneidung testen möchten, legen Sie über die Variable TESTBEREICH fest.

  • Excel Vorlagen zum Sofort-Download
  • Geprüfte Vorlagen zum Sofort-Einsatz
  • Gratis Makros & Add-Ins im Downloadcenter

DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"