Recopier une cellule avec lien hypertext

Résolu
Arnaud13011 Messages postés 18 Statut Membre -  
Arnaud13011 Messages postés 18 Statut Membre -
Bonjour,

Pourriez vous me dire comment je pourrai recopier une cellule automatiquement avec son lien hypertext d'une feuille à une autre. Je suis nul en macro.

Merci de votre aide


3 réponses

Frenchie83 Messages postés 2240 Date d'inscription   Statut Membre Dernière intervention   339
 
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
0
Arnaud13011 Messages postés 18 Statut Membre
 
Bonjour,

Merci de notre réponse, j'ai essayé d'intégrér votre macro mais ça bug. Je joins le fichier ça sera plus parlant.
Mon idée:
- sur la feuille "BASE", le contenu des cellules D (qui contiennent des liens hypertext) se retrouvent sur toutes les feuilles
- j'aimerai retrouvé ces liens sur la feuille "MDR" en essayant de conserver la formule initiale.

https://mon-partage.fr/f/uJUHhnVr/

Merci de votre aide
0