Discussion :

[krietj]

Bonjour à tous,

J'ai réalisé un UserForm dans lequel l'utilisateur a la possibilité d'entrer des données qui vont se loger directement dans les cellules du classeur du type:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub TextBox3_Change()
Range("A3").Value = TextBox3
End Sub

J'ai également ajouté deux boutons "OK" et "CANCEL". J'aimerais que si l'utilisateur clique sur le bouton "OK", les cellules du classeur prennent les valeurs du UserForm et qu'il ferme le UserForm. Si il clique sur le bouton "CANCEL", ca ferme le UserForm sans transférer les valeurs entrées dans ce dernier dans les cellules du classeur.

Quelqu'un peut il m'aider sur le code?


Merci à vous

[mercatog]

Supprime ta procédure Change

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub TonBoutonOk_Click()


Range("A3").Value = TextBox3
unload me
End Sub

Pour cancel la ligne Unload me suffit

[krietj]

super c'était si simple...
merci