Macro qui ouvre une autre classeur

Bonjour et merci de votre aide,

Voici 2 classeurs différent, le classeur 1 a une macro déclenché par un bouton qui permet d'ouvrir le classeur source pour que les formules du classeur 1 puisse être réalisé.

la macro ouvre le classeur source et fait un " actualiser tout"

comment puis-je modifier la macro pour que seulement le " actualiser tout " s'effectue sans essayer d'ouvrir à nouveau le classeur source si celui-ci est déjà ouvert?

Merci beaucoup

Bonjour,

Essaie quelque chose comme ça :

Sub MAJ_ventes()
Dim S$
S = "classeur-source.xlsx"
If Not IsOpen(S) Then
    ChDir "C:\Users\pierre.claveau\Desktop"
    Workbooks.Open Filename:= _
        "C:\Users\pierre.claveau\Desktop\classeur-source.xlsx"
End If
Workbooks("classeur-source.xlsx").RefreshAll
    Windows("classeur-1.xlsm").Activate
    ActiveWorkbook.RefreshAll
End Sub
Function IsOpen(Z$) As Boolean
On Error Resume Next
   IsOpen = Not Workbooks(Z) Is Nothing
End Function

A+

c'est parfait...merci beaucoup