启动用户窗体多页到一个特定的页面

Question

我有一个名为SheetBox用户窗体

SheetBox包含了3页多页窗

用于选择表“第1页”导入
“第2页”包含伪 进度条
“page3”用于选择要保护的工作表

我现在需要的是在打开的工作表上单击按钮时用户窗体打开特定网页的方法

例如：
ImportBttn打开窗体的第一页
ProtctBttn打开窗体

的第3页

我正在这样做，以减少我需要创建的用户窗体的数量，而不是创建3个单独的用户窗体。这也有助于减少文件大小。

Answer 1

在用户窗体Initialise事件，用Application.Caller检测所按下的工作表上的按钮，然后将multipage

Private Sub UserForm_Initialize() 
Select Case Application.Caller 
Case "ImportBttn" 
`1st tab 
Me.MultiPage1.Value = 0 
Case "ProtctBttn" 
`3rd tab 
Me.MultiPage1.Value = 2 
End Select 
End Sub 

Answer 2

这工作太

Sub ImportBttn_Click() 
Load SheetBox: SheetBox.MultiPage1.Value = 0: SheetBox.Show 
End Sub 

Sub ProtctBttn_Click() 
Load SheetBox: SheetBox.MultiPage1.Value = 2: SheetBox.Show 
End Sub 

这个负载sheetbox第一，变化多页页面，并显示它之后

但感谢您的调用方法，将有用的时候我n知道按下哪个按钮