养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

怎样使用VBA返回列号对应之英文字母

时间:2024-09-19 17:39:48

随着手机里面功能越来越丰富,让我们使用起来越来越方便了,给我们的生活带来了极大的便利。怎样使用VBA返回列号对应之英文字母?

怎样使用VBA返回列号对应之英文字母

工具/原料

手机

方法/步骤

1、首先在开发工具中打开VBA编辑器

怎样使用VBA返回列号对应之英文字母

2、在单元格区域当中输入一些内容作为例子

怎样使用VBA返回列号对应之英文字母

3、在VBA编辑器中插入模块

怎样使用VBA返回列号对应之英文字母

4、在模块当中输入如下代码,然后运行FunctionCol(OptionalColNum)AsString'返回指定列的列号,参数为可选Application.VolatileIfNotVBA.IsNumeric(ColNum)ThenColl=""IfVBA.IsNumeric(ColNum)Then'如果输入的是数字IfColNum>16384OrColNum<1ThenCol="超出范围":ExitFunction'不能大于16384或者小于1Col=Left(Cells(1,ColNum).Address(0,0),1-(ColNum>26)-(ColNum>702))'取得列号ExitFunctionEndIf'如果不输入参数,则返回当前列的列号Col=Left(Cells(1,ActiveCell.Column).Address(0,0),1–(ActiveCell.Column>26)-(ActiveCell.Column>702))'取得列号EndFunction

怎样使用VBA返回列号对应之英文字母

5、在单元格A1中输入公式“=col()”,因省略了参数,则单元格显示当前列的列号“A”

怎样使用VBA返回列号对应之英文字母

© 一点知识