Bonjour,
Un soucis sous Outlook 2010 / Windows 10:
J'ouvre un fichier Excel depuis Outlook :
Sauf que, tel quel, j'ai une erreur comme quoi le fichier ne peut pas être ouvert :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Set App = CreateObject("Excel.Application") Set myWorkBook = App.workbooks.Open("D:\dummy.xlsx") ..... myWorkBook.close
Erreur d'exécution 80010105 : la méthode 'Open' de l'objet 'Workbooks' a échoué
Bien entendu, aucun problème d'accès au fichier.
Mes recherches m'ont amené à la solution suivante :
- Rendre visible Excel
- Minimiser la fenêtre
Et ça marche (sur le même fichier... donc, ceux qui pensait à un problème de droit.... )
Ce qui donne ceci :
Et bien entendu, unanimement, moi le premier, je hurle à tel point c'est horrible !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Set App = CreateObject("Excel.Application") App.visible = True App.Application.WindowState = wdWindowStateMinimize Set myWorkBook = App.workbooks.Open("D:\dummy.xlsx")
Le pire, c'est que sur les forums où ce problème d'ouverture est relaté, on conseille de faire du late binding... Or, c'est justement du late binding ! Faut-il du "late" late binding ??
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Set App = CreateObject("Excel.Application") App.visible = True App.Application.WindowState = wdWindowStateMinimize Set myWorkBook = App.workbooks.Open("D:\dummy.xlsx")
Partager