Vba: so erhalten sie die spaltennummer aus einem bereich

Sie können die folgenden Methoden verwenden, um mit VBA eine Spaltennummer aus einem Bereich in Excel abzurufen:

Methode 1: Spaltennummer aus einem bestimmten Bereich abrufen

 Sub GetColumnNumber()

colNum = Range(" D7 ").Column
MsgBox colNum

End Sub

Dieses spezielle Makro zeigt ein Meldungsfeld mit der Spaltennummer an, die Zelle D7 entspricht. Dies wäre 4 , da D die vierte Spalte auf dem Blatt ist.

Methode 2: Rufen Sie die Spaltennummer des aktuell ausgewählten Bereichs ab

 Sub GetColumnNumber()

colNum = Selection.Column
MsgBox colNum

End Sub

Dieses spezielle Makro zeigt ein Meldungsfeld mit der Spaltennummer an, die dem aktuell ausgewählten Bereich in Excel entspricht.

Wenn Sie beispielsweise Zelle B3 auswählen, wenn Sie dieses Makro ausführen, wird ein Meldungsfeld mit dem Wert 2 angezeigt, da Spalte B die zweite Spalte auf dem Blatt ist.

Die folgenden Beispiele zeigen, wie die einzelnen Methoden in der Praxis angewendet werden.

Beispiel 1: Spaltennummer aus einem bestimmten Bereich abrufen

Angenommen, wir möchten die Spaltennummer für die Zellreferenz D7 erhalten.

Dazu können wir das folgende Makro erstellen:

 Sub GetColumnNumber()

colNum = Range(" D7 ").Column
MsgBox colNum

End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Das Meldungsfeld zeigt den Wert 4 an, der der Spaltennummer der Zellreferenz D7 entspricht.

Beispiel 2: Rufen Sie die Spaltennummer des aktuell ausgewählten Bereichs ab

Angenommen, wir möchten die Spaltennummer der aktuell aktiven Zelle ermitteln.

Dazu können wir das folgende Makro erstellen:

 Sub GetColumnNumber()

colNum = Selection.Column
MsgBox colNum

End Sub

Angenommen, Zelle B3 ist derzeit ausgewählt.

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Das Meldungsfeld zeigt den Wert 2 an, der der Spaltennummer der aktuell aktiven Zelle in B3 entspricht.

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So erhalten Sie die Zeilennummer aus einem Bereich
VBA: So finden Sie den Wert in einer Spalte
VBA: So zählen Sie die Anzahl der verwendeten Spalten