在Excel VBA宏编程中，有时我们可能需要隐藏工作簿中的某些控件，例如按钮、文本框或选项组，以优化界面或者在特定条件下控制用户交互。本实例"让控件不显示(Visible)"着重讲解如何通过VBA来实现这一功能。
我们需要了解Excel中的控件主要有两种类型：内置的形状对象（如按钮、文本框）和ActiveX控件。这些控件可以通过开发工具菜单中的控件工具箱添加到工作表中。在VBA中，我们可以直接引用它们的属性来改变其显示状态。
在VBA编辑器中，我们可以创建一个模块，并在其中编写以下代码：
```vba
Sub 控件隐藏显示()
Dim 控件 As Shape
For Each 控件 In ActiveSheet.Shapes
控件.Visible = False '将所有形状控件设置为不可见
Next 控件
'或者，如果你想隐藏特定的控件，可以使用控件名称
'例如，隐藏名为"MyButton"的按钮
Sheet1.Shapes("MyButton").Visible = False
End Sub
```
这段代码遍历活动工作表上的所有形状控件，并将其可见性设置为False，使得它们在工作表上不可见。如果你想隐藏特定的控件，只需替换`Sheet1.Shapes("MyButton")`为你要隐藏的控件名称即可。
对于ActiveX控件，处理方式稍有不同：
```vba
Sub ActiveX控件隐藏显示()
Dim 控件 As OLEObject
For Each 控件 In ActiveSheet.OLEObjects
控件.Object.Visible = False '将所有ActiveX控件设置为不可见
Next 控件
'隐藏特定ActiveX控件，如一个名为"MyComboBox"的组合框
Sheet1.OLEObjects("MyComboBox").Object.Visible = False
End Sub
```
这里，我们使用`ActiveSheet.OLEObjects`集合来遍历所有ActiveX控件，并通过`.Object.Visible`来改变控件的可见性。
在实际应用中，你可能会希望根据特定条件来控制控件的显示状态。例如，你可以编写一个事件过程，当满足某个条件时，隐藏或显示控件：
```vba
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "隐藏" Then
Sheet1.Shapes("MyButton").Visible = False
ElseIf Target.Value = "显示" Then
Sheet1.Shapes("MyButton").Visible = True
End If
End Sub
```
在这个例子中，当单元格值更改且等于“隐藏”时，按钮会被隐藏；若改为“显示”，按钮会重新显示。
Excel VBA宏编程提供了强大的灵活性，允许我们通过调整控件的Visible属性来控制用户界面的动态显示。通过学习和理解这些基本概念，你可以创建更高效、更用户友好的Excel应用程序。在实际工作中，结合办公自动化的需要，可以利用VBA宏来实现各种复杂的业务逻辑和界面交互。
Excel-VBA宏编程实例源代码-让控件不显示(Visible).zip （1个子文件） 
让控件不显示(Visible).xlsm 14KB
