Si par exemple, je veux retourner sur la page 1 de ma multipage:
test = MsgBox('Recalcul de l'indicateur terminé! Retour au menu?', vbYesNo)
If test = vbYes Then
Accueil.MultiPage1.Value = 1
Accueil.Show
ElseIf test = vbNo Then
Exit Sub
End If
le problème c'est que ma page 1 devient celle par défaut lorsque j'appel mon userform:
Accueil.show.
Faut il que je fasse ça pour que ma page par défaut soit la page 0:
test = MsgBox('Recalcul de l'indicateur terminé! Retour au menu?', vbYesNo)
If test = vbYes Then
Accueil.MultiPage1.Value = 1
Accueil.Show Accueil.MultiPage1.Value = 0
ElseIf test = vbNo Then
Exit Sub
End If
test = MsgBox('Recalcul de l'indicateur terminé! Retour au menu?', vbYesNo)
If test = vbYes Then
Accueil.MultiPage1.Value = 0
Accueil.Show
Else
Exit Sub
End If