Question

我有一个包含8个标签的multitab的userform。我要求用户在选项卡6上使用复选框。如果未选中复选框1和复选框2，我将尝试禁用用户选择下一个选项卡（选项卡7）。如果他们选择两个复选框中的一个，他们应该只能访问下一个选项卡。

Private Sub MultiPage1_Change()
If Failed1.Value = False Or Passed1.Value = False Then
Me.MultiPage1.Pages(7).Enabled = False
Exit Sub
ElseIf Failed1.Value = True Or Passed1.Value = True Then
Me.MultiPage1.Pages(7).Enabled = True
End If
End Sub

我无法让代码按照我想要的方式工作。任何帮助将不胜感激。

仅供参考 - 我是VBA n00b。

Answer 1

Me.MultiPageName.Pages（index）.enabled = false

Me =存在多页的活动表格 MulitipageName =命名多页索引=要从以下位置复制的页面位置：http://www.excelforum.com/excel-programming-vba-macros/534056-is-it-possible-to-disable-a-tab-page-on-a-multipage-userform.html

根据Checkbox值 - EXCEL禁用/启用Multitab上的Tabstrip

1 个答案: