Logique Classeur_Ouvert

Bernard_XLD · 20 Avril 2021

Bonjour

Voici une fonction testant si un classeur est déjà ouvert.
Fonctionne pour Vba et formule

Cordialement, @+

VB:

Function Classeur_Ouvert(NomClasseur$) As Boolean
    'Fonction Classeur_Ouvert V1.3 By Bernard_XLD, Excel toutes versions (non testé sur Mac)
    'renvoie Vrai si le classeur est ouvert
    On Error Resume Next
    Application.Volatile
    Classeur_Ouvert = Not Workbooks(NomClasseur) Is Nothing
End Function

Nairolf · 20 Avril 2021

Bernard_XLD,

J'utilise aussi un bout de code pour faire la même action afin d'ouvrir un fichier via un bouton s'il n'est pas déjà ouvert, mais il est bien moins élégant (je boucle sur les classeurs ouverts avant de faire le contrôle via un if).

Logique Classeur_Ouvert

Bernard_XLD

XLDnaute Barbatruc

Nairolf

XLDnaute Accro

Discussions similaires