A partir d'Access, passer la main à une macro/procédure Excel et inversement.

Version imprimable

05/03/2020, 18h31
DPhBxl

A partir d'Access, passer la main à une macro/procédure Excel et inversement.

Bonjour à tous,

Cela relève plus d'Access ou de Excel :? ? …

J'ai un fichier Access et Excel avec des procédures. La table Excel est liée dans Access.

Je voudrais pouvoir démarrer le fichier Excel et ses procédures à partir d'une procédure Access, mettre Access en pause, attendre la fin de la procédure Excel et redémarrer une procédure Access (en lui transférant éventuellement une valeur).

En terme plus simple, Access doit passer la main à Excel afin d'utiliser une procédure qui permet de rapatrier des données (SAP). Lorsqu'Excel a fini, il devrait pouvoir repasser la main à Access afin qu'il continue son travail.

PS: J'ai essayé avec Application.Run Application.CurrentProject.Path & "\Test.xlsx!test", mais cela ne marche pas.

Merci pour vos idées et votre aide.

Philippe
06/03/2020, 11h30
EricDgn

Peut-être un début de répnse sur cette discussion: Need Access VBA to wait for Excel process to finish before resuming.
Cordialement.

1 pièce(s) jointe(s)

Bonjour,

Un exemple pour ouvrir un fichier Excel depuis Access et attendre la fermeture d'Excel pour redonner la main à Access.

Code:

1
2
3
4
5
6
7
8
9
Private Sub btnExcel_Click()
    Dim wsh As Object
    Set wsh = VBA.CreateObject("WScript.Shell")
    Dim waitOnReturn As Boolean: waitOnReturn = True
    Dim windowStyle As Integer: windowStyle = 1
    wsh.Run "CheminFichierExcel.xlsm", windowStyle, waitOnReturn
    Set wsh = Nothing
    MsgBox "Fichier Excel refermé." & vbCrLf & "Revenu maintenant dans Access.", , "Pour info"
End Sub

Un petit exemple en attaché. Bonne continuation.