Bonjour chers tous !
J'ai un problème lors de l'exécution de ma boucle For. En fait, j'ai créer un formulaire d'inscription et je veux contraindre l'utilisateur à cocher au moins checkbox pour sélectionner une feuille; au nombre de 12 dans le cas présent donc 12 checkbox également. Le Code que j'utilise est :
For i = 1 To 12
If Me.Controls("CheckBox" &) = True Then
Coché = True
pour pouvoir ainsi recupérer le nom de la feuille automatiquement mais ça ne marche pas.lors de l'exécution le & est souligné par le débogueur et du coup je suis obligé de répéter la condition 12 fois pour que ça marche ce qui alourdi le code.
Quelqu'un pourrait-il me proposer quelque chose de mieux ?
Cordialement
A voir également:
Comment creer une boucle for qui recupère automatiquement le nom
vb95
Messages postés3441Date d'inscriptionsamedi 11 janvier 2014StatutContributeurDernière intervention 3 décembre 2023165 Modifié par vb95 le 19/07/2016 à 23:45
Bonjour
A tester
for i = 1 to 12 if Me.Controls("CheckBox" & Cstr(i)) = True Then Coche = True Exit For ' on en coche qu'une seule End If Next
Evites de mettre des accents : Coche et non Coché
si cela ne convient pas explique ton cas plus clairement
La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.