Copier Coller Renommer

Résolu
nonossov Messages postés 638 Statut Membre -  
nonossov Messages postés 638 Statut Membre -
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

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    .Copy au lieu de =
    0
    1. nonossov Messages postés 638 Statut Membre
       
      je n'ai pas compris, merci de m'expliquer un peu!!
      0
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Re,

      ws.Cells(a, "X").Copy sh.Cells(a, "D")
      0
    3. nonossov Messages postés 638 Statut Membre
       
      Comme ça??

      Sub delete()
      ws.Cells(a, "X").Copy sh.Cells(a, "D")
      End Sub
      0
    4. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Re,

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