Excel VBA 用户窗体控件答案

【问题标题】：Excel VBA Userform ControlsExcel VBA 用户窗体控件
【发布时间】：2014-04-25 18:18:16
【问题描述】：

大家早上好，

我在 Excel 用户窗体中有一个 ComboBox 和一个 MultiPage。我想要创建的是一个 Sub，它基本上将所有 MultiPage 页面的 Visibility 设置为 0，其中名称不等于 ComboBox 选择，但我被卡住了。

 Sub changeMultiPageVisibility()
 If userForm.templateComboBox = "Criteria1" Then While 
 multiPage.Names <> userForm.templateComboBox Set multiPage.Pages.Visible = 0

我对使用 VBA 和 UserForms 还是很陌生，如果有人能指出我正确的方向，我将不胜感激。谢谢！

【问题讨论】：

标签： vba excel userform

【解决方案1】：

我会将此代码用于 ComboBox 更改事件：

Private Sub templateComboBox_Change()
    Dim p As MSForms.Page

    For Each p In MultiPage.Pages
        p.Visible = (p.Name = templateComboBox.Value)
    Next
End Sub

【讨论】：

这很完美！我该去了解 For/Next 语句了。谢谢！