Vérifier si fichier ouvert

[patrick]

Bonjour,

Dans ma macro, j'ai besoin de savoir si le fichier xxx.xls est ouvert ou fermé.

Merci

 

[G'Claire]

Patrick, le forum

Un code pris sur la toile :

Sub test()
On Error Resume Next
Workbooks("Mon CLasseur.xls").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
End Sub

Pas testé,

Salut, G'Claire