Wie wandelt man eine Zahl in einen Buchstaben um, um die Excel-Spalte anzuzeigen
In vba
Split(Cells(1, Column_Number).Address, "$")(1) |
Für die Verwendung in Excel vba verwendet man oft die Adressierung von Zellen wie Excelblatt.Cells(1,2) mit .Cells(row-Number, column-number)
In der üblichen dargestellten Schreibweise verwendet man allerdings Buchstaben für die Spalten.
.Cells(1,1)
Um über die Cells-Schreibweise werte in Excel vba einen Zellwert zu ermitteln, gibt man in .Cells(die Reihe und Spalte) an.
Dim sValue As String sValue = sheet_Datalist.Cells(iRow, iColumn).Value2 |
.Range(A1)
Um über die Buchstaben-Schreibweise werte in Excel vba zu ermitteln kann man mit Range arbeiten.
Dim sValue As String sValue = sheet_Datalist.Range("D4").Value2 |
Die einfache Möglichkeit über ein Makro ist:
Mit einer eigenen Function, welche die Zahl umwandelt
Option Explicit On
Public Function Convert_Number_To_Letter(ByVal Column_Number As Integer)
'Umwandeln einer Excel-Spalten-Nummer in einen Buchstaben, der Spalte
Convert_Number_To_Letter = Split(Cells(1, Column_Number).Address, "$")(1)
End Function
|