Discussion :

[crovette51101]

Bonjour,

Je suis en train de réaliser un formulaire qui doit pouvoir m'executer un module dans le quel je dois lui demander d'executer une macro se situant sur une autre base de donnée, depuis 9h ce matin je cherche mais rien ne fonctionne!
J'utilise Access 2000, la base dans laquel je travail s'appelle Ventes.mdb et la macro que je dois recuperer se situe dans la base Developpeur.mdb sous le nom "125 - PV_TEST"
Merci de me donner un coup de main

[LedZeppII]

Bonsoir,

un petit exemple de code

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub testExtMacro()
Dim accApp As Access.Application
Dim strDataBase As String
Dim strMacro As String
 
' Remplacer X:\CheminComplet par le chemin complet jusqu'à la base
strDataBase = "X:\CheminComplet\Developpeur.mdb"
strMacro = "125 - PV_TEST"
 
Set accApp = CreateObject("Access.Application")
' Juste le temps de la mise au point.
' Si ça fonctionne on peut enlever la ligne qui suit
accApp.Visible = True
 
accApp.OpenCurrentDatabase "E:\Mes Documents\Access\COMPTOIR_PWD.mdb", False
 
accApp.DoCmd.RunMacro strMacro
accApp.Quit
Set accApp = Nothing
End Sub

A+

[crovette51101]

Merci beaucoups LEDZEPP II d'avoir pris le temps de me répondre et meme de me mettre un code, je vais tester ca dans la matinée!
bye.