OVH Cloud OVH Cloud

valeur MsgBox

4 réponses
Avatar
pascal
Bonjour,

J'ouvre un MsgBox en demandant de saisir une valeur, et je propose une
valeur par défaut (251):
Vall = InputBox("vall", "Nombre pour vall", "251")

Puis je stoke cette valeur en "A2" dans un autre classeur qui contient les
macros:
Range("a2").Value = Vall
Comment le traduire ?

Je cherche à récupérer cette valeur pour des calculs ultérieur.

Comment faire ?

Merci d'avance.

Pascal

4 réponses

Avatar
papou
Bonjour
Utilise cette syntaxe pour définir le type d'entrée dans Inputbox.
Dans mon exemple, il s'agit d'un nombre (donc la valeur 251 est saisie sans
les guillemets sinon erreur) et on affiche le résultat de sa multiplication
par deux (juste pour te montrer)
vall = Application.InputBox("vall", "Nombre pour vall", 251, , , , , 1)
MsgBox vall * 2

Cordialement
Pascal

"pascal" a écrit dans le message de news:

Bonjour,

J'ouvre un MsgBox en demandant de saisir une valeur, et je propose une
valeur par défaut (251):
Vall = InputBox("vall", "Nombre pour vall", "251")

Puis je stoke cette valeur en "A2" dans un autre classeur qui contient les
macros:
Range("a2").Value = Vall
Comment le traduire ?

Je cherche à récupérer cette valeur pour des calculs ultérieur.

Comment faire ?

Merci d'avance.

Pascal


Avatar
pascal
Cela ne me suffit pas !!!
1/ comment stoker Vall dans une autre feuille excel ?
2/ comment la récupérer par la suite pour d'autres calculs?


Bonjour
Utilise cette syntaxe pour définir le type d'entrée dans Inputbox.
Dans mon exemple, il s'agit d'un nombre (donc la valeur 251 est saisie sans
les guillemets sinon erreur) et on affiche le résultat de sa multiplication
par deux (juste pour te montrer)
vall = Application.InputBox("vall", "Nombre pour vall", 251, , , , , 1)
MsgBox vall * 2

Cordialement
Pascal

"pascal" a écrit dans le message de news:

Bonjour,

J'ouvre un MsgBox en demandant de saisir une valeur, et je propose une
valeur par défaut (251):
Vall = InputBox("vall", "Nombre pour vall", "251")

Puis je stoke cette valeur en "A2" dans un autre classeur qui contient les
macros:
Range("a2").Value = Vall
Comment le traduire ?

Je cherche à récupérer cette valeur pour des calculs ultérieur.

Comment faire ?

Merci d'avance.

Pascal







Avatar
papou
Bonjour aussi
un exemple ici je ne peux pas faire mieux (navré !)
http://cjoint.com/data/izlU2OsgdB.htm

Cordialement aussi
Pascal

"pascal" a écrit dans le message de news:

Cela ne me suffit pas !!!
1/ comment stoker Vall dans une autre feuille excel ?
2/ comment la récupérer par la suite pour d'autres calculs?


Bonjour
Utilise cette syntaxe pour définir le type d'entrée dans Inputbox.
Dans mon exemple, il s'agit d'un nombre (donc la valeur 251 est saisie
sans
les guillemets sinon erreur) et on affiche le résultat de sa
multiplication
par deux (juste pour te montrer)
vall = Application.InputBox("vall", "Nombre pour vall", 251, , , , , 1)
MsgBox vall * 2

Cordialement
Pascal

"pascal" a écrit dans le message de
news:

Bonjour,

J'ouvre un MsgBox en demandant de saisir une valeur, et je propose une
valeur par défaut (251):
Vall = InputBox("vall", "Nombre pour vall", "251")

Puis je stoke cette valeur en "A2" dans un autre classeur qui contient
les
macros:
Range("a2").Value = Vall
Comment le traduire ?

Je cherche à récupérer cette valeur pour des calculs ultérieur.

Comment faire ?

Merci d'avance.

Pascal









Avatar
Ange Ounis
1/ comment stoker Vall dans une autre feuille excel ?


Si c'est une autre feuille du même classeur :
Sheets("AutreFeuille").Range("A2").Value=Vall

Dans un autre classeur (qui doit être ouvert)
WorkBooks("NomAutreClasseur.xls").Sheets("NomFeuille").Range("A2").Value=Vall

2/ comment la récupérer par la suite pour d'autres calculs?


Manoeuvre inverse, l'important étant de qualifier entièrement le chemin d'accès
à Range("A2").

----------
Ange Ounis
----------

Cela ne me suffit pas !!!
1/ comment stoker Vall dans une autre feuille excel ?
2/ comment la récupérer par la suite pour d'autres calculs?


Bonjour
Utilise cette syntaxe pour définir le type d'entrée dans Inputbox.
Dans mon exemple, il s'agit d'un nombre (donc la valeur 251 est saisie sans
les guillemets sinon erreur) et on affiche le résultat de sa multiplication
par deux (juste pour te montrer)
vall = Application.InputBox("vall", "Nombre pour vall", 251, , , , , 1)
MsgBox vall * 2

Cordialement
Pascal

"pascal" a écrit dans le message de news:

Bonjour,

J'ouvre un MsgBox en demandant de saisir une valeur, et je propose une
valeur par défaut (251):
Vall = InputBox("vall", "Nombre pour vall", "251")

Puis je stoke cette valeur en "A2" dans un autre classeur qui contient les
macros:
Range("a2").Value = Vall
Comment le traduire ?

Je cherche à récupérer cette valeur pour des calculs ultérieur.

Comment faire ?

Merci d'avance.

Pascal