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