InputBox
#1
Aspirant XLPages

Inscription: 14/09/2007

Messages: 26

Posté le : 24-09-2010 13h17
Bonjour à tous,

J'ai fait une macro sur un bouton de formulaire, de façon que les Noms, s'inscrivent à la suite dans la colonne A.

Hélas, à mon grand regret, le nom ne s'inscrit que dans la cellule A1....

Merci de me modifier la macro, pour que mon projet aboutisse.

Je sais, c'est extrêmement débutant, mais oh combien déroutant...lol

Sub Bouton1_QuandClic()
Dim Nom As String
Nom = InputBox("Entrer le nom", "Renseignement", "", 10000, 5000)
Range("A1").Select
Selection.Value = Nom
End Sub

Oxor.
Hors Ligne
Rapport   Haut 

Re: InputBox
#2
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 24-09-2010 22h35
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.

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: InputBox
#3
Aspirant XLPages

Inscription: 14/09/2007

Messages: 26

Posté le : 25-09-2010 00h49
Bonsoir Didier-MDF,
Bonsoir le forum,

Toutes mes excuses, pour avoir omis d'utilisé le bouton pour insérer du code VBA,
cela ne se reproduira plus.

Un immense merci pour cette réponse rapide.

Je vais suivre ton conseil et bucher attentivement VBA et les variables.

Cordialement,

Oxor.

Hors Ligne
Rapport   Haut 

Re: InputBox
#4
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 25-09-2010 00h54
Re,

... et quand tu jugeras le présent sujet « résolu », merci d'appliquer ce qui est inscrit au bas de ma signature STP.

Bien cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes