Dans mon classeur j'ai une macro qui insert une colonne à chaque fois que je
souhaite rajouter une ville. lorsque cette macro s'exécute elle se termine
sur la cellule qui doit recevoir le nom de la nouvelle ville.
Je souhaiterais pouvoir demander à l'utilisateur d'entrer le nom de la
ville. Je suis allée faire un tour vers les Userforms mais débutante en VBA
j'avoue que je m'y perds!!! Je travaille sur excel97.
Merci pour votre aide
Bon samedi Pascale
Sub Ajout_colonne()
'
Application.Goto Reference:="DERNIERECOLONNE"
Selection.Insert Shift:=xlToRight
ActiveCell.Select
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Clément Marcotte
Bonjour,
Si c'est juste pour demander une seule information, tu peux te passer d'un UserForm. Tu peux utiliser inputbox() (VBA) ou application.inputbox() (Excel).
sub demandelaville() laville = inputbox("Indiquez la ville ") activecell.value = laville end sub
Tu peux faire une recherche dans l'aide de VBA pour voir les différents paramètres, et les différences, d'InputBox et application.inputbox. (Là je dois partir dans 3 ou 4 minutes, pas le temps de tout décortiquer cela.)
"Pascale" a écrit dans le message de news:%
Bonjour à toutes et à tous,
Dans mon classeur j'ai une macro qui insert une colonne à chaque fois que je
souhaite rajouter une ville. lorsque cette macro s'exécute elle se termine
sur la cellule qui doit recevoir le nom de la nouvelle ville.
Je souhaiterais pouvoir demander à l'utilisateur d'entrer le nom de la
ville. Je suis allée faire un tour vers les Userforms mais débutante en VBA
j'avoue que je m'y perds!!! Je travaille sur excel97.
Merci pour votre aide
Bon samedi Pascale
Sub Ajout_colonne() ' Application.Goto Reference:="DERNIERECOLONNE" Selection.Insert Shift:=xlToRight ActiveCell.Select End Sub
Bonjour,
Si c'est juste pour demander une seule information, tu peux te passer
d'un UserForm. Tu peux utiliser inputbox() (VBA) ou
application.inputbox() (Excel).
sub demandelaville()
laville = inputbox("Indiquez la ville ")
activecell.value = laville
end sub
Tu peux faire une recherche dans l'aide de VBA pour voir les
différents paramètres, et les différences, d'InputBox et
application.inputbox. (Là je dois partir dans 3 ou 4 minutes, pas le
temps de tout décortiquer cela.)
"Pascale" <p.vasnier@tiscali.fr> a écrit dans le message de
news:%23WQLRrubDHA.2940@TK2MSFTNGP11.phx.gbl...
Bonjour à toutes et à tous,
Dans mon classeur j'ai une macro qui insert une colonne à chaque
fois que je
souhaite rajouter une ville. lorsque cette macro s'exécute elle se
termine
sur la cellule qui doit recevoir le nom de la nouvelle ville.
Je souhaiterais pouvoir demander à l'utilisateur d'entrer le nom de
la
ville. Je suis allée faire un tour vers les Userforms mais débutante
en VBA
j'avoue que je m'y perds!!! Je travaille sur excel97.
Merci pour votre aide
Bon samedi Pascale
Sub Ajout_colonne()
'
Application.Goto Reference:="DERNIERECOLONNE"
Selection.Insert Shift:=xlToRight
ActiveCell.Select
End Sub
Si c'est juste pour demander une seule information, tu peux te passer d'un UserForm. Tu peux utiliser inputbox() (VBA) ou application.inputbox() (Excel).
sub demandelaville() laville = inputbox("Indiquez la ville ") activecell.value = laville end sub
Tu peux faire une recherche dans l'aide de VBA pour voir les différents paramètres, et les différences, d'InputBox et application.inputbox. (Là je dois partir dans 3 ou 4 minutes, pas le temps de tout décortiquer cela.)
"Pascale" a écrit dans le message de news:%
Bonjour à toutes et à tous,
Dans mon classeur j'ai une macro qui insert une colonne à chaque fois que je
souhaite rajouter une ville. lorsque cette macro s'exécute elle se termine
sur la cellule qui doit recevoir le nom de la nouvelle ville.
Je souhaiterais pouvoir demander à l'utilisateur d'entrer le nom de la
ville. Je suis allée faire un tour vers les Userforms mais débutante en VBA
j'avoue que je m'y perds!!! Je travaille sur excel97.
Merci pour votre aide
Bon samedi Pascale
Sub Ajout_colonne() ' Application.Goto Reference:="DERNIERECOLONNE" Selection.Insert Shift:=xlToRight ActiveCell.Select End Sub
