Bonjour,
Je suis coincé. Avec la procédure ci-dessous, je parviens à ouvrir plusieurs fichiers à une seule feuille et récupérer l'adresse.
Sub MesMois()
Dim Fichiers As Variant, i As Integer, T As Variant
Fichiers = Application.GetOpenFilename("Fichiers Excel (*.xlsx), *.xlsx", , , ...