小编典典

将列号转换为字母的功能?

all

有没有人有可以从数字返回列字母的 Excel VBA 函数?

例如,输入 100 应该返回CV


阅读 106

收藏
2022-09-02

共1个答案

小编典典

此函数返回给定列号的列字母。

Function Col_Letter(lngCol As Long) As String
    Dim vArr
    vArr = Split(Cells(1, lngCol).Address(True, False), "$")
    Col_Letter = vArr(0)
End Function

第 100 列的测试代码

Sub Test()
    MsgBox Col_Letter(100)
End Sub
2022-09-02