dthuler
Messages postés121Date d'inscriptiondimanche 9 mars 2003StatutMembreDernière intervention29 avril 2009 30 nov. 2004 à 13:18
Faut préciser, c'est pas du tout le même environnement...
T'as bien vérifié les propriétés de tes checkboxes ? elles doivents être CheckBox1, CheckBox2, CheckBox3... car à ma connaissances les groupes de contrôle n'existent pas sous vba...
Bref, utilise la boucle for each proposée plus haut par exemple comme ceci;
ChkValue = CheckBox1.Value
MsgBox ChkValue
Dim Ctrl As Control
For Each Ctrl In UserForm1.Controls
If Left(Ctrl.Name, 8) = "CheckBox" Then
Ctrl.Value = ChkValue
End If
Next
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 30 nov. 2004 à 12:53
Salut,
Le deuxieme code posté fonctionne si les checkbox a coche s appelle Checkbox et ont ete creer comme tableau de controle (copie coller d une check box deja existante).
As tu verifie que toutes tes checkbox a coche s appelaient bien pareil et que leur propriete index allait de 1 a 7?
@+
Julien
-----------------------------------------------------------
:big) Essai ca sinon on trouvera autre chose ;)
-----------------------------------------------------------
cs_karamasof
Messages postés11Date d'inscriptionlundi 29 novembre 2004StatutMembreDernière intervention 8 décembre 2005 30 nov. 2004 à 13:05
Désoler, j'ai corriger le Name en Value.
Mon problème reste que je travailler en vba sous excel et que la propriété index n'existe pas ou du moins je ne la trouve pas. Est ce qu'il y a une propriete qui pourrait remplacer l'index.