Recopier une cellule avec lien hypertext

Bonjour
Il y a un petit souci avec la feuille "BASE" (impossible d'y accéder via le VBA) . je l'ai renommée en "BASEold" et en ai recrée une autre qui va bien.
J'y ai ajouté un bouton "Recopie liens hypertexte", il suffit de cliquer dessus pour que les liens soient recopieés dans la feuille "MDR" avec formules comprises

https://www.cjoint.com/c/EBykUlhbUL2
En espérant que cela convienne.
cdlt

Bonjour
N'ayant pas beaucoup de précision quant à la recopie (dans quelle cellule, nom de la feuille etc..) voici ce que ça donne en utilisant l'enregistreur de macro
exemple: recopie d'une cellule avec lien hypertexte de la cellule A1 de la feuille 1 vers la cellule B1 de la feuille 2

    Sheets("Feuil1").Select '
    Range("A1").Select
    Selection.Copy
    Sheets("Feuil2").Select
    Range("B1").Select
    Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone  , SkipBlanks:=False, Transpose:=False

ce qui revient à faire manuellement
cellule A1 feuille 1 : sélectionner - copier
cellule B1 feuille 2: collage spécial - Tout,avec le thème source
En espérant que cela puisse vous aider
cdlt