excel自定义枚举常量

VBA提供了一些内置枚举常量，例如MsgBox函数的buttons参数成员vbOkOnly、vbOkCancel等，可以在程序中方便使用，并且这些常量可读性好，便于程序维护。当然，你可以创建自已的枚举常量，用于自已的代码。
使用Enum语句来创建枚举常量。Enum语句用于定义常量的名称、其内部各常量成员的名称以及对应的值。其语法为：
[Public Private] Enum 常量名
常量成员名 [ = 常量数值 ]
常量成员名 [ = 常量数值 ]
…
End Enum
说明：
Enum语句只能放置在代码模块的声明部分
常量数值必须为Long型，可以是一个正数或负数
如果从一开始就省略了常量数值，那么其常量成员名被赋值为0，后面依次加1 。如果省略的不是第一个成员名，那么后面的比前面的数值大1
【excel自定义枚举常量】创建枚举常量后，就可以将变量声明为枚举常量，也可以作为自定义函数返回值的类型
枚举中的常量数值可以叠加，例如MsgBox函数中buttons参数值可以设置为vbCritical + vbYesNo
示例
下面的代码创建自定义枚举常量，并在程序中使用。
Enum MyText
MyExcel = 1
MyPerfect = 2
MyExclaim = 4
End Enum
Sub ExcelPerfect(eText AsMyText)
Dim strText As String
Select Case eText
Case 1
strText = “Excel”
Case 2
strText = ” ”
Case 3
strText = ” Excel”
Case 4
strText = “微信 ”
Case 5
strText = “excelperfect”
End Select
MsgBox strText
End Sub
Sub CallExcelPerfect()
ExcelPerfect MyExcel
ExcelPerfect MyPerfect + MyExcel
End Sub
运行CallExcelPerfect过程后的结果如下和所示。

文章插图

excel自定义枚举常量

推荐阅读

周公解梦梦到女儿是什么意思周公解梦梦到女儿好不好

名声大噪的意思是什么名声大噪出自哪里

猫咪接种疫苗后需要注意什么

火男染阵是什么意思

卤煮都有什么食材

怎么克服信息焦虑

怎么样去除衣服怪味

农村医保门诊怎么报销农村医保门诊如何报销

跃迁模是什么

微波炉蒸鱼的家常做法微波炉蒸鱼的家常做法视频

红油凉面做法图解

世界四大名香是什么

英雄联盟瑞文新手教程

天天拍手有什么好处

琴酒是什么酒图片琴酒是什么酒

简单好看树叶贴画方法

北京出入境管理局官网预约受理地点选择

什么是桥梁支架关于桥梁支架介绍

母乳不够吃宝宝能喝乳铁蛋白吗？

碧玺石（碧玺的功效与作用碧玺石的功效与作用有哪些）