excel 用户表单中的多标签页

Question

我有一个跨页 sheet，其中有两个作品sheet，名为 "Page 1" 和 "Page 2"。我还有一个带有多页控件的用户表单，其中包含两个名为：Page 1 和 Page 2 的选项卡（如 worksheets）。我的目标是能够单击名为 "Page 1" 和 VBA 的选项卡以立即显示名为 "Page 1" 的作品 sheet 或名为 "Page 2" 的选项卡的内容VBA 立即显示名为 "Page 2" 的作品sheet 的内容。我对 Google 做了很多研究，但似乎没有办法完成我上面描述的事情。我还录制了一个宏，但我认为不可能将它分配给第 1 页、第 2 页选项卡（请参见下文）。您有什么建议吗？感谢您的帮助，谢谢。

 Sub Macro3()
 Sheets("Page 1").Select
 End Sub

Answer 1

您需要在 User_Form 模块中添加以下代码，在您的 MultiPage 对象中，在 Change 事件中。

您想 Activate 根据您的 SelectedItem.Caption（而不是 .Name）工作表

代码

Private Sub MultiPage1_Change()

    ' activate the sheet according to the caption of the multi-page selected item
    Worksheets(MultiPage1.SelectedItem.Caption).Activate

End Sub

Multi-Page对象screen-shot:

编辑 1：将 screen-shot 添加到您的 post:

excel 用户表单中的多标签页

Multitab pages in excel userform

excel

vba

userform