Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Est-il possible en vba de lancer une routine par une variable?

3 réponses
Avatar
fred
Bonjour,
Est-il possible en vba de lancer une routine par une variable
Si je fais dans une première routine
Sub macro1()
b="Ouvrir fichier"
macro
b
'ici j'ai message d'erreur "Erreur de compilation"
End sub()

J'aimerais que b lance la deuxième routine
Sub b()
macro
End sub()

Comment faire?
Merci

3 réponses

Avatar
Oliv'
*fred que je salut a écrit *:
Bonjour,
Est-il possible en vba de lancer une routine par une variable
Si je fais dans une première routine
Sub macro1()
b="Ouvrir fichier"
macro
b
'ici j'ai message d'erreur "Erreur de compilation"
End sub()

J'aimerais que b lance la deuxième routine
Sub b()
macro
End sub()

Comment faire?
Merci


Pourriez vous expliquer plus clirement ce que vous souhaitez faire ?
Vous pouvez toujours faire un if sur la valeur de b

if b="Ouvrir fichier" then macroouvrir

Ou un select case

--
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
les sites références:
Excel :http://www.excelabo.net http://xcell05.free.fr/
http://dj.joss.free.fr/
http://frederic.sigonneau.free.fr/ http://www.excel-vba-francais.com/
Word : http://faqword.free.fr/
Outlook : http://faq.outlook.free.fr/
les archives : http://groups.google.com/group/microsoft.public.fr.outlook
OE6 : http://www.faqoe.com/
Sql : http://sqlpro.developpez.com/
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Avatar
Pierre Fauconnier
Bonjour

Sub TestIndirect()
Dim ProIndirecte As String

ProIndirecte = "salut"
Run ProIndirecte
End Sub

Sub Salut()
MsgBox "bonjour"
End Sub

Ok?


--
Pierre Fauconnier () (Skype:
pierre_fauconnier)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"fred" a écrit dans le message de news:
450a6cd5$0$32387$
Bonjour,
Est-il possible en vba de lancer une routine par une variable
Si je fais dans une première routine
Sub macro1()
b="Ouvrir fichier"
macro
b
'ici j'ai message d'erreur "Erreur de compilation"
End sub()

J'aimerais que b lance la deuxième routine
Sub b()
macro
End sub()

Comment faire?
Merci





Avatar
fred
C'est ok
Je lance en fait run b...
dim b as string
b="Salut"
run b 'mais b tout seul j'ai l'erreur de compil

Sub Salut()
MsgBox "bonjour"
End Sub
Merci pour votre aide!

"Pierre Fauconnier" a écrit dans le
message de news: %
Bonjour

Sub TestIndirect()
Dim ProIndirecte As String

ProIndirecte = "salut"
Run ProIndirecte
End Sub

Sub Salut()
MsgBox "bonjour"
End Sub

Ok?


--
Pierre Fauconnier () (Skype:
pierre_fauconnier)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"fred" a écrit dans le message de news:
450a6cd5$0$32387$
Bonjour,
Est-il possible en vba de lancer une routine par une variable
Si je fais dans une première routine
Sub macro1()
b="Ouvrir fichier"
macro
b
'ici j'ai message d'erreur "Erreur de compilation"
End sub()

J'aimerais que b lance la deuxième routine
Sub b()
macro
End sub()

Comment faire?
Merci