Classeur ouvert ?

[Ludovic]

Bonjour Foromeuse et Foromistes,

Je souhaiterais par exemple mettre '1' dans une variable si classeur_voulu est ouvert, '0' si il est fermé. Mais je ne sais pas comment m'y prendre.

pouriez-vous me donner un petit coup de pouce.

Merci pour votre réponse et le Forum est vraiment SUPER.
On ne dit jamais assez les choses quand elles sont bien, on attend toujours quand c'est trop tard.

Ludovic

 

[Yeahou]

Bonjour ludovic

Ce code de Ti fait exactement cela par une fonction, renvoie true si le fichier est ouvert

Cordialement, A+

Function Ouvert(ByVal NomFichier$) As Boolean
Dim Wbk As Workbook
On Error GoTo fin
Set Wbk = Workbooks(NomFichier)
Ouvert = True
fin:
End Function

 

[Ludovic]

Bonsoir toutes et tous

Merci Yeahou, c'est sympa.

Ludovic