J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une
macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open
mais rien ne ce passe (le reste de la macro fonctionne mais le fichier
ne s'ouvre pas)
en VB.net ma commande est
MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep +
""",""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est
Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err))
For Each myworkbook In Workbooks
MsgBox (myworkbook.Name)
Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé
d'excel directement (via un bouton par exemple) et qu'il n'affiche pas
d'erreur
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
X
Bonsoir,
VBnet c'est pas ici :o) ------------
"Dom" a écrit dans le message de news: 43d8e2a3$
Bonjour,
J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open mais rien ne ce passe (le reste de la macro fonctionne mais le fichier ne s'ouvre pas)
en VB.net ma commande est MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep + """,""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err)) For Each myworkbook In Workbooks MsgBox (myworkbook.Name) Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé d'excel directement (via un bouton par exemple) et qu'il n'affiche pas d'erreur
merci Dominique
Bonsoir,
VBnet c'est pas ici :o)
------------
"Dom" <draffaele@sl.lu> a écrit dans le message de news:
43d8e2a3$1@news.vo.lu...
Bonjour,
J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une
macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open
mais rien ne ce passe (le reste de la macro fonctionne mais le fichier
ne s'ouvre pas)
en VB.net ma commande est
MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep +
""",""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est
Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err))
For Each myworkbook In Workbooks
MsgBox (myworkbook.Name)
Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé
d'excel directement (via un bouton par exemple) et qu'il n'affiche pas
d'erreur
J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open mais rien ne ce passe (le reste de la macro fonctionne mais le fichier ne s'ouvre pas)
en VB.net ma commande est MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep + """,""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err)) For Each myworkbook In Workbooks MsgBox (myworkbook.Name) Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé d'excel directement (via un bouton par exemple) et qu'il n'affiche pas d'erreur
merci Dominique
Jean-Marc
"Dom" a écrit dans le message de news:43d8e2a3$
Bonjour,
J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open mais rien ne ce passe (le reste de la macro fonctionne mais le fichier ne s'ouvre pas)
en VB.net ma commande est MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep + """,""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err)) For Each myworkbook In Workbooks MsgBox (myworkbook.Name) Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé d'excel directement (via un bouton par exemple) et qu'il n'affiche pas d'erreur
Hello,
tu n'es malheuresuement pas sur le bon groupe, tu es même 2 fois hors sujet :-)
Pour vb.net, c'est microsoft.public.fr.dotnet.vb
pour Exel, c'est: microsoft.public.fr.excel
-- Jean-marc Tester mon serveur (VB6) => http://myjmnhome.dyndns.org "There are only 10 kind of people those who understand binary and those who don't." mailto: remove '_no_spam_' ;
"Dom" <draffaele@sl.lu> a écrit dans le message de
news:43d8e2a3$1@news.vo.lu...
Bonjour,
J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une
macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open
mais rien ne ce passe (le reste de la macro fonctionne mais le fichier
ne s'ouvre pas)
en VB.net ma commande est
MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep +
""",""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est
Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err))
For Each myworkbook In Workbooks
MsgBox (myworkbook.Name)
Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé
d'excel directement (via un bouton par exemple) et qu'il n'affiche pas
d'erreur
Hello,
tu n'es malheuresuement pas sur le bon groupe, tu es même
2 fois hors sujet :-)
Pour vb.net, c'est
microsoft.public.fr.dotnet.vb
pour Exel, c'est:
microsoft.public.fr.excel
--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
J'ai créé un prog qui vb.net qui ouvre un fichier excel et execute une macro de celui ci.
Dans cette macro j'ouvre un autre fichier à l'aide de workbooks.open mais rien ne ce passe (le reste de la macro fonctionne mais le fichier ne s'ouvre pas)
en VB.net ma commande est MyXls.application.run("main_v6.xls!ExecuteFor1File(""" + Mon_rep + """,""" + Mon_fic + """,""" + SenderId + """)")
en excel (office XP) la ligne qui ne fonctionne pas est Workbooks.Open FileName:=Mon_Fic
MsgBox ("Erreur : " + Error(Err) + ":" + CStr(Err)) For Each myworkbook In Workbooks MsgBox (myworkbook.Name) Next myworkbook
je precise que la macro ouvre le fichier demandé quend elle est lancé d'excel directement (via un bouton par exemple) et qu'il n'affiche pas d'erreur
Hello,
tu n'es malheuresuement pas sur le bon groupe, tu es même 2 fois hors sujet :-)
Pour vb.net, c'est microsoft.public.fr.dotnet.vb
pour Exel, c'est: microsoft.public.fr.excel
-- Jean-marc Tester mon serveur (VB6) => http://myjmnhome.dyndns.org "There are only 10 kind of people those who understand binary and those who don't." mailto: remove '_no_spam_' ;
