Bonjour à tous,

voila,je voulais savoir si cela etait possible
d'ameliorer mon code
sur une feuille, j'ai 10 boutons sur une ligne differente à chaque fois (ligne 9 à 19)
ce bouton ouvre un useform dans lequel il y a ceci comme code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub Valider_Click()
 
  If CheckBox1.Value = True Then 'Si coché ...
       Range("f9") = "NOK"
    Else 'Si non coché ...
       Range("f9") = "OK"
    End If
 
  If checkbox2.Value = True Then 'Si coché ...
       Range("g9") = "NOK"
    Else 'Si non coché ...
       Range("g9") = "OK"
    End If
 
  If CheckBox3.Value = True Then 'Si coché ...
       Range("h9") = "NOK"
    Else 'Si non coché ...
       Range("h9") = "OK"
    End If
 
  If CheckBox4.Value = True Then 'Si coché ...
       Range("i9") = "NOK"
    Else 'Si non coché ...
       Range("i9") = "OK"
    End If
 
Range("j9").FormulaLocal = "=aujourdhui()"
Unload Me 'Fermeture
 
End Sub
donc j'ai actuellement 10 userform differents pour chacun de mes boutons pour chaque ligne.

ma question est simple
y a-t-il un autre moyen pour utiliser un seul userform pour tous mes boutons ?

Merci d'avance