Ouvrir un fichier avec un bouton activx

Bonjour

je cherche à avoir en visuel un fichier xlsm qui se trouve sur le bureau ,avec un bouton activx qui se trouve dans un fichier xlms que j'ai à l'écran.

fichier sur le bureau : Devis clients.xlsm

Merci pour votre aide

Résolu avec ce code

Sub Ouvre()

Dim wb As Workbook

Dim ws As Worksheet

Dim chemin as string

chemin =thisworkbook.path & "\"

Set wb = Workbooks.Open(chemin & "Devis clients" )

Set ws = wb.Worksheets("ACCUEIL" )

End Sub