Tipps "n" Tricks
Anwender-Software - Excel

Prüfen auf markierten Bereich

Thema:

Excel 97, 2000 und 2002

Problem:

Ich habe einige kleine VBA-Makros entwickelt, die mir bei der täglichen Arbeit helfen. Leider werden sie manchmal mit einer Fehlermeldung abgebrochen, wenn beim Start des Makros gerade kein Bereich markiert, sondern ein Diagramm oder ein Grafikobjekt ausgewählt war. Wie kann ich das unterbinden?

Lösung: 

Die VBA-Funktion "TypeName" hilft weiter, denn mit ihrer Hilfe können Sie Informationen über die aktuelle Auswahl abfragen. Solange eine oder mehrere Zellen markiert sind, liefert die Funktion das Ergebnis "Range", so dass Sie den beschriebenen Fehler beispielsweise wie folgt abfangen könnten:

If TypeName(Selection) <> "Range" Then
  MsgBox "Bitte waehlen Sie einen Bereich aus!"
  Exit Sub
End If

 

Tipps "n" Tricks
Anwender-Software - Excel