我怎样才能得到一个单元格的列的字母(需要使它过去的Z列,如AA,AB)

可能重复:
VBA函数将列号转换为字母?

我想要列字母通过Z列,有许多技术获得它之前Z列,但在Z之后,似乎没有任何工作有没有办法做到这一点?

另一种方法:

Public Function ColumnLettersFromRange(rInput As Range) As String ColumnLettersFromRange = Split(rInput.Address, "$")(1) End Function 

这应该做的工作:

函数ColumnName(rng作为范围)作为string
    昏暗的s作为string
     s = rng.Address(False,False)
     ColumnName = Left(s,Len(s) -  Len(Format(rng.Row,“0”)))
结束function

使用工作表函数来计算列字母并不是一个很好的计划。 使用彼得·艾伯特的VBA方法是一个更好的方法来做到这一点!

我有一个使用工作表function,只是为了好玩:/

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(不起作用)

 =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))))) 

最后一个试图解决地址中的第三个字符,我不能打扰使用它不是一个好的计划!