Discussion :

[micom59]

Bonjour,

je suis débutant en VBA B.O. et j'aimerais savoir s'il est possible d'ouvrir un fichier excel a partir d'une macro B.O. à l'ouverture du fichier.

Ma macro ressemble donc pour l'instant à :

Code :

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

1
2
3
4
5
Private Sub Document_Open()
 
workbooks("activite.xls").Open
 
End Sub

mais cela ne marche pas.

Comment puis-je faire?

Merci d'avance pour votre réponse,
Mickaël.

[TomDuBouchon]

Bonjour,

Essaies le code suivant :

Code :

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

1
2
3
4
Dim appExcel As Excel.Application
Dim wbExcel As Excel.Workbook
Set appExcel = CreateObject("Excel.Application")
Set wbExcel = appExcel.Workbooks.Open("activite.xls")

A noter qu'il faut que dans "Outils > Références", la référence "Microsoft Excel xx.x Object Library" soit cochée.

[micom59]

Merci!
c'est parfait.