Copier Coller Renommer

Résolu
nonossov -  
Bonjour mes amis,

je demande votre aider a faire copier coller et renommer et garder le lien hyper-text Est ce que c'est possible??

j'ai ce code Macro mais il ne me permet pas de garder le lien. 

For a = 2 To b
sh.Cells(a, "D") = ws.Cells(a, "X")


Cells X contient les liens hyper text et quant j'utilise cette macro le lien ne marche pas,

et est ce que vous pouvez me donner la possibilté de ronommer ces liens aux "Visualisez"

Merci de m'aider

Configuration: Windows / Firefox 52.0

1 réponse

Résumé de la discussion

Un utilisateur sollicite de l'aide pour copier des liens hypertexte entre colonnes et les renommer en “Visualisez” sans rompre les URLs dans Excel via une macro. Des échanges portent sur des solutions VBA, notamment une instruction TextToDisplay pour changer l'affichage tout en conservant l'adresse du lien et son fonctionnement dans Excel. Une proposition montre une macro simple qui ajuste le texte affiché pour une cellule précise, puis une variante qui boucle sur toute la colonne D jusqu'à la dernière ligne. En cas de besoin, la méthode générale utilise une boucle For Next pour traiter chaque ligne et appliquer TextToDisplay à chaque Hyperlink, garantissant Visualisez sans altérer les liens.

Bobot (l’IA à votre service)
  1. f894009
    Bonjour,

    .Copy au lieu de =
    0
    1. nonossov Auteur
      je n'ai pas compris, merci de m'expliquer un peu!!
      0
    2. f894009
      Re,

      ws.Cells(a, "X").Copy sh.Cells(a, "D")
      0
    3. nonossov Auteur
      Comme ça??

      Sub delete()
      ws.Cells(a, "X").Copy sh.Cells(a, "D")
      End Sub
      0
    5. f894009
      Re,

      Oui, mais pourquoi sub delete ???????????????????
      0

Discussions similaires

Arobase
Zezette

1 réponse
comment faire une arobase
GLORIA

1 réponse