MultiPage Seite nur mit Bedingung wechseln
22.02.2018 18:58:34
Sigi
in einer MultiPage mit 6 Seiten möchte ich das Wechseln der zu den Seiten 2-4 verhindern wenn kein Eintrag in Seite1 Textbox1 erfolgt ist.
Es wird zwar der Reiter angezeigt jedoch nicht die Seite1.
Danke!
Gruß, Sigi
Private Sub MultiPage1_Change()
Select Case MultiPage1.Value
Case Is = "1", "2", "3"
If TextBox1.Value = "" Then ' in Pages(0)
MultiPage1.Value = 0
Exit Sub
End If
Case Is = "5", "6"
End Select
End Sub