Vérifier qu'un fichier n'est pas ouvert

[Egruat]

Bonjour !

Je cherche à faire en VBA une petite chose simple mais sur laquelle je bloque...

Travaillant avec de nombreux fichiers Excel ouvert en même temps, je voudrais vérifier qu'un fichier n'est pas ouvert avant de demander à ma macro de l'ouvrir...
J'ai tenté ça mais la macro ne scanne pas tous les fichiers ouverts, elle ne considère que le fichier activé...

Si quelqu'un peut m'aider ??😎

Cordialement.

On Error Resume Next
Workbooks("mon fichier").Activate
If Err <> 0 Then
MsgBox ("Le classeur Mon Classeur.xls n'est pas ouvert")
Else: MsgBox ("Le classeur Mon CLasseur.xls est ouvert")
End If

 

[RENAUDER]

Re : Vérifier qu'un fichier n'est pas ouvert

Bonjour,

Ne pas tenir compte de ce message car le précédent n'était pas affiché et j'ai cru avoir une mauvaise manipulation.

Va lire lire l'aide pour:
Open Filename For Input Lock Read As #filenum"
tout y est expliqué