Bonjour

J'ai 4 classeurs fermés dans un dossier. Le nom des classeurs peut changer selon des paramètres externes. Je voudrais récupérer tous les noms dans un MsgBox avec le code suivant situé dans un 5ème classeur.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub ListeNClasseur()
 
Dim cl As Workbook
For Each cl In Workbooks
MsgBox cl.Name
Next cl
 
End Sub
Ce code fonctionne bien si tous les classeurs sont ouverts. Mais comment avoir les noms de classeur, si seul le 5ème classeur au nom invariable est ouvert?
Je pourrais les ouvrir un après l'autre, mais comment faire si on ignore son nom?
Faut-il utiliser un appel API? Merci de m'apporter vos éclairages