将列号转换为字母的函数? [英] Function to convert column number to letter?

问题描述

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

Does anyone have an Excel VBA function which can return the column letter(s) from a number?

例如，输入 100 应返回 CV.

For example, entering 100 should return CV.

推荐答案

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

This function returns the column letter for a given column number.

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

这篇关于将列号转换为字母的函数?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！