Điều này là tốt nếu bạn muốn sử dụng các câu lệnh như Range (“A1”) thay vì các ô (1,1).

Vì vậy, ví dụ ColLetter (1) = A, ColLetter (2) = b, …​, ColLetter (100)

CV, v.v.

{trống} 3) ColLetter (số cột) ⇒ chuyển trở lại cột Chữ cái.

Hàm công khai 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)

Kết thúc Nếu Kết thúc Nếu Kết thúc Hàm