OVH Cloud OVH Cloud

UserForm multipages

3 réponses
Avatar
Jacklyne
Bonjour à toutes et à tous,
Comment avec un bouton passer d'une page à l'autre dans un UF ? (Est-ce
possible?)
Windows XP
Excel 2003
Avec mes remerciements

3 réponses

Avatar
Michel Pierron
Bonjour Jacklyne;
Naturellement, avec un bouton en dehors du multipage

en tête du module Userform:
Private i As Byte

Private Sub CommandButton1_Click()
If i = Me.MultiPage1.Pages.Count Then i = 0
Me.MultiPage1.Value = i
i = i + 1
End Sub

MP

"Jacklyne" a écrit dans le message de news:

Bonjour à toutes et à tous,
Comment avec un bouton passer d'une page à l'autre dans un UF ? (Est-ce
possible?)
Windows XP
Excel 2003
Avec mes remerciements




Avatar
Pat Rednef
Bonjour Jacklyne

Tu peux auusi l'incorporer au UF, par exemple en cliquant sur une case
à cocher, tu souhaites faire apparaitre la deuxième page pour etc etc
etc...

Tu ajoute dans ton code de case à cocher:
MultiPage1.Value = 1 (verifier les numéro, sur mes UF chaque 1ere
page, value = 0, 2eme page, value = 1 etc..)

En espèrant t'aider

Pat
Avatar
Jacklyne
Merci beaucoup
Bonne soirée
"Michel Pierron" a écrit dans le message de news:
#yxA#
Bonjour Jacklyne;
Naturellement, avec un bouton en dehors du multipage

en tête du module Userform:
Private i As Byte

Private Sub CommandButton1_Click()
If i = Me.MultiPage1.Pages.Count Then i = 0
Me.MultiPage1.Value = i
i = i + 1
End Sub

MP

"Jacklyne" a écrit dans le message de news:

Bonjour à toutes et à tous,
Comment avec un bouton passer d'une page à l'autre dans un UF ? (Est-ce
possible?)
Windows XP
Excel 2003
Avec mes remerciements