Dies ist gut, wenn Sie Anweisungen wie Range („A1“) anstelle von Zellen (1,1) verwenden möchten.

So zum Beispiel ColLetter (1) = A, ColLetter (2) = b, …​, ColLetter (100)

Lebenslauf usw.

{leer} 3) ColLetter (Spaltennummer) ⇒ gibt die Spalte Letter zurück.

Öffentliche Funktion ColLetter (colNumber As Long) As String Wenn colNumber <27 Dann If colNumber = 0 Dann ColLetter = „Z“

Sonst ColLetter = Mid („ABCDEFGHIJKLMNOPQRSTUVWXYZ“, colNumber, 1)

Ende Wenn sonst Wenn colNumber <26 ^ 2 + 27 Dann ColLetter = Mid („ABCDEFGHIJKLMNOPQRSTUVWXYZ“, FLOOR (colNumber / 26), 1)

ColLetter = ColLetter & ColLetter (colNumber Mod 26)

Sonst ColLetter = Mid („ABCDEFGHIJKLMNOPQRSTUVWXYZ“, FLOOR ((colNumber – 26) / 676), 1)

ColLetter = ColLetter & ColLetter (colNumber – FLOOR ((colNumber – 26) / 676) * 676)

End If End If End Funktion