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