Comment creer une boucle for qui recupère automatiquement le nom [Résolu]

TSAF16 - 19 juil. 2016 à 23:24 - Dernière réponse :  TSAF16
- 20 juil. 2016 à 10:03
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
Afficher la suite 

Votre réponse

2 réponses

vb95 1567 Messages postés samedi 11 janvier 2014Date d'inscriptionContributeurStatut 20 mai 2018 Dernière intervention - Modifié par vb95 le 19/07/2016 à 23:45
0
Utile
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. 
Commenter la réponse de vb95
0
Utile
Bonjour VB95. Merci pour le code il fonctionne à merveille ! Mon problème est résolue à 100%
Bien à toi, TSAF16
Commenter la réponse de TSAF16

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.