Excel中怎样获取单元格所在列的名称?
发布网友
发布时间：2024-08-18 14:22
共1个回答
热心网友
时间：2024-08-22 08:28
1.用公式获取列名
在任意单元格中输入公式：
=LEFT(ADDRESS(ROW(),COLUMN(),4),LEN(ADDRESS(ROW(),COLUMN(),4))-LEN(ROW()))
公式说明：先用ROW和COLUMN函数返回公式所在单元格的行号和列号，然后用ADDRESS函数返回该单元格的地址，最后一个参数4，表示返回的引用类型为相当引用，即返回A1样式地址。最后用LEFT函数返回列名。
在A9单元格中输入公式：
=SUBSTITUTE(ADDRESS(1,COLUMN(A9),2),"$1","")
公式说明：用ADDRESS函数返回A9单元格的地址，最后一个参数为2，表示返回的引用类型为绝对行号和相对列标，即A$1式样。然后用SUBSTITUTE函数将其中的“$1”替换为空。
2.用自定义函数获取列名
按Alt+F11，打开VBA编辑器，单击菜单“插入→模块”，在右侧代码窗口中输入：
Function ColumnLetter1(rng As Range) As String
ColumnLetter1 = Replace(rng.EntireColumn.Cells(1).Address(, False), "$1", "")
End Function
然后在A9单元格中输入公式
=ColumnLetter1(A9)
或：
Function ColumnLetter2(rng As Range)
ColumnLetter2= Mid(rng.Address, 2, InStr(2, rng.Address, "$") – 2)
End Function
然后在A9单元格中输入公式
=ColumnLetter2(A9)
