Bonjour à tous,
Pour du traitement de données j'ai créer un userform avec 8 checkbox à cocher,
et je vient remplir un tableau avec des X a partir de la colonne H pas rapport au checkbox qui on été cocher
la boucle que j'ai créer
Private Sub CommandButton1_Click()
Dim i As Integer
Dim c As Integer
derlign = Sheets("Suivi").Range("A65536").End(xlUp).Row + 1
With Sheets("Suivi")
For i = 1 To 8
For c = 8 To 15
If Controls("CheckBox" & i) Then 'Si coché
Sheets("Suivi").Cells(derlign, c) = "X"
End If
Next c
Next i
End With
Unload Me
End Sub
Mon problème c'est qu'il me copie le x même si le checkbox na pas été coché