Làm thế nào tôi có thể nhận được các chữ cái cột của một tế bào (cần phải làm cho nó hoạt quá khứ cột Z như AA, AB)

Question

thể trùng lặp:
VBA function to convert column number to letter?

Tôi muốn có các chữ cái cột qua cột Z, có nhiều kỹ thuật để nhận được nó trước cột Z nhưng sau Z, không có gì có vẻ hoạt động Có cách nào để làm như vậy không?

Answer 1

Phương pháp khác:

Public Function ColumnLettersFromRange(rInput As Range) As String 

    ColumnLettersFromRange = Split(rInput.Address, "$")(1) 

End Function 

Answer 2

này nên thực hiện công việc:

 
Function ColumnName(rng As Range) As String 
    Dim s As String 
    s = rng.Address(False, False) 
    ColumnName = Left(s, Len(s) - Len(Format(rng.Row, "0"))) 
End Function 

Answer 3

Sử dụng chức năng bảng tính để tính toán bức thư cột là không thực sự là một kế hoạch tốt. Sử dụng phương pháp VBA của Peter Albert là một cách tốt đẹp hơn nhiều để làm điều đó!

tôi đã một đi vào làm cho một trong các chức năng sử dụng bảng tính, chỉ để cho vui:/

A-ZZ

=IF(A1<27,CHAR(64+A1),IF(A1<703,CHAR(64+INT(A1/26))&CHAR(A1-INT(A1/26)+64),"TOO BIG!")) 

A-XFD (không hoạt động)

=IF(A1<27,CHAR(64+A1),IF(A1<703,CHAR(64+INT(A1/26))&CHAR(A1-(INT(A1/26)*26)+64),CHAR(64+INT(A1/676))&CHAR(64+(INT(A1-(INT(A1/676)*676))/26))&CHAR(64+INT(A1-((INT(A1-(INT(A1/676)*676))/26)*26))))) 

Cuối cùng rơi xuống cố gắng để làm việc ra nhân vật thứ 3 trong địa chỉ, tôi chỉ không thể bị làm phiền khi sử dụng nó không phải là một kế hoạch tốt!