rechercher remplacer une chaine dans des liens hypertext

[fabsof]

Bonjour,

Voici mon problème : j'ai créé une macro qui demande la chaine de caractère à remplacer par la nouvelle afin de mettre à jour des liens hypertext lors du déplacement des documents. A la validation de la manipulation, le lien hypertext est correctement mis à jour mais visuellement, le texte (le chemin) n'est pas mis à jour.
Comment puis-je procéder pour mettre à jour à la fois le lien hypertext (déjà fonctionnel) mais aussi mettre à jour visuellement le lien?
Merci pour votre aide

PS : je vous joints mon fichier de travail

 

[jmps]

Re : rechercher remplacer une chaine dans des liens hypertext

Bonsoir fabsof,

Pas testé mais il existe une propriété Hyperlinks.Value si j'ai bien compris ta question.
Donc ajouter lnk.Value = Replace(lnk.Value, TextBox1, TextBox2)
après ton lnk.Address = Replace(lnk.Address, TextBox1, TextBox2)

Dis-moi si ça colle.

 

[fabsof]

Re : rechercher remplacer une chaine dans des liens hypertext

Bonjour jmps,

J'ai rajouté lnk.Value = Replace(lnk.Value, TextBox1, TextBox2)
après mon
lnk.Address = Replace(lnk.Address, TextBox1, TextBox2)
mais cela ne fonctionne pas.

Lors de l'exécution, j'ai un message d'erreur :
Erreur d'exécution '438' : Propriété ou méthode non gérée par cet objet

Merci pour ton aide

 

[fabsof]

Re : rechercher remplacer une chaine dans des liens hypertext

Bonjour,

est-ce que quelqu'un pourrait m'aider SVP ?
Par avance merci

 

[jmps]

Re : rechercher remplacer une chaine dans des liens hypertext

Bonsoir fabsof,

Je cherche toujours.
J'essaye de simplifier ton code.
Le case ne sert pas à grand chose puisque tu traites en for each, donc toutes les occurrences.
Après j'ai un souci avec la propriété .Address
Pour le texte affiché il y a .TextToDisplay qui fonctionne mais si je le copie dans .Address tel quel, le lien ne fonctionne plus.

Donc, je cherche mais je donne le temps que je peux.

 

[jmps]

Re : rechercher remplacer une chaine dans des liens hypertext

Bon,

Voilà ton fichier modifié et simplifié.
Y'a encore du boulot pour le rendre un peu plus compréhensible (nommer les boutons, le USF, etc... avec des noms plus parlants) mais la partie modif du lien + texte affiché a l'air de fonctionner.

++