MultiPage - Pages ein- ausblenden, anwählen
30.12.2005 11:57:40
Andy
ich habe in einer Userform eine MultiPage mit 5 Pages eingefügt.
Ich will die Userform starten und dabei 2 der Pages (Nr 4 und 5) ausgeblendet lassen um erst Daten in die anderen 3 verbleibenden Pages eintragen zu lassen.
Page1 = Page_PersDaten
Page2 = Page_Zusage
Page3 = Page_Rückdeckung
Page4 = Page_Deckungslücke
Page5 = Page_Finanzierung
Ich habe folgendes versucht:
With MultiPage1
Eingabe.MultiPage1.Pages(Page_PersDaten).Visible = True
Eingabe.TxtBox_Name.SetFocus
Eingabe.MultiPage1.Pages(Page_Zusage).Visible = True
Eingabe.MultiPage1.Pages(Page_Rückdeckung).Visible = True
Eingabe.MultiPage1.Pages(Page_Deckungslücke).Visible = False
Eingabe.MultiPage1.Pages(Page_Finanzierung).Visible = False
End With
Leider blendet sich komischerweise die Page_PersDaten aus.
Weiß jemand warum, oder kann mir jemand weiterhelfen?
Wie kann ich denn die Pages mit einem Befehl anwählen? (ich möchte einen CommandButton auf die Pages setzen und damit eine Page nach der anderen anwählen)
Vielen Dank im voraus.
Liebe Grüße
Andy