Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1468to1472
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Multipage

Multipage
24.01.2016 02:49:56
ludmila

Hallo,
ich habe eine UF mit einer MultiPage1 mit 3 Seiten.
Wenn nun Seite 3 ausgewählt wird und Tabelle "A1" leer ist soll wieder Seite 1
aufgerufen werden.
Zwar wird der Reiter Seite 1 angezeigt, jedoch nicht die Steuerelemente in Seite 1.
Es bleiben die Steuerelemente in Seite 3 sichtbar.
Was mache ich falsch?
Danke!
Gruß
Ludmila

Private Sub MultiPage1_Change()
Select Case MultiPage1.Value
Case 0: 'Adresse
MsgBox "Adresse"
Case 1:   'bl
MsgBox "bl"
Case 2:  'Data
With Tabelle1
If Cells(1, 1) = "" Then
MultiPage1.Pages(2).Visible = False
MultiPage1.Value = 0
End If
End With
End Select
End Sub

Private Sub UserForm_Initialize()
MultiPage1.Value = 0
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Multipage Seitenwechsel
24.01.2016 09:56:37
Christian
Hallo Ludmila,
innerhalb des MultiPage-Change-Ereignisses kannst du keinen neuen Change aufrufen.
Ein Workarround:
in ein allg. Modul:
Sub BackToPage1()
UserForm1.MultiPage1.Value = 0
End Sub
und in deinem MultiPage1.Change:
...
Case 2:  'Data
With Tabelle1
If .Cells(1, 1) = "" Then
Application.OnTime Now, "BackToPage1"
End If
End With
Grüße
Christian

AW: Super, Danke Christian! (o.T)
24.01.2016 10:32:34
ludmila
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige