Accéder au contenu principal

Kutools for Office — Une Suite. Cinq Outils. Accomplissez Plus.

Comment modifier plusieurs chemins d'hyperliens à la fois dans Excel ?

Author Xiaoyang Last modified

Pour une certaine raison, vous pourriez créer plusieurs hyperliens pour vos données dans la feuille de calcul, et tous ces hyperliens sont liés au même chemin de fichier ou à la même adresse. Mais maintenant, vous devez remplacer ce chemin d'hyperlien par une autre adresse en une seule fois. Modifier individuellement le chemin des hyperliens pourrait prendre beaucoup de temps. Existe-t-il un moyen rapide de résoudre ce problème ?

Modifier plusieurs chemins d'hyperliens à la fois dans une feuille de calcul avec du code VBA

Modifier plusieurs chemins d'hyperliens à la fois dans une feuille de calcul / classeur / plusieurs feuilles / sélection avec une fonctionnalité étonnante


Modifier plusieurs chemins d'hyperliens à la fois dans une feuille de calcul avec du code VBA

Supposons que vous ayez une liste de données avec les mêmes hyperliens comme le montre la capture d'écran suivante, et avec un code VBA, vous pouvez rapidement remplacer l'ancien chemin de fichier ou adresse dans une feuille de calcul par un nouveau.

sample data

1. Maintenez enfoncées les touches ALT + F11, et cela ouvre la fenêtre Microsoft Visual Basic for Applications.

2. Cliquez sur Insérer > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : modifier plusieurs chemins d'hyperliens à la fois

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Ensuite, appuyez sur la touche F5 pour exécuter ce code, et une boîte de dialogue vous invitera à saisir votre ancienne adresse d'hyperlien dans la zone de texte Ancien. Voir la capture d'écran :

vba code to input the old hyperlink address

4. Cliquez sur OK, et une autre boîte de dialogue apparaît pour vous rappeler d'entrer la nouvelle adresse d'hyperlien que vous souhaitez utiliser.

vba code to enter a new hyperlink address

5. Puis cliquez sur OK, toutes les anciennes adresses d'hyperliens identiques ont été remplacées par la nouvelle en une seule fois. Voir les captures d'écran :

original data arrow right new hyperlinks to replace the old ones

Modifier plusieurs chemins d'hyperliens à la fois dans une feuille de calcul / classeur / plusieurs feuilles / sélection avec une fonctionnalité étonnante

Si vous souhaitez remplacer les chemins d'hyperliens à partir d'une sélection, de plusieurs feuilles, du classeur actuel ou de plusieurs classeurs, comment procéder ? Avec la fonction Rechercher et Remplacer de Kutools for Excel, vous pouvez traiter cette tâche rapidement.

Kutools pour Excel propose plus de 300 fonctionnalités avancées pour simplifier les tâches complexes, augmentant ainsi la créativité et l'efficacité. Intégré à des capacités d'IA, Kutools automatise les tâches avec précision, rendant la gestion des données facile et sans effort. Informations détaillées sur Kutools pour Excel...  Essai gratuit...
Remarque :Pour appliquer cet utilitaire Rechercher et Remplacer , vous devez d'abord télécharger Kutools for Excel, puis appliquer la fonction rapidement et facilement.

Après avoir installé Kutools for Excel, veuillez procéder comme suit :

1. Cliquez sur Kutools > Navigation, voir la capture d'écran :

Click Kutools > Navigation

2. Dans le volet Navigation ouvert, cliquez sur l'onglet Rechercher et remplacer, dans le volet Rechercher et Remplacer, cliquez sur l'onglet Remplacer, puis effectuez les opérations suivantes :

  • Entrez l'ancien texte d'hyperlien que vous souhaitez rechercher dans la zone de texte Rechercher quoi, puis tapez le nouveau texte d'hyperlien que vous souhaitez utiliser pour le remplacement dans la zone de texte Remplacer par ;
  • Spécifiez la portée où vous souhaitez rechercher et remplacer le chemin d'hyperlien à partir de la liste déroulante Dans ;
  • Ensuite, sélectionnez Hyperliens dans la liste déroulante Rechercher dans ;
  • Enfin, cliquez sur le bouton Rechercher tout, toutes les cellules correspondantes contenant le texte spécifique de l'hyperlien ont été listées dans la zone de liste en bas.

set options in the pane

3. Ensuite, cliquez sur le bouton Remplacer tout, les anciens chemins d'hyperliens ont été changés en nouveaux en une seule fois, voir la capture d'écran :

the old hyperlink paths have been changed to the new ones

Cliquez pour télécharger Kutools for Excel pour un essai gratuit !


Plus d'articles connexes :

  • Extraire les adresses réelles des hyperliens
  • Supposons que vous ayez une plage de cellules contenant des hyperliens, et maintenant vous avez besoin de voir la destination réelle des hyperliens et de les extraire des hyperliens comme le montre la capture d'écran suivante. Existe-t-il des moyens simples de résoudre ce problème rapidement ?
  • Convertir les URL d'images en images réelles dans Excel
  • Si vous avez une liste d'adresses URL d'images dans la colonne A, et que vous souhaitez maintenant télécharger les images correspondantes depuis les URL et les afficher dans la colonne B adjacente comme le montre la capture d'écran de gauche. Dans Excel, comment extraire rapidement et facilement les images réelles des URL d'images ?
  • Convertir un texte d'URL en hyperlien cliquable dans Excel
  • Supposons que vous ayez plusieurs URL dans votre feuille de calcul, mais qu'elles ne soient pas liées, et que vous deviez maintenant convertir toutes les URL non liées en hyperliens cliquables, comme le montrent les captures d'écran suivantes. Bien sûr, vous pouvez double-cliquer dessus un par un pour les rendre cliquables, mais cela prendra du temps s'il y a beaucoup d'URL. Comment convertir automatiquement plusieurs URL non liées en hyperliens cliquables dans Excel ?

Meilleurs outils de productivité pour Office

🤖 Kutools AI Aide : Révolutionnez l'analyse de données avec : Exécution intelligente | Générer du code | Créer des formules personnalisées | Analyser des données et générer des graphiques | Appeler les Fonctions améliorées de Kutools
Fonctionnalités populaires : Trouver, mettre en évidence ou marquer les doublons | Supprimer les lignes vides | Combinez les colonnes ou les cellules sans perte de données | Arrondir sans formule...
Super RECHERCHEV : Recherche multi-critères | Recherche multi-valeurs | Recherche multi-feuilles | Correspondance floue...
Liste déroulante avancée : Créer rapidement une liste déroulante | Liste déroulante dépendante | Liste déroulante à sélection multiple...
Gestionnaire de colonnes : Ajouter un nombre spécifique de Colonnes | Déplacer des Colonnes | Alterner l’état de visibilité des Colonnes masquées | Comparer des plages & Colonnes...
Fonctionnalités phares : Mise au point de la grille | Affichage de conception | Barre de formule améliorée | Gestionnaire de Classeur & Feuille de calcul | Bibliothèque d’AutoTexte | Sélecteur de date | Merge Worksheets | Chiffrer/Déchiffrer les cellules | Envoyer un e-mail par liste | Super Filtre | Filtre spécial (filtrer les cellules avec une police en gras/italique/barré...)...
Top15 des ensembles d’outils :12 outils de texte (Ajouter du texte, Supprimer des caractères spécifiques, ...) |50+ Types de graphiques (Diagramme de Gantt, ...) |40+ Formules pratiques (Calculer l’âge en fonction de la date de naissance, ...) |19 outils d’insertion (Insérer un code QR, Insérer une image depuis le chemin, ...) |12 outils de conversion (Convertir en mots, Conversion de devises, ...) |7 outils de fusion & division (Fusion avancée des lignes, Diviser les cellules, ...) | ... et bien plus encore
Utilisez Kutools dans la langue de votre choix – disponible en Anglais, Espagnol, Allemand, Français, Chinois et plus de40 autres !

Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.

  • Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !

Tous les modules complémentaires Kutools. Une seule installation

La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.

Excel Word Outlook Tabs PowerPoint
  • Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
  • Un installateur, une licence — installation en quelques minutes (compatible MSI)
  • Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
  • Essai complet30 jours — sans inscription, ni carte bancaire
  • Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels