VBA选择函数应用方法，Choose不知道真的很可惜

VBA中有一个很有用的函数，可以在众多选择中选择出某一项来，这样的函数叫做选择函数Choose。

在什么样的场景下使用最好呢？那就是具体一定的索引功能的情况下使用最适合了。

本节以一个示例来解释一下，Choose函数的使用方法。

如下图所示：

示例中有一个选择框，里面的索引号，单击按钮可实现输出索引号对应的值。

这就是选择函数的功能。

语法:

Choose(index,choice1,choice2,....choicen)

注意两点：

1. 如果 索引 小于 1 或大于列出的选择数，则“选择”函数返回 Null。
2. 如果 索引 不是整数，则将其舍入为与其最接近的整数。

代码：

Private Sub CommandButton1_Click()On Error Resume Next'错误处理Dim GetChoice As StringDim i As Integeri = Me.ComboBox1.Value'索引值GetChoice = VBA.Choose(i, 'A', 'B', 'C', 'D', 'E', 'F')'选择函数If Err.Number = 0 Then MsgBox GetChoice'输出选择值Else MsgBox '选择错误！'End IfEnd Sub

选择就是在一些已知的内容中找出一个，就是这么简单。

其中，索引值就是要找出的那个值的位号，从1开始。

通过选择函数，可以针对某一个特定的选项进行操作，其中的应用就发挥自己的想像了。