Recherche variable d'un fichier dans un autre

Bonjour,

Je vais essayer d'être le plus clair possible mais j'ai toujours du mal à m'exprimer à l'écrit

J'ai un fichier qui s'appelle cheepow.xlsm dans lequel se situe un tableau. J'aimerais réaliser une macro qui vient :

• regarder la valeur présente C2 de ce fichier
• ouvrir un fichier existant nommé "exemple.vsd"
• rechercher si la valeur de C2 du fichier "cheepow.xlsm" se trouve quelques part dans la première page du fichier "exemple.vsd"

- dans le fichier "cheepow.xlsm" créer un tableau sur une deuxième page avec le résultat mais pour l'instant je sais pas comment faire pour exprimer le résultat car il faudra comparer plusieurs variables du fichier Excel avec toutes les pages du vsd.

J'ai oublié de précisé le vsd doit être sélectionné par l'utilisateur du fichier Excel.

J'ai commencé un code mais cela ne fonctionne pas du tout :

Set CO = ThisWorkbook
Set OO = CD.Sheets("Feuil1")
Set F = Range("C2")

HDDfile = Application.GetOpenFilename("Visio files (*.vsd), *.vsd")

Set CD = ThisWorkbook
Set OD = CD.Sheets("NCSS_HDD_F0010_1")

    With CD
    Set c = .Find(F, LookIn:=xlValues)
        If Not c Is Nothing Then
        MsgBox ("OK")
        End If
    End With
End Sub

Je vous joins le fichier excel.

J'ai renommé le .vsd en .txt car le site ne voulait pas le charger.

Si vous avez des questions n'hésitez pas.