Super merci par contre si je veux modifier l'emplacement du x ou que ça supprime, est-ce qu'il faut que mette un Initialize au début?
modifie la macro comme ça,
Private Sub CommandButton1_Click()
For i = 1 To 7
If Me.Controls("CheckBox" & i) Then
Sheets("Feuil1").Cells(6 + i, "E") = "x"
Else
Sheets("Feuil1").Cells(6 + i, "E") = ""
End If
Next
End Sub