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 :

CheckBox cochée ou pas, mais dans le ruban


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de DenisHen
    Homme Profil pro
    Dessinateur / projeteur
    Inscrit en
    Novembre 2013
    Messages
    415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Yonne (Bourgogne)

    Informations professionnelles :
    Activité : Dessinateur / projeteur
    Secteur : Bâtiment Travaux Publics

    Informations forums :
    Inscription : Novembre 2013
    Messages : 415
    Par défaut CheckBox cochée ou pas, mais dans le ruban
    Bonjour à la communauté...

    Voilà, n'ayant rien trouvé, je me permets cette petite question.

    Comment, dans un code VBA d'une Sub quelquonque, on peut savoir si le CheckBox du ruban est à Vrai ou Faux ?

    Voici un petit extrait de mon XML :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    <checkBox id="LstChk1" label="Recherche aussi les Archives" onAction="XmlChkArchive"/>
    Et ma Sub qui le contrôle :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Sub XmlChkArchive(control As IRibbonControl, pressed As Boolean)
        If pressed = True Then
            Range("CleArchives").Value = "Oui"    'Archives actives
        Else
            Range("CleArchives").Value = "Non"    'Archives inactives
        End If
    End Sub
    Mais j'aimerais surtout interroger la valeur du CheckBox depuis une autre Sub...

    Si quelqu'un a un conseil ou une astuce, je suis preneur...

    Denis...

  2. #2
    Expert confirmé
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2013
    Messages
    3 609
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Alimentation

    Informations forums :
    Inscription : Mai 2013
    Messages : 3 609
    Par défaut
    Bonjour,

    Une solution serait de créer une ou des variables booléennes en Public auxquelles tu te réfères dans ton programme.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Public MaVar as boolean
    Sub XmlChkArchive(control As IRibbonControl, pressed As Boolean)
        If pressed = True Then
            MaVar = True
        Else
            MaVar = False
        End If
    End Sub

  3. #3
    Membre éclairé Avatar de DenisHen
    Homme Profil pro
    Dessinateur / projeteur
    Inscrit en
    Novembre 2013
    Messages
    415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Yonne (Bourgogne)

    Informations professionnelles :
    Activité : Dessinateur / projeteur
    Secteur : Bâtiment Travaux Publics

    Informations forums :
    Inscription : Novembre 2013
    Messages : 415
    Par défaut
    Bonjour, et merci pour cette réponse.

    Maintenant, mon problème est de savoir comment connaitre cette variable lors de l'ouverture du XLSM.

    Merci encore...

    Denis...

  4. #4
    Expert confirmé
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2013
    Messages
    3 609
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Alimentation

    Informations forums :
    Inscription : Mai 2013
    Messages : 3 609
    Par défaut
    Dans ton XML tu as donné un nom à ton ruban
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="NomDuRuban_onLoad">
    Dans ton code, tu peux utiliser la méthode
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Sub NomDuRuban_onLoad(ribbon As IRibbonUI)
       ....
    End Sub
    Quand tu coches/décoches, tu peux mettre la valeur Vrai/Faux dans un onglet masqué (si nécessaire)

  5. #5
    Membre éclairé Avatar de DenisHen
    Homme Profil pro
    Dessinateur / projeteur
    Inscrit en
    Novembre 2013
    Messages
    415
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Yonne (Bourgogne)

    Informations professionnelles :
    Activité : Dessinateur / projeteur
    Secteur : Bâtiment Travaux Publics

    Informations forums :
    Inscription : Novembre 2013
    Messages : 415
    Par défaut
    Bonjour parmi, et merci pour ton aide.

    En fait, mon ruban n'avait pas de nom...

    Mais comment fixer la variable "pressed" dans un Sub qui n'en n'a pas ?

    Merci encore.

    Denis...

Discussions similaires

  1. [MySQL] Liste déroulante selon checkbox coché ou pas.
    Par Nicolas_k dans le forum PHP & Base de données
    Réponses: 9
    Dernier message: 24/02/2010, 12h32
  2. [HTMLDocument]checkbox coché ou pas ?
    Par Invité dans le forum AWT/Swing
    Réponses: 1
    Dernier message: 10/02/2006, 10h31
  3. checkbox coché ou pas ?
    Par kcizth dans le forum Général JavaScript
    Réponses: 2
    Dernier message: 06/02/2006, 10h16
  4. Réponses: 9
    Dernier message: 12/01/2005, 17h00

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