Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

MultiPage - Pages ein- ausblenden, anwählen

Forumthread: MultiPage - Pages ein- ausblenden, anwählen

MultiPage - Pages ein- ausblenden, anwählen
30.12.2005 11:57:40
Andy
Hallo Ihr Excel-Profis,
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
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MultiPage - Pages ein- ausblenden, anwählen
30.12.2005 12:31:54
Peter
Hallo Andy,
so setzt du auf eine TextBox in der ersten MultiPage auf:
UserForm1.MultiPage1.Value = 0 ' Fokus auf 1. MultiPage setzen
UserForm1.TextBox1.SetFocus ' Fokus auf TextBox1 setzen
UserForm1.TextBox1.SelStart = 0 ' links im Feld aufsetzen
die Pages zählen immer ab NULL.
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
AW: MultiPage - Pages ein- ausblenden, anwählen
30.12.2005 12:59:16
Andy
Vielen Dank Jürgen,
aber wie blende ich die Reiter Nr. 4 und 5 aus?
Page4 = Page_Deckungslücke
Page5 = Page_Finanzierung
und dann wieder ein?
Das andere klappt, Danke
Grüße
Andy
AW: MultiPage - Pages ein- ausblenden, anwählen
30.12.2005 14:20:52
Peter
Hallo Andy,
bei Google habe ich folgendes gefunden:
Multipage sperren
Multipage1.Pages(1).Enabled = False
Wobei die erste Seite 0 ist!
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

MultiPage in Excel: Pages ein- und ausblenden


Schritt-für-Schritt-Anleitung

Um in einer Userform mit einer MultiPage in Excel bestimmte Pages auszublenden, folge diesen Schritten:

  1. Füge eine Userform mit einer MultiPage hinzu.

  2. Benenne die Pages entsprechend (z.B. Page_PersDaten, Page_Zusage, etc.).

  3. Füge den folgenden VBA-Code in das entsprechende Ereignis der Userform ein:

    With MultiPage1
       .Pages(0).Visible = True ' Page_PersDaten
       .Pages(1).Visible = True ' Page_Zusage
       .Pages(2).Visible = True ' Page_Rückdeckung
       .Pages(3).Visible = False ' Page_Deckungslücke
       .Pages(4).Visible = False ' Page_Finanzierung
    End With
  4. Stelle sicher, dass Du den richtigen Fokus auf die gewünschte TextBox setzt, um eine Eingabe zu ermöglichen:

    TxtBox_Name.SetFocus
  5. Teste die Userform, um sicherzustellen, dass die Pages wie gewünscht angezeigt oder ausgeblendet werden.


Häufige Fehler und Lösungen

  • Fehler: Die Page_PersDaten wird ausgeblendet.

    • Lösung: Überprüfe die Indexnummern der Pages. Diese beginnen bei 0, daher sollte Page_PersDaten die Indexnummer 0 haben.
  • Fehler: Pages lassen sich nicht anwählen.

    • Lösung: Stelle sicher, dass Du die Pages nicht mit Enabled = False sperrst, da dies die Interaktion mit den Pages in Excel beeinträchtigt.

Alternative Methoden

Eine andere Möglichkeit, Pages in einer MultiPage in Excel zu verwalten, besteht darin, die Enabled-Eigenschaft zu nutzen. Wenn Du eine Page vorübergehend deaktivieren möchtest, kannst Du folgenden Code verwenden:

MultiPage1.Pages(3).Enabled = False ' Deaktiviert Page_Deckungslücke

Um die Page wieder aktiv zu schalten, setze die Enabled-Eigenschaft auf True.


Praktische Beispiele

Hier sind einige praktische Anwendungsbeispiele für das Ausblenden und Aktivieren von Pages in einer MultiPage:

  1. Zugriff auf bestimmte Informationen: Wenn Du Daten nur in bestimmten Pages erfassen möchtest, kannst Du die nicht benötigten Pages ausblenden, um den Benutzer nicht abzulenken.

  2. Schrittweise Eingabe: Verwende CommandButtons, um zwischen Pages zu navigieren und dabei nur die benötigten Informationen anzuzeigen.

    Private Sub CommandButton1_Click()
       MultiPage1.Value = 1 ' Wechselt zu Page_Zusage
    End Sub

Tipps für Profis

  • Denke daran, dass die Pages in einer MultiPage ab 0 gezählt werden. Achte darauf, dies bei der Programmierung zu berücksichtigen.
  • Verwende die Visible-Eigenschaft, um Pages zu verstecken oder anzuzeigen, anstatt die Enabled-Eigenschaft, wenn Du die Userform dynamisch gestalten möchtest.
  • Nutze die SetFocus-Methode, um den Fokus optimal auf die relevante Eingabefeld zu lenken, was die Benutzerfreundlichkeit erhöht.

FAQ: Häufige Fragen

1. Wie blende ich eine Page in einer Userform aus? Um eine Page auszublenden, setze die Visible-Eigenschaft auf False, wie im folgenden Beispiel:

MultiPage1.Pages(3).Visible = False ' Blendet Page_Deckungslücke aus

2. Kann ich Pages in einer MultiPage dynamisch hinzufügen oder entfernen? Ja, Du kannst Pages zur Laufzeit hinzufügen oder entfernen, indem Du die Methoden Add und Remove der MultiPage verwendest.

MultiPage1.Pages.Add "NeuePage"

Mit diesen Anleitungen und Tipps bist Du gut gerüstet, um mit MultiPages in Excel zu arbeiten und die Anzeige von Pages effektiv zu steuern.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige