Cases à cocher VBA userform

Bonjour à tous,

Une question qui me parait assez simple mais sur laquelle je bloque...

J'ai un userform avec plusieurs cases à cocher et je souhaiterai faire apparaître toutes les "caption" des cases coché dans une même cellule.

J'ai essayé le code suivant mais seul la dernière case coché apparaît dans la cellule.

For i = 1 To 9
        If Controls("checkBox" & i) Then Range("a2") = Controls("checkBox" & i).Caption
Next i

Merci de votre aide !!

Hello,

Plutot comme ceci :

For i = 1 To 9
        If Controls("checkBox" & i) Then Range("a2") = Range("a2") & ", " & Controls("checkBox" & i).Caption
Next i

Cela marche parfaitement.

Merci beaucoup!!