Gruppe
Allgemein
Bereich
Bearbeiten
Thema
Spaltennamen bestimmen
Problem
Wie kann ich über eine VBA-Prozedur den Namen der Spalte (A, B, C) bestimmen, in der sich die aktive Zelle befindet?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub ConvertColumn()
Dim sAddress As String, sColumn As String
sAddress = ActiveCell.Address
sAddress = Mid(sAddress, InStr(sAddress, "$") + 1, _
InStr(2, sAddress, "$") - 2)
MsgBox sAddress
End Sub