显示页面上每个控件的名称

下面的示例显示窗体上每个控件的 Name 属性。 此示例使用 Microsoft Forms 2.0 Controls 集合循环浏览直接放置在“用户”窗体上的所有控件。

若要使用本示例,请将此示例代码复制到窗体的"脚本编辑器"中。 确保窗体包含名为 CommandButton1 的 CommandButton 以及几个其他控件。

Sub CommandButton1_Click() 
 Set Controls = Item.GetInspector.ModifiedFormPages.Item("P.2").Controls 
 For i = 0 to Controls.Count - 1 
 MsgBox "MyControl.Name = " & Controls.Item(i).Name 
 Next 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。