VBA - UserForm mit Multipage in Tabelle einbinden
#1
Hallo Excel-Experten,

 ich habe einen Formular mit 3 Seiten in VBA erstellt und möchte dieses 

jetzt im Tabellenblatt mit Page 1 aufrufen

Bitte um um Hilfe. Was fehlt hier noch? 

Option Explicit

Sub Schaltfläche1_Klicken()
    UserForm1.Show
End Sub



In meiner Maske Über den Button funktioniert es problemlos (siehe unten)


Private Sub CommandButton5_Click()
Me.MultiPage1.Value = 1
End Sub


Vieln Dank im Voraus!

Gruß 
Rolf
Top
#2
Es fehlt etwas zu viel:

Diese code recht:

Code:
Private Sub Schaltfläche1_Klicken()
    UserForm1.Show
End Sub
Top
#3
mit dem Code kann ich leider nicht die gewünschte Multipage aufrufen :( und komme damit nicht weiter
Top
#4
Hallo Rolf,

das regelst Du in der Userform selbst:

Code:
Private Sub UserForm_Activate()
 Me.MultiPage1.Value = 0
End Sub

Gruß Uwe
Top
#5
Hallo Uwe,

vielen Dank für deine Hilfe, dies hat mich natürlich weiter gebracht. In der Userform hab ich jetzt folgenden Code: 

Code:
Private Sub UserForm_Initialize()
   Select Case Application.Caller
   Case "ImportBttn"
      Me.MultiPage1.Value = 1
   Case "ProtctBttn"
      Me.MultiPage1.Value = 0
   End Select
End Sub

im Modul:

Code:
Option Explicit
Sub ImportBttn_Click()
    Load UserForm1: UserForm1.MultiPage1.Value = 0: UserForm1.Show
End Sub

Sub ProtctBttn_Click()
    Load UserForm1: UserForm1.MultiPage1.Value = 1: UserForm1.Show
End Sub

Jetzt kann ich die gewünschten Page's zwar aufrufen, aber in der Combobox die erste Page ist leider ohne Funktion (siehe Screen). Hast Du vielleicht dazu eine Lösung oder einen Vorschlag?

 [img]
Dateiupload bitte im Forum! So geht es: Klick mich!
]

Gruß
Rolf
Top
#6
Hallo Rolf,

entscheide Dich erst einmal für eine Variante der Page-Anwahl. Momentan widersprechen sich die beiden nämlich auch noch! Wink
Ob das ComboBox-Problem damit zu tun hat, kann ich jedoch aus der Ferne nicht sagen.

Gruß Uwe
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste