Rapport de message :*
 

Re: InputBox

Titre du sujet : Re: InputBox
par myDearFriend! le 24/09/2010 22:35:48

Bonsoir oxor, le Forum,

Tu peux essayer comme ça :
Sub Bouton1_QuandClic()
Dim Nom As String
Static L As Long
    Nom = InputBox("Entrer le nom", "Renseignement", "", 10000, 5000)
    L = L + 1
    Cells(L, 1).Value = Nom
End Sub
Pour l'utilisation des variables "Static", voir dans le tutoriel : VBA et les variables

Il te reste à gérer ensuite l'éventuel choix "Annuler" de l'utilisateur s'il change d'avis et décide de ne pas saisir de nom...

Cordialement,

Nb : à l'avenir, merci d'utiliser le bouton prévu pour insérer du code VBA dans tes posts.