vba - Excel VBA 用户窗体控件

Question

大家早上好，

我在 Excel 用户窗体中有一个组合框和一个多页。我想创建的是一个 Sub，它基本上将所有多页页面的可见性设置为 0，其中名称不等于 ComboBox 选择，但我遇到了困难。

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

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

Answer 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