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 :

Option button et VBA [XL-2019]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Administrateur de base de données
    Inscrit en
    Février 2013
    Messages
    38
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2013
    Messages : 38
    Par défaut Option button et VBA
    Bonjour à tous,


    Dans une feuille Excel j'ai mis 2 optionButton (activeX)
    Je voudrais que en fonction du bouton selectionné une variable prenne la valeur 0 ou 1
    Puis r'envoyer cette valeur dans une autre macros.

    Malhereusement, je n'arrive pas a attribuer de valeur a ma variable.

    voici le code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Public Format As Integer
     
    Private Sub code_droit_click()
     
    If code_droit.Value = True Then Format = 1
     
    End Sub
    Private Sub code_incline_click()
     
    If Code_incline.Value = True Then Format = 0
     
    End Sub
    Une idée pour m'aider?

    merci

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par chevrotine56 Voir le message
    Je voudrais que en fonction du bouton selectionné une variable prenne la valeur 0 ou 1
    Puis r'envoyer cette valeur dans une autre macros.
    Pour que la variable puisse être utilisée dans plusieurs instructions, il faut la déclarer Public au niveau module.
    Lire ça : https://docs.microsoft.com/fr-fr/off...blic-statement

    Il serait plus simple d'envoyer la valeur dans une cellule où n'importe quelle macro pourrait la récupérer.
    Si les boutons d'option étaient de simples boutons de formulaire au lieu d'ActivX, ça pourrait même se faire sans macro.

  3. #3
    Membre averti
    Homme Profil pro
    Administrateur de base de données
    Inscrit en
    Février 2013
    Messages
    38
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2013
    Messages : 38
    Par défaut
    Pour que la variable puisse être utilisée dans plusieurs instructions, il faut la déclarer Public au niveau module.
    C'est ce que j'ai fait, mais je n'arrive pas a recuperer l'etat du boutton.

  4. #4
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 173
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 173
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Tous les contrôles formulaire à l'exception du CommandButton ont une propriété Cellule cible qui envoie la valeur renvoyée par le contrôle dans cette cellule
    Les contrôles "Bouton d'option" renvoient un numéro de 1 à x contrairement aux "Case à cocher" qui eux renvoient VRAI ou FAUX

    Il suffit donc par une simple formule de lire le contenu de cette cellule cible
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

  5. #5
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 173
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 173
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Je vois que cette discussion est résolue. Les intervenants en sont ravi mais un petit mot personnalisé le signalant aurait été le bienvenu.
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

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

Discussions similaires

  1. Option sur code vba déjà créé
    Par akmer dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 14/05/2008, 15h55
  2. option button non selectionné
    Par tomy7 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 04/03/2008, 11h47
  3. MSHFLEXGRID + option button
    Par sisina dans le forum VB 6 et antérieur
    Réponses: 9
    Dernier message: 23/02/2008, 20h39
  4. VBA Excel , récuperer la valeur des options buttons
    Par morgan47 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 27/06/2006, 14h25
  5. événement Click sur Check et option button ??
    Par badsepuku dans le forum IHM
    Réponses: 3
    Dernier message: 09/02/2006, 12h51

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