Bouton activé sous condition aide

bonjour,

je vous explique dans ma feuille (demande d'intervention) j'ai un bouton ( nouveau BT) quand je clic dessus ça incrément un numéro unique de ticket sauf que si je clic plusieurs fois dessus sans valider ça incrémente toujours et donc j'aurai un décalage de chiffre

il-t-il possible de cliquer une fois sur le bouton et il ce grise temps que la macro valider n'est pas actionner

une fois la macro valider actionné le bouton nouveau bt reviens

voici mon fichier

nom: toto

MDP :toto

Slt,

1-

Private Sub CommandButton1_Click()
    Range("C9").Value = Now()
    Range("s3").Value = Range("s3").Value + 1
    Range("c13").Value = Range("s3")
    CommandButton1.Enabled = False
    Range("A7").Select
End Sub

2- dans Module3 sous Sub Valider() ajoute en bas ce code:

Sheets("demande d'intervention").CommandButton1.Enabled = True

bonjour m3ellem1

merci encore de ton aide !!

effectivement ça fonctionne pour le grisé mais quand je clic sur crée il ne ce dégrise pas

désole du double poste

j'ai fais une fausse manipe dans le code

tout fonctionne parfaitement

encore merci a toi !!