Macro pour ouverture de fichier

[Hamid]

Bonjour,

Sous VBA, comment faire pour afficher une interface d'ouverture de fichier avec l'option "parcourir ...". Y'a-t-il un moyen?

Merci.

 

[sylsyl]

Salut Hamid,

la methode est
MonChemin=application.getopenfilename()
workbooks.open MonChemin

regarde l'aide Excel sur GetOpenFilename pour les options...

A++, Sylsyl.

 

[Michael]

' Choix du fichier de base

Dim CurrentPath As String
Dim FileToOpen As Boolean

CurrentPath = CurDir
ChDir "C:\EXEMPLE"
FileToOpen = Application.Dialogs(xlDialogOpen).Show("*.xls")
ChDir CurrentPath

 

[Hamid]

Merci. C'est ce que je voulais. Mon application fonctionne correctement.

A bientôt.