Discussion :

[Subkill]

Bonjour,

J'essaye d'ouvrir un fichier excel et soit il ouvre, mais de façon invisible, soit il n'ouvre pas, car je ne le vois pas apparaître à l'écran.

voiçi mon code:

Code :

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

1
2
Set objExcel = CreateObject("Excel.Application")
objExcel.Workbooks.Open("C:\qryBase.XLS")

J'ai aussi essayé

Code :

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

Application.Workbooks.Open("C:\qryBase.XLS")

sans succès

[SfJ5Rpw8]

ben rajoute à ton premier code :

Code :

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

1
2
 
objExcel.visible = true

[Subkill]

Ca s'améliore, l'application excel s'ouvre, mais pas mon fichier

[ThierryAIM]

Code :

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

    Set objWB = objExcel.Workbooks.Open("C:\qryBase.XLS")

[Subkill]

Je n'avais pas les droits pour l'ouvrir

Dsl pour la perte de temps...