XL 2010 1 click 2 cases cochées

[mic6259]

Bonjour a tous
D'après la pièce jointe, quand je click sur un numéro de 2 a 28, 2 cases sont cochées après c'est bon. Serait-il possible de régler ce problème de façon a ce que quand je click 1 fois une seule case soit cochée ainsi de suite.
Merci beaucoup

 

[Phil69970]

Bonjour @mic6259, le forum

Il faut bloquer le tabindex de tes textbox
Remplace ta "Sub UserForm_Initialize()" par celle ci.

Private Sub UserForm_Initialize()
Randomize
Range("D1:D28").Clear
Dim i As Byte
For i = 1 To 28
    Me.Controls("TextBox" & i).TabStop = False
Next i
End Sub

Merci de ton retour
@Phil69970

 

[mic6259]

Bonjour phil69970
Super c'est parfait
Merci beaucoup
Cordialement