valeur par defaut d'une INPUTBOX

T

Thierry

Guest

• 31 Octobre 2002

• #2

Salut Patrick

Ben oui,

Il faut faire une variable "ValDef" dans ce style :

Sub InputDefaut()
Dim ValDef As String

ValDef = Sheets("toto").Range("a1")

Dim Message, Title, Default, MyValue
Message = "Entrez ce que vous voulez"
Title = "Démonstration de InputBox"
Default = ValDef
MyValue = InputBox(Message, Title, Default)

End Sub

Bon cette fois-ci dodo
Bonne Nuit
@+Thierry

 

Vote positif 0 Vote négatif

P

patrice

Guest

• 5 Novembre 2002

• #3

merci bien thierry
ca marche mais je voudrais pouvoir le faire pour plusieur boites dans une meme feuille comme dans la feuille ci joint ou les inputbox sont liees a la selection de certaine cellules (A1,A3,A5)
merci pour ton aide
salut a bientot

 

Vote positif 0 Vote négatif

T

Thierry

Guest

• 6 Novembre 2002

• #4

Salut Patrice

Histoire de confirmer que je suis les posts... Mais j'ai vu le même fichier en évolution sur un autre post......

Bon je fais le point je vois çà demain...

bonne nuit
@+Thierry

 

Vote positif 0 Vote négatif

P

patrice

Guest

• 6 Novembre 2002

• #5

salut thierry
afirmatif tu a bien vu le meme fichier, je n'ais pas trop l'habitude des forum mais en tout cas celui ci est super!
encore merci
@+patrice

 

Vote positif 0 Vote négatif