Récuperation de la valeur de CheckBox

Résolu
Dudugris Messages postés 5 Date d'inscription   Statut Membre Dernière intervention   -  
Dudugris Messages postés 5 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour, je commence en vb.
J'ai creer un questionaire et je cherche a recupérer le resultat.
Ca marche avec les ComboBox mais pas avec les CheckBox !

mon code :
For i = 1 To 42
    If UserForm1.Controls("Combobox" & i) = "" Then
        Sheets("Resultat QCM").Cells(i + 4, Colonne) = "Pas de réponse"
    Else
        Sheets("Resultat QCM").Cells(i + 4, Colonne) = UserForm1.Controls("ComboBox" & i)
    End If
Next i

For i = 100 To 103
    If UserForm1.Controls("CheckBox" & i).Value = True Then
        Sheets("Resultat Formation").Cells(i + 4, Colonne) = "Oui"
    Else
        Sheets("Resultat Formation").Cells(i + 4, Colonne) = "Non"
    End If
Next i


Pouvez vous m'aider

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ICI

Merci d'y penser dans tes prochains messages.

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

exemple:

For i = 1 To 2
        If Me.Controls("Checkbox" & i) = True Then
            'code si cochee
        Else
            'code si pas cochee
        End If
    Next i
0
Dudugris Messages postés 5 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour

Avec un peut de retard, mais ça marche tres bien.
Merci
0