Bonjour,

je travaille sur plusieurs fichier .xls, et j'aurai besoin de vérifier si un fichier est ouvert.
j'ai déjà vérifié qu'il existe avec :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim fs As FileSystemObject
    Set fs = CreateObject("Scripting.FileSystemObject")
    existancefichier = fs.FileExists(nomdechemin)
mais il me faudrait aussi quelque chose du type :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
ouvertfichier=fs.IsFileOpen(nomdechemin)
Mais cela ne semble pas exister

un peu d'aide me serait utile...