OVH Cloud OVH Cloud

lancer macro excel depuis acces

6 réponses
Avatar
denis le breton
Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis

6 réponses

Avatar
denis le breton
Une précision mon fichier excel s'appelle 'Stat.xls'
la feuille s'appelle 'traitement'
le module comportant la macro 'macro_vue2'
la macro s'appelle 'vue2'




Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis


Avatar
bret
Bonjour,
Voici un exemple de code en prenant soin de :
bien prendre en compte le chemin du fichier
bien adapter la macro pour une utilisation automatique pour qu'elle ne
bloque pas ton application access (traitement des erreurs etc...)

Set objImportXL = CreateObject("Excel.application")
Set objClasseur = objImportXL.Workbooks.Open("Stat.xls")
objImportXL.Application.Run "macro_vue2"



Une précision mon fichier excel s'appelle 'Stat.xls'
la feuille s'appelle 'traitement'
le module comportant la macro 'macro_vue2'
la macro s'appelle 'vue2'




Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis




Avatar
denis le breton
Merci Bret, mais hélas quelque chose cloche
j'ai essayé en 3me ligne
- objImportXL.Application.Run "macro_vue2"
- objImportXL.Application.Run "vue2"
- objClasseur.Applicatio.Run "macro_vue2"
- objClasseur.Applicatio.Run "vue2"
a chaque fois erreur 1004 impossible de trouver la macro '...vue2'
Denis

Bonjour,
Voici un exemple de code en prenant soin de :
bien prendre en compte le chemin du fichier
bien adapter la macro pour une utilisation automatique pour qu'elle ne
bloque pas ton application access (traitement des erreurs etc...)

Set objImportXL = CreateObject("Excel.application")
Set objClasseur = objImportXL.Workbooks.Open("Stat.xls")
objImportXL.Application.Run "macro_vue2"



Une précision mon fichier excel s'appelle 'Stat.xls'
la feuille s'appelle 'traitement'
le module comportant la macro 'macro_vue2'
la macro s'appelle 'vue2'




Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis






Avatar
Gilbert
Bonjour,

Moi, j'utilise ça:

XL_App.Application.Run "'" & NomDuFichier & "'!Macro1"


--
Gilbert


"denis le breton" a écrit dans le
message de news:
Merci Bret, mais hélas quelque chose cloche
j'ai essayé en 3me ligne
- objImportXL.Application.Run "macro_vue2"
- objImportXL.Application.Run "vue2"
- objClasseur.Applicatio.Run "macro_vue2"
- objClasseur.Applicatio.Run "vue2"
a chaque fois erreur 1004 impossible de trouver la macro '...vue2'
Denis

Bonjour,
Voici un exemple de code en prenant soin de :
bien prendre en compte le chemin du fichier
bien adapter la macro pour une utilisation automatique pour qu'elle ne
bloque pas ton application access (traitement des erreurs etc...)

Set objImportXL = CreateObject("Excel.application")
Set objClasseur = objImportXL.Workbooks.Open("Stat.xls")
objImportXL.Application.Run "macro_vue2"



Une précision mon fichier excel s'appelle 'Stat.xls'
la feuille s'appelle 'traitement'
le module comportant la macro 'macro_vue2'
la macro s'appelle 'vue2'




Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais
comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis








Avatar
denis le breton
Je ne dois pas faire ce qu'il faut car j'ai une erreur 404 objet requis !
Merci quand même
Denis



Bonjour,

Moi, j'utilise ça:

XL_App.Application.Run "'" & NomDuFichier & "'!Macro1"


--
Gilbert


"denis le breton" a écrit dans le
message de news:
Merci Bret, mais hélas quelque chose cloche
j'ai essayé en 3me ligne
- objImportXL.Application.Run "macro_vue2"
- objImportXL.Application.Run "vue2"
- objClasseur.Applicatio.Run "macro_vue2"
- objClasseur.Applicatio.Run "vue2"
a chaque fois erreur 1004 impossible de trouver la macro '...vue2'
Denis

Bonjour,
Voici un exemple de code en prenant soin de :
bien prendre en compte le chemin du fichier
bien adapter la macro pour une utilisation automatique pour qu'elle ne
bloque pas ton application access (traitement des erreurs etc...)

Set objImportXL = CreateObject("Excel.application")
Set objClasseur = objImportXL.Workbooks.Open("Stat.xls")
objImportXL.Application.Run "macro_vue2"



Une précision mon fichier excel s'appelle 'Stat.xls'
la feuille s'appelle 'traitement'
le module comportant la macro 'macro_vue2'
la macro s'appelle 'vue2'




Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais
comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis













Avatar
denis le breton
erreur 424 pardon


Je ne dois pas faire ce qu'il faut car j'ai une erreur 404 objet requis !
Merci quand même
Denis



Bonjour,

Moi, j'utilise ça:

XL_App.Application.Run "'" & NomDuFichier & "'!Macro1"


--
Gilbert


"denis le breton" a écrit dans le
message de news:
Merci Bret, mais hélas quelque chose cloche
j'ai essayé en 3me ligne
- objImportXL.Application.Run "macro_vue2"
- objImportXL.Application.Run "vue2"
- objClasseur.Applicatio.Run "macro_vue2"
- objClasseur.Applicatio.Run "vue2"
a chaque fois erreur 1004 impossible de trouver la macro '...vue2'
Denis

Bonjour,
Voici un exemple de code en prenant soin de :
bien prendre en compte le chemin du fichier
bien adapter la macro pour une utilisation automatique pour qu'elle ne
bloque pas ton application access (traitement des erreurs etc...)

Set objImportXL = CreateObject("Excel.application")
Set objClasseur = objImportXL.Workbooks.Open("Stat.xls")
objImportXL.Application.Run "macro_vue2"



Une précision mon fichier excel s'appelle 'Stat.xls'
la feuille s'appelle 'traitement'
le module comportant la macro 'macro_vue2'
la macro s'appelle 'vue2'




Bonjour,
depuis acces je peux lancer excel, je peux ouvrir un fichier, mais
comment
lancer une macro en particulier (autre que autoexec) ?
Merci
Denis