关于UserForm中MultiPage控件的禁用及事件定位问题

1. 能否禁用MultiPage的用户切换？ #

可以，常用两种实现方式：

• 方法一：直接禁用控件
  设置Me.MultiPage1.Enabled = False，控件会灰显，用户无法点击切换标签页，但代码仍可通过修改Value属性控制页面切换。
• 方法二：拦截切换动作（保留控件外观）
  给MultiPage添加Change事件，当用户尝试切换时强制切回目标页面：

  Private Sub MultiPage1_Change()
      ' 固定在指定页面（索引从0开始，示例为第一页）
      Me.MultiPage1.Value = 0
  End Sub
  

  这种方式控件外观正常，但用户点击标签页不会触发切换，适合需要保持界面美观的场景。

2. 替代Me.MultiPage1.Value = 1的代码？ #

其实无需替代——即使MultiPage被禁用，代码仍然可以通过Value属性切换页面。如果是为了防止用户误操作，搭配上面的禁用/拦截方法后，直接保留Me.MultiPage1.Value = 1即可实现代码控制切换。

如果一定要用其他方式，可通过Pages集合的Visible属性实现，但效率不如Value属性直接：

' 仅显示第二页（索引为1），隐藏其他页面
Dim pg As Page
For Each pg In Me.MultiPage1.Pages
    pg.Visible = (pg.Index = 1)
Next pg

推荐优先使用Value属性，简洁高效。

3. 事件列表中找不到MultiPage的名称，如何定位？ #

按以下步骤操作：

• 在VBA编辑器的UserForm设计视图中，选中目标MultiPage控件。
• 按下F4打开属性窗口，查看控件的Name属性（默认是MultiPage1，若修改过则取实际名称）。
• 切换到代码窗口，在左侧的对象下拉框中选中该MultiPage的名称，右侧事件下拉框就会显示它所有可用事件（如Change、Click等）。

如果仍找不到，可手动输入事件过程：比如控件名为MultiPage1，直接输入Private Sub MultiPage1_Change()并回车，VBE会自动补全事件框架。

内容的提问来源于stack exchange，提问作者user22924278