Code VBA pour ouvrir un autre fichier ?

Re-bonjour,

J’ai encore un problème de code.

Pour l’instant, la procédure ci-dessous ouvre un fichier bien précis.

Sub Ouverture_Fichier_mois_précédent ()

ChDir "G:\Chemin prédéfini"

Workbooks.Open Filename:= _

"G:\Chemin prédéfini\Fichier _mois_prédédent"

End Sub

Comment puis-je transformer le code de manière à ce qu’une fenêtre s’ouvre à l’aide de laquelle l’utilisateur pourrait choisir le fichier précis à ouvrir (chaque mois un fichier différent), SI POSSIBLE AVEC UN CHEMIN DEJA PREDEFINI ?

Bonne journée

Bonjour,

Essaye avec ce code :

Sub Ouverture_Fichier_mois_précédent()
Dim chemin As String
chemin = "G:\chemin prédéfini"
Application.Dialogs(xlDialogOpen).Show (chemin)
End Sub

Amicalement

Dan

Ca fonctionne à merveille !

Merci infiniment Dan et bonne fin de semaine.