返回符合指定条件的 CommandBarControls 集合。
expression.FindControls(Type, Id, Tag, Visible)
expression 必需。该表达式返回一个 CommandBars 集合。
Type MsoControlType 类型,可选。
| MsoControlType 类型可为以下 MsoControlType 常量之一: |
| msoControlActiveX |
| msoControlCustom |
| msoControlButton |
| msoControlEdit |
| msoControlDropdown |
| msoControlComboBox |
| msoControlButtonDropdown |
| msoControlSplitDropdown |
| msoControlGenericDropdown |
| msoControlGraphicCombo |
| msoControlSplitButtonMRUPopup |
| msoControlSplitExpandingGrid |
| msoControlGraphicDropdown |
| msoControlPopup |
| msoControlGraphicPopup |
| msoControlButtonPopup |
| msoControlGauge |
| msoControlLabel |
| msoControlExpandingGrid |
| msoControlGrid |
| msoControlOCXDropDown |
| msoControlSplitButtonPopup |
| msoControlPane |
Tag Variant 类型,可选。要查找控件的标记值。
Visible Variant 类型,可选。如果该值为 True,那么只查找屏幕上可见的命令栏控件。默认值为 False。
如果没有符合指定条件的控件,FindControls 方法返回 Nothing。
本示例用 FindControls 方法返回 CommandBars 集合中所有标识符为 18 的成员,并在消息框中显示符合指定条件的控件的个数。
Dim myControls As CommandBarControls
Set myControls = CommandBars.FindControls(Type:=msoControlButton, ID:=18)
MsgBox "There are " & myControls.Count & _
" controls that meet the search criteria."