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

Utiliser GroupName avec CheckBoxes

  • Initiateur de la discussion Initiateur de la discussion JerCaz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

JerCaz

Guest
Bonjour le forum

Dans un userform, j'ai une trentaine de CheckBoxes pour lesquelles j'ai attribué le même GroupName.

Je souhaiterais qu'en fonction d'une certaine condition, toutes les CheckBoxes faisant partie de mon groupname (que j'ai appelé par exemple toto) passent en statut Enabled à False, et que le Value passe à True.

Est-ce possible?

J'ai déjà essayé ceci, sans succès:
toto.GroupName.Enabled = False (ça ne fonctionne pas...)
GroupName.toto.Enabled = False (ça ne fonctionne pas...)
GroupName("toto").Enabled = False (ça ne fonctionne pas...)


Quelqu'un aurait-il une idée pour m'aider à trouver la bonne syntaxe?

P.S. : vous l'aurez sûrement compris en voyant le type de question que je pose, mon niveau en VBA est à peine au dessus des paquerettes.... Et c'est pas faute d'avoir cherché sur Google!


Un grand merci par avance pour votre aide !!!!
 
Re : Utiliser GroupName avec CheckBoxes

Bonjour JerCaz, bonjour le forum,

Peut-être comme ça :
Code:
Dim ctrl As Control 'déclare la varialbe ctrl (ConTRôLe)
For Each ctrl In Me.Controls 'boucle sur tous les contrôles de l'Userform
    'si le nom de groupe du contrôle ="toto", coche (ou décoche en mettant "False") le contrôle
    If ctrl.GroupName = "toto" Then ctrl.Value = True
Next ctrl 'prochain contrôle de la boucle
 
Re : Utiliser GroupName avec CheckBoxes

Bonjour,
"GroupName" est une propriété non une méthode
De plus, cette propriété n'est pas faite pour ça, tu peux aussi bien utiliser la propriété "Tag", mais dans tous les cas :
Code:
Dim ctl As Control
For Each ctl In Controls
    On Error Resume Next 'tous les controles n'ont pas de propriété GroupName
    If ctl.GroupName = "Toto" Then ctl.Enabled = False
Next
A+
kjin
 
Re : Utiliser GroupName avec CheckBoxes

Re-bonjour le forum,
bonjour Robert, et bonjour Kjin,

Un grand merci à vous deux pour votre aide, et merci pour la précision apportée concernant la propriété et non la méthode. C'est donc pour cela que ça ne pouvait pas fonctionner comme je voulais le faire.

Encore merci!
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…