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 :

Astuce Avoir différents groupes d'OptionButton sur une même feuille Excel


Sujet :

Macros et VBA Excel

Mode arborescent

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre régulier
    Femme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Mai 2019
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Morbihan (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : Mai 2019
    Messages : 5
    Par défaut Astuce Avoir différents groupes d'OptionButton sur une même feuille Excel
    Comme je ne trouvais pas comment dissocier des groupes d'OptionButton sur une même feuille Excel, j'ai décider d'utiliser des CheckBox gérées par des macros.
    Nom : CheckBox.png
Affichages : 398
Taille : 1,9 Ko

    Enregistreé en Objet de ma feuille excel
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Private Sub CheckBox1_Click()
        Macro26
    End Sub
    Private Sub CheckBox2_Click()
        Macro27
    End Sub
    Private Sub CheckBox3_Click()
        Macro28
    End Sub
    Enregistré en macro
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Sub Macro26()
        If Sheets("Création").CheckBox1.Value = True Then
           Sheets("Création").CheckBox2.Value = False
           Sheets("Création").CheckBox3.Value = False
        End If
    End Sub
     
    Sub Macro27()
           Sheets("Création").CheckBox1.Value = False
           Sheets("Création").CheckBox3.Value = False
        End If
    End Sub
     
    Sub Macro28()
        If Sheets("Création").CheckBox3.Value = True Then
           Sheets("Création").CheckBox1.Value = False
           Sheets("Création").CheckBox2.Value = False
        End If
    End Sub
    Images attachées Images attachées  

Discussions similaires

  1. [XL-2016] Imprimer plusieurs titres sur une même feuille Excel
    Par ben_diop dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 09/07/2018, 19h17
  2. [XL-2010] Multi tableau sur une même feuille excel
    Par nath753 dans le forum Excel
    Réponses: 1
    Dernier message: 14/11/2016, 15h36
  3. Réponses: 7
    Dernier message: 04/06/2015, 12h23
  4. Réponses: 0
    Dernier message: 13/01/2012, 10h23
  5. Réponses: 4
    Dernier message: 26/05/2006, 15h30

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