Sub test()
'Umwandeln der ersten Spalte
Debug.Print WorksheetFunction.Substitute([A1].AddressLocal(False, False), 1, "")
End Sub
Sub test1()
Dim Buchstabe As String
Buchstabe = "B"
Debug.Print Columns(Buchstabe).Column
End Sub
Um den Spaltenbuchstaben in eine Spaltennummer in Excel umzuwandeln, kannst Du die folgende Excel-Formel verwenden:
=WECHSELN(ADRESSE(1;SPALTE();4);1;"")Falls Du diese Umwandlung in VBA durchführen möchtest, kannst Du den folgenden Code verwenden:
Sub SpaltenbuchstabeInZahl()
Dim Buchstabe As String
Buchstabe = "B" ' Hier den gewünschten Buchstaben eintragen
Debug.Print Columns(Buchstabe).Column
End SubFühre diesen Code in einem VBA-Modul aus, um die Spaltennummer des angegebenen Buchstabens zu erhalten.
Fehler: Die Formel gibt einen Fehler zurück.
Fehler: VBA gibt keine Ausgabe zurück.
Excel Formel für mehrere Spalten: Wenn Du mehrere Spaltenbuchstaben umwandeln möchtest, kannst Du eine Kombination aus INDIREKT und SPALTE nutzen:
=SPALTE(INDIREKT("B1")) VBA Funktion erstellen: Du kannst eine benutzerdefinierte Funktion in VBA erstellen, um die Umwandlung durchzuführen:
Function BuchstabeInZahl(Buchstabe As String) As Integer
BuchstabeInZahl = Columns(Buchstabe).Column
End FunctionBeispiel 1: Um den Buchstaben "C" in eine Zahl umzuwandeln, nutze die Formel:
=WECHSELN(ADRESSE(1;SPALTE();4);1;"")Beispiel 2: In VBA:
Sub Beispiel()
Debug.Print BuchstabeInZahl("D") ' Gibt 4 aus
End SubDiese Beispiele zeigen Dir, wie Du Excel Spaltenbuchstaben in Zahlen umwandeln kannst.
1. Wie kann ich einen Spaltenbuchstaben in eine Zahl umwandeln, wenn ich mehrere Buchstaben habe? Du kannst die oben genannte Formel in einer Matrixformel verwenden, um mehrere Buchstaben in einer Zeile zu verarbeiten.
2. Gibt es eine Möglichkeit, die Spaltennummer direkt in VBA zu erhalten, ohne eine Formel zu verwenden? Ja, du kannst die Columns-Eigenschaft in VBA verwenden, wie im obenstehenden VBA-Beispiel gezeigt.
3. Funktioniert die Umwandlung in allen Excel-Versionen? Ja, die genannten Methoden funktionieren in den meisten modernen Excel-Versionen, einschließlich Excel 2010 und neuer.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen