Start userform multipage in einer bestimmten Seite

Ich habe eine Userform namens SheetBox

SheetBox enthält einen 3-Seite mehrseitige Fenster

"page1" für die Auswahl von Blättern zu importieren
"page2" enthält eine pseudo -
progress bar
"page3" für die Auswahl der Blätter zu schützen

Was ich jetzt brauchen, ist eine Methode zum öffnen einer bestimmten Seite, die beim öffnen der Userform, wenn eine Taste auf ein Arbeitsblatt geklickt wird

ex:

ImportBttn öffnet Seite1 von userform

ProtctBttn öffnet page3 der userform

Ich bin auf diese Weise reduzieren Sie die Anzahl der userform, die ich brauchte, um zu erstellen, anstatt die Erstellung von 3 separaten userforms. Dies hilft auch, reduzieren Sie die Dateigröße.

InformationsquelleAutor forums | 2013-02-12

  1. 8

    Dieser funktioniert auch

    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

    diese Lasten sheetbox erste, ändert sich die multipage-Seite und zeigt es danach

    aber danke für den Aufrufer der Methode, die nützlich sein wird, wenn ich brauche, um zu wissen, welche Taste gedrückt wird

    InformationsquelleAutor forums

  2. 5

    In der UserForms Initialise - Ereignis, verwenden Application.Caller zu erkennen, welche Schaltfläche auf dem Arbeitsblatt wurde gedrückt, und legen Sie dann die 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

    InformationsquelleAutor brettdj

Schreibe einen Kommentar