当需要依次检测一个表达式的多个值，并根据每个值来执行不同的操作时，Select Case可以提供更清晰的结构。下面我们一起来看看VBA Select Case语句用法与案例教程吧。
Select Case结构的格式如下：
案例1：使用Select Case结构处理多个条件
如果在每个Case下面只执行一条语句，为了使代码结构更紧凑，可以将执行的语句与Case语句合并为一行，两个语句之间使用分号分隔，如下所示：
Select Case结构中的每个Case语句都可以对多个值进行检测，各个值之间以逗号分隔。
案例2：验证Excel程序版本号
下面的代码检测当前Excel程序的版本，如果是Excel 2007/2010/2013/2016，则显示“Excel 2003之后的版本”的提示信息，如果是Excel 2003或更早版本，则显示“Excel 2003或更早版本”的提示信息。本例中用到了Excel对象模型中的Application对象，它代表Excel程序本身。Version是Application对象的一个属性，Application.Version表示Excel程序的版本号。
还可以在Case语句中使用To关键字表示要检测的值的范围，或者使用Is关键字与指定的值进行比较。
案例3：计算折扣率
下面的代码首先检测用户输入的内容是否是数字，如果不是则会显示一条提示信息，然后自动退出当前程序。Exit Sub语句用于在满足条件时退出当前Sub过程。如果输入的是数字，则会使用Select Case结构检测该数字的大小，并返回其所在数值范围内对应的折扣率。在Case语句中使用了Is和To关键字来指定不同的数值范围。
Select Case结构也可以嵌套使用，即在一个Select Case结构中包含另一个Select Case结构。
案例4：查询商品定价
下面的代码可以实现根据用户输入的食品的类别和名称来显示对应的食品定价。如果输入的内容不在指定范围内，则会显示“输入的内容无效”的提示信息。本例使用了嵌套的Select Case结构，外层的Select Case结构用于查找食品的类别，内层的Select Case结构用于查找具体的食品名称，每个Case语句返回相应食品的定价，最后使用MsgBox函数在对话框中显示找到的食品的名称和定价。
点击关注我们不迷路！
Excel秘籍大全全球极具影响力的华语Excel资源网站，拥有大量原创技术文章、模板及Excel教程，并提供Excel免费在线培训，Excel学习资源免费下载，数百万会员在技术论坛参与学习交流33篇原创内容
公众号