Multipage

[rudymagny]

Bonjour le forum,
Une petie question sur un multipage que j'ai dans mon userform.
Comment fais t on pour appeler une page de ma multipage;

pour appeler mon USF:
USF.show

mais pour une page de ma multipage, comment fait on?

Merci d'avance

 

[MichelXld]

bonjour

pour par exemple se positionner sur la page 3 lors de l'ouverture de l'USF

Private Sub userForm_Initialize()
userForm1.multiPage1.Value = 2
End Sub

0=première page
1=deuxième page
2=troisième page
...etc...


bon apres midi
MichelXld

 

[rudymagny]

Bonjour MichelXLD!
Merci de ta réponse.

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

Merci

 

[MichelXld]

rebonsoir

désolé mais je n'ai pas compris ton message


à tout hasard tu peux essayer

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


bonne soiree
MichelXld

 

[rudymagny]

Nan c bon c bien ma page 1 que j'appel mais je veux que page 0 redevienne référence après.
ça marche bien comme ça merci MichelXLD