UserForm vs ImputBox

Bonjour à vous,

Je vous explique ma situation. Dans un de mes fichiers, j'ai ne macro assez simple qui me permet de faire saisir une donnée à l'utilisateur dans une Imputbox pour l'envoyer dans une autre cellule :

Sheets("feuil1").range("a1") = apllication.Imputbox("blabla") (je remercie la personne qui m'a aider à assembler ce code...

Dans ma macro, j'ai 4 lignes, Exemple ;

Sheets("feuil1".range("a1")....

...................................("a2")....

etc

Je voudrais que dans un userform la personne puisse saisir les 4 données (toujours numérique) dans des textbox. Donc un panneau d'affiche au lieu de 4 à la suite.

Est-ce possible de manière simple?

Merci beaucoup de votre aide toujours précieuse !

Bonjour,

je t'envois un petit ficher exemple. Vois si ça te convient

https://www.excel-pratique.com/~files/doc2/TestUSF.xls

Bonne journée

Je me doutais que c'était simple... merci pour la solution !

Bonne journée à toi !

Salut le forum

Correction dans le code de l'UserForm pour du numérique et pas toujours la même TextBox.

Private Sub cmdOk_Click()
'On attribue chacune des valeurs des Textbox
With Sheets("feuil1")
    .Range("a1") = Val(txtValeur1)
    .Range("a2") = Val(txtValeur2)
    .Range("a3") = Val(txtValeur3)
    .Range("a4") = Val(txtValeur4)
End With
'Pour fermer l'userform
    Unload Me
End Sub

Mytå

Merci, j'avais fait le reste mais important de le notifier pour les autres..

Bonne journée !

Rechercher des sujets similaires à "userform imputbox"