如何用VBA自定义按照大写字母顺序排列序号的函数？

作者：绿色风分类：时间：2022-08-17 浏览：106

楼主
wise

Q:如何用VBA自定义按照大写字母顺序排列序号的函数？
A:如当单元格输入1的时候，返回的是字母A，当单元格数值是2的时候，返回的字母是B，依次类推。超过26的话，则在后面相应增加一个新进位，如27为AA等。
ALT+F11→插入模块→在模块中输入以下代码:

Function convert_asc(target As Integer) As String
If target > 701.1 Then
Exit Function
Else
high = Int(target / 26)
low = target Mod 26
temp = ""
If high > 0 Then temp = Chr(high + 64)
temp = temp & Chr(low + 64)
convert_asc = temp
End If
End Function

2楼
wnianzhong

学习一下你的VBA.

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表