comment creer une boucle for qui recupère automatiquement le nomRésolu

Question

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

vb95 · Answer

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 IfNext 

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.

TSAF16 · Answer

Bonjour VB95. Merci pour le code il fonctionne à merveille ! Mon problème est résolue à 100%
Bien à toi, TSAF16

Comment creer une boucle for qui recupère automatiquement le nom

2 réponses

Votre réponse

Discussions similaires