IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Syntaxe pour atteindre une feuille à partir d'un bouton d'une userform [Toutes versions]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Mars 2009
    Messages
    50
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2009
    Messages : 50
    Par défaut Syntaxe pour atteindre une feuille à partir d'un bouton d'une userform
    Bonsoir,

    Tout d'abord, je vous présente à tous mes meilleurs voeux pour la nouvelle année.

    Ma question est la suivante :

    J'ai créé un Userform à partir du Visual basic editor.

    Jusque là, tout va bien.

    Dans cet userform, j'ai inséré deux contrôles de type button.

    Ces deux boutons ont le nom par défaut, soit "CommandButton1" et "CommandButton2".

    Je ne les ai pas renommés.

    Dans le code du userform, voici ce que j'ai écris pour exécuter une action lorsque je clique sur le "CommandButton1" :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub CommandButton1_Click()
    MsgBox "Vous avez cliqué sur le CommandButton1"
    End Sub
    Jusque là, tout va bien, ça fonctionne.

    Seulement, pour le "CommandButton2", je souhaiterais qu'il m'envoie directement sur une feuille du classeur.

    J'ai utilisé le code suivant mais sans succès :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub CommandButton2_Click()
    Sheets("Feuil2").Select
    End Sub
    Quelqu'un pourrait t-il m'indiquer la bonne syntaxe à employer pour que ce bouton me permette d'atteindre une feuille donnée dans le classeur?

    Je vous remercie d'avance.

  2. #2
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    Et quel est le problème?
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Private Sub CommandButton2_Click()
    Sheets("Feuil2").Activate
    Unload Me 'décharge l'userform
    End Sub
    permet d'activer la feuille nommée Feuil2 et fermer l'userform

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Mars 2009
    Messages
    50
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2009
    Messages : 50
    Par défaut
    Merci Mercatog,

    Eh bien c'est tout simple !

    J'avais omis de déchargé le Userform.

    Ca fonctionne très bien désormais.

    Merci à toi.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 0
    Dernier message: 23/03/2015, 12h04
  2. Réponses: 6
    Dernier message: 21/04/2011, 15h03
  3. Réponses: 0
    Dernier message: 21/04/2011, 13h23
  4. afficher une fenêtre à partir d'un bouton d'une première fenêtre
    Par TERRIBLE dans le forum Windows Presentation Foundation
    Réponses: 1
    Dernier message: 12/05/2010, 19h52
  5. Réponses: 2
    Dernier message: 04/10/2006, 10h45

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo