Alcuni a portata di mano Personal Macro: lettera della colonna di ritorno per il numero di colonna.
Ciò è utile se desideri utilizzare istruzioni come Intervallo (“A1”) anziché celle (1,1).
Quindi, ad esempio ColLetter (1) = A, ColLetter (2) = b, …, ColLetter (100)
CV, ecc.
{vuoto} 3) ColLetter (numero di colonna) ⇒ restituisce indietro la colonna Lettera.
Funzione pubblica ColLetter (colNumber As Long) As String If colNumber <27 Then If colNumber = 0 Then ColLetter = “Z”
Else ColLetter = Mid (“ABCDEFGHIJKLMNOPQRSTUVWXYZ”, colNumber, 1)
End If Else If colNumber <26 ^ 2 + 27 Then ColLetter = Mid (“ABCDEFGHIJKLMNOPQRSTUVWXYZ”, FLOOR (colNumber / 26), 1)
ColLetter = ColLetter & ColLetter (colNumber Mod 26)
Else ColLetter = Mid (“ABCDEFGHIJKLMNOPQRSTUVWXYZ”, FLOOR ((colNumber – 26) / 676), 1)
ColLetter = ColLetter & ColLetter (colNumber – FLOOR ((colNumber – 26) / 676) * 676)
End If End If End Funzione