Rechercher/remplacer liens hypertexte dans doc excel.

Résolu
Ricco911 Messages postés 6 Date d'inscription   Statut Membre Dernière intervention   -  
brucine Messages postés 21694 Date d'inscription   Statut Membre Dernière intervention   -

Bonjour,

Dans un document excel dans lequel j'ai plusieurs onglets, j'ai fait plusieurs liens hypertexte vers l'onglet feuil1 puis je me suis rendu compte qu'il serait mieux de renommer Feuil1 en Série1. Je l'ai fait mais mes liens hypertexte n'ont pas suivi. J'ai donc sélectionné les cellules dans lesquels sont mais lien fait ctl+H rechercher/remplacer mais excel me dit qu'il ne trouve rien à remplacer. Mes liens apparaissent en infobulle mais pas dans la ligne de formule.

Auriez-vous une solution à me proposer?

Merci.


Windows / Firefox 110.0

A voir également:

4 réponses

cousinhub29 Messages postés 1074 Date d'inscription   Statut Membre Dernière intervention   361
 

Bonjour,

Essaie en utilisant ce code :

Sub Rempl_Liens()
Dim Sh As Worksheet
Dim Hpl As Hyperlink
Dim Anc_Lien As String, Nouv_Lien As String
Anc_Lien = "Feuil1" 'Nom de l'ancien onglet
Nouv_Lien = "Serie1" 'Nom du nouvel onglet
For Each Sh In Sheets
    For Each Hpl In Sh.Cells.Hyperlinks
        Hpl.SubAddress = Replace(Hpl.SubAddress, Anc_Lien, Nouv_Lien)
    Next Hpl
Next Sh
End Sub

Bonne journée


1
brucine Messages postés 21694 Date d'inscription   Statut Membre Dernière intervention   3 427
 

Bonjour,

Une solution est proposée ici, enregistrer sous xml, faire son rechercher-remplacer, revenir à Excel:

https://transformationdigitale.coach/index.php/2020/06/23/modifier-des-liens-hypertextes-en-masse-dans-excel/

0
Ricco911
 

Merci, j'avais essayé cette solution mais ç'est incompatible avec certains formats et après essai les liens sont bien changés mes ne fonctionnent plus.

Merci quand même.

0
Ricco911 Messages postés 6 Date d'inscription   Statut Membre Dernière intervention   1
 

Merci à tous, et surtout à cousinhub29,

J'avais déjà essayé plusieurs macro et ça ne fonctionnait pas. Cela me répondait que mon lien n'était pas valide. Avec votre macro aussi d'ailleurs. Mais ça m'a poussé à me demander si ce n'était pas le nom de ma feuille qui posait un problème. J'ai donc changé "Série1 GB" par "S1_GB" et ça a fonctionné.

Moralité : il ne faut pas hésiter à remettre en cause ses pratiques avant de solliciter le forum.

Merci à tous.

0
brucine Messages postés 21694 Date d'inscription   Statut Membre Dernière intervention   3 427
 

En effet, un espace dans le nom d'une feuille plante forcément la chose.

1