Zellen der Markierung per VBA zählen
Sie möchten in einem Makro wissen, wie viele Zellen in der aktuellen Markierung enthalten sind? Auf die aktuelle Markierung greifen Sie über das Objekt Selection zu. In dem Sie die Eigenschaft Count auf dieses Objekt anwenden, erhalten Sie die Anzahl der Zellen, die in der Markierung enthalten sind.
Um die Anzahl der markierten Zellen in einem Hinweisfenster auszugeben, setzen Sie das folgende Makro ein:
Sub ZaehleMarkierteZellen()
Dim Anzahl As Long
Anzahl = Selection.Count
MsgBox "Es sind " & Anzahl & " Zellen markiert."
End Sub
Die folgende Abbildung zeigt, welches Hinweisfenster Excel ausgibt, wenn Sie vor dem Aufruf des Makros einen Zellbereich markieren:
Falls Sie vor dem Aufruf des Makros keinen Zellbereich markiert haben, liefert Ihnen das Objekt Selection einen Bereich, der nur die aktive Zelle umfasst.
Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html