Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Passer d'une page à une autre d'un UserForm multipage avec un bouton commande

hamza.arif

XLDnaute Nouveau
Bonjour,

Après qlqs échecs je me tourne vers vous

Contexte : Je souhaite créer un UserForm Multipage où chaque page est une catégorie de données à remplir par l'utilisateur.

Objectif : Je veux pouvoir passer d'une page (disons Page1) de l'UF à une autre page (disons Page2) à l'aide d'un bouton (disons CommandeButton1), une fois que l'utilisateur a rempli les cases de la Page1.

Voici ce que j'ai essayé en plaçant CommandButton1 dans la page1 :

VB:
Private Sub CommandButton1_Click()
    Load Page2
    Page2.Show
End Sub
Mais cela ne fonctionne pas (erreur d'exécution 424 : Objet requis).

Avez vous des pistes de solution svp ?
 

patricktoulon

XLDnaute Barbatruc
re
bonjour
VB:
Private Sub plus_Click()
    With Me.MultiPage1
        .Value =application.min(.Value+1, .Pages.Count - 1)
    End With
End Sub

Private Sub moins_Click()
    With Me.MultiPage1
        .Value =application.max(.Value-1, 0)
    End With
End Sub
 

soan

XLDnaute Barbatruc
Inactif
Bonjour,

C'est marrant je tombe sur la même demande sur un autre forum

Je suis nouveau, on a le droit de faire ça sur ce forum ?

pas exactement : ça s'appelle du "crossposting", ou encore du "multipost", et éthiquement parlant, c'est plutôt très mal perçu par les contributeurs : ils ont l'impression d'avoir bossé pour rien sur l'exo du demandeur si celui-ci a déjà obtenu une solution valable sur un autre forum !

en plus, bien souvent, le demandeur n'avertit pas qu'il a obtenu une solution ailleurs ➯ les contributeurs continuent à chercher inutilement une solution à un exo déjà résolu !​

soan
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…