Bonjour à tous,
J'ai besoin de votre aide!
À partir d'Excel, je fais exécuter une macro qui est en Access...
Le problème est que j'ai un flash à l'écran (Access ouvre et referme).
J'aimerai que ce soit transparent pour l'usager et que le "Flash" ne soit pas là... J'ai essayé plusieurs méthode mais en vain.
Voici mon code:
Merci de votre aide d'avance !
Code : 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
21
22 Sub RUNMACRO() Dim oAcApp As Object 'Access.Application Set oAcApp = CreateObject("Access.Application") 'Ouvrir la base de données oAcApp.OpenCurrentDatabase "\\Forecast national\NEXUS\DATA\DATA_FROM_EXCEL.accdb" 'Exécuter la macro oAcApp.docmd.RUNMACRO "Mc_MAJ" 'Fermer la base de données oAcApp.CloseCurrentDatabase 'Libérer les ressources Set oAcApp = Nothing End Sub![]()
Partager