Discussion :

[ludooo]

Salut a tous,

une question sur l'ouverture d'un fichier Excel depuis un module d'access:

Je commande l'ouverture d'un fichier Excel contenant des macros par le biais de la fonction GetObject :

Code :

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

1
2
dim xlWb as Workbook
set xlWb = GetObject("C:\monFichier.xls")

De cette maniere, le fichier s'ouvre dans la session Excel existante, s'il en est une. Sinon, je commande une ouverture par la méthode CreateObject.

En procédant de cette facon, le message d'avertissement de présence de macros apparait dans Excel (que je rende Excel visible ou non), et je dois choisir d'accepter les macros ou non.

Ce message me gêne, je voudrais qu'il n'apparaisse pas. L'application Access étant destinée a une utilisation multi-poste, je ne souhaite pas intervenir dans le niveau de sécurité d'ouverture des fichiers Excel.

Existe-t-il un moyen de faire en sorte que ce message n'apparaisse pas ?

Remarque:
Avec la méthode Workbook.Open, le message n'apparait pas, seulement cela lance forcément une nouvelle session Excel (et ca, ca me derange).

Merci d'avance !

[cafeine]

Hello,

si tu fais un GetObject pour ouvrir un classeur, tu devrais pouvoir faire un GetObject pour récupérer l'instance Excel déjà ouverte et de là faire un xlApp.Workbooks.Open

Code :

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

1
2
3
4
5
6
7
Sub TestExcel()
 
Dim xlApp As Object
Set xlApp = GetObject(, "Excel.Application")
xlApp.workbooks.Open "H:\DEV\OFFICE\Addin\multi.xls"
 
End Sub

[ludooo]

Excellent c'est effectivement le plus pertinent des codes a mettre en place... et ca fonctionne a merveille désormais. Out les messages gênants !

Merci Caféine