[VBA Excel]. Pb de mise à jour de UserForm (c [Résolu/Fermé]

Signaler
Messages postés
2
Date d'inscription
mercredi 16 août 2006
Statut
Membre
Dernière intervention
16 août 2006
-
Messages postés
2
Date d'inscription
mercredi 16 août 2006
Statut
Membre
Dernière intervention
16 août 2006
-
Bonjour

J’ai un petit Pb dans la mise à jour d’une feuille UserForm :

Je voudrais que l’intitulé CheckBox13 puisse évoluer (sur la même ligne de code) en CheckBox 23, CheckBox 33…etc


Ecran_Accueil.CheckBox13.Caption = TabValeurs(CompteurLigne3, 1)
(CompteurLigne3 s’incrémente de 1 par une boucle ; TabValeurs est un tableau dynamique)


J’ai essayé le code ci-dessous, mais "CheckBox" n’est pas reconnu et plante la macro :

CheckBox = ("CheckBox" ) & (CompteurLigne3) & ("3" ) >>> La valeur de CheckBox est « CheckBox13 »

Ecran_Accueil.CheckBox.Caption = TabValeurs(CompteurLigne3, 1)

Je suis preneur de toutes méthodes simples et efficaces pour résoudre ce petit pb.

A+

ExcelMans

2 réponses

Messages postés
1844
Date d'inscription
mercredi 19 janvier 2005
Statut
Membre
Dernière intervention
18 mai 2021
1 454
Salut ExcelMans,

Tous les contrôles (CheckBox, ComboBox, ListBox, etc.) d'un UserForm font partie de la collection Controls, et peuvent être désignés par leurs noms.

Si tu as la valeur 13 dans l'indice I, CheckBox13 peut être désigné aussi par :
Controls("CheckBox" & I).

Ça devrait t'aider pour ton PB...
2
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
2
Date d'inscription
mercredi 16 août 2006
Statut
Membre
Dernière intervention
16 août 2006

Je viens de tester cette solution, et elle marche bien aussi, car par ailleurs on m'a indiqué la solution ci-dessous qui fonctionne également :

Dim checkBox As String

CheckBox = "CheckBox" & CompteurLigne3 & "3"

Ecran_Accueil.Controls(chexkBox).Object.Caption = TabValeurs(CompteurLigne3, 1)

De cette façon à chaque passage de boucle incrémentant "CompteurLigne3" je Documente une nouvelle CheckBox : CheckBox13, puis CheckBox23, puis CheckBox33, ...etc.

Merci de ton aide Armojax

A+