Vbs qui exécute du vba automatiquement
Bonjour,
je suis sur un petit projet,
j'ai réussi à créer une macro sous Access 2007 qui permet de sauvegarder dans un dossier, le fichier souhaité en format PDF
voici le code:
Code:
1 2 3 4 5 6 7 8 9 10 11
|
Sub PDFANNUAIRE()
Dim MyPath As String
Dim MyFileName As String
MyFileName = "annuairepapier.pdf"
MyPtah = "\\chemin du dossier\Documents\"
DoCmd.OutputTo acOutputReport, "ANNUAIRE ALPHABETIQUE", _
acFormatPDF, MyPath & MyFileName, False
End Sub |
ça fonctionne
Ma question: je veux créer cette tâche automatiquement plus tot que de passer par Access (aucune intéraction humaine), et en laissant access fermer, donc mon idée était de créer un fichier .vbs avec un script qui permet d'aller exécuter le script de ce fichier access....
J'ai cherché longtemps mais impossible de trouver le code qui permet d'aller exécuter une macro dans un fichier access.
Quelqu'un aurait une idée?
merci
Johan
PS: j'ai trouvé ceci que je mets dans un fichier .vbs:
Code:
1 2 3 4 5 6
| Dim accessApp
set accessApp = CreateObject("Access.Application")
accessApp.visible = True
accessApp.OpenCurrentDataBase("W:\chemin\papierannuaire.mdb")
accessApp.Run "PDFANNUAIRE"
accessApp.Quit |
mais lorsque j'exécute il me dit qu'il ne trouve pas cette macro..
enfaite c'est un fichier access contenant plusieurs Etat etc.. la macro concerne un seul Etat
La macro est dans un Module