ListIndex 属性
优质
小牛编辑
125浏览
2023-12-01
全部显示
返回或设置在命令栏组合框控件的列表框中选定项的索引号。如果没有选中列表中的任何项,那么该属性的返回值为 0。Long 类型,可读写。
注意此属性只能用于列表框控件。
说明
设置ListIndex 属性,使指定控件选中给定的项,并在应用程序中执行与该选项对应的操作。
示例
本示例根据命令栏“My Custom Bar”组合框中的选项,用ListIndex 属性确定需运行的正确的子程序。因为本示例使用ListIndex 属性,所以组合框中的文本可为任意内容。
Sub processSelection()
Dim userChoice As Long
userChoice = CommandBars("My Custom Bar").Controls(1).ListIndex
Select Case userChoice
Case 1
chartcourse
Case 2
displaygraph
Case Else
MsgBox ("Invalid choice. Please choose again.")
End Select
End Sub