comment vérifier qu'un fichier est ouvert

[Frédéric]

Bonjour à tous,
connaissez vous un moyen de vérifier par une instruction qu'un fichier excel est ouvert?
merci d'avance de votre réponse.
Bonne journée.
Cdt
FL

 

[juju]

Hello,

Je ne sais pas si j'ai bien compris ta question : tester à partir d'un classeur qu'un autre classeur est ouvert ?
Voici une solut si c'est bien ça (classeur1 étant le nom du fichier a cherché):

Sub Ouvert()
On Error GoTo fin
Windows("Classeur1.xls").Activate
ThisWorkbook.Activate
MsgBox "Le classeur est bien ouvert"
Exit Sub
fin:
MsgBox "Le classeur est fermé"
End Sub

Bye

Ju

 

[Frédéric]

Bonjour juju,
tu as très bien compris ma question et je te remercie de ta réponse car elle me convient tout à fait.
Encore merci.
Bonne journée.
Cdt
FL