Comment modifier plusieurs chemins d'hyperliens à la fois dans Excel?
Dans certains cas, vous pouvez créer plusieurs liens hypertexte pour vos données dans la feuille de calcul, et tous les liens hypertexte sont liés au même chemin de fichier ou adresse, mais maintenant, vous devez remplacer ce chemin de lien hypertexte par une autre adresse à la fois. Changer le chemin des hyperliens individuellement peut perdre beaucoup de temps, existe-t-il un moyen rapide de résoudre ce problème?
Modifier plusieurs chemins de lien hypertexte à la fois dans une feuille de calcul avec le code VBA
Modifier plusieurs chemins de lien hypertexte à la fois dans une feuille de calcul avec le code VBA
En supposant que vous ayez une liste de données avec les mêmes hyperliens que la capture d'écran suivante, et avec un code VBA, vous pouvez rapidement remplacer l'ancien chemin d'accès ou l'adresse de fichier dans une feuille de calcul par un nouveau.
1. Maintenez la touche ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez insérer > Moduleet collez la macro suivante dans le Fenêtre du module.
Code VBA: modifiez 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. Puis appuyez F5 pour exécuter ce code et une boîte de dialogue vous permettant de saisir votre ancienne adresse de lien hypertexte dans le Ancien texte boîte. Voir la capture d'écran:
4Cliquez sur OK, et une autre boîte de dialogue apparaît pour vous rappeler de saisir la nouvelle adresse de lien hypertexte que vous souhaitez utiliser.
5. Et puis cliquez OK, toutes les anciennes adresses d'hyperliens ont été remplacées par la nouvelle à la fois. Voir les captures d'écran:
|
 |
 |
Changez plusieurs chemins de lien hypertexte à la fois dans une feuille de calcul / classeur / plusieurs feuilles / sélection avec une fonctionnalité étonnante
Si vous souhaitez remplacer les chemins de lien hypertexte d'une sélection, de plusieurs feuilles, d'un classeur actuel ou de plusieurs classeurs, comment pouvez-vous faire? Avec Rechercher et remplacer caractéristique de Kutools for Excel, vous pouvez rapidement vous acquitter de cette tâche.
Après l'installation de Kutools for Excel, veuillez faire comme ceci:
1Cliquez sur Kutools > Navigation, voir capture d'écran:
2. Dans le ouvert Navigation Cliquez sur Trouver et remplacer onglet, dans le Rechercher et remplacer Cliquez sur remplacer onglet, puis effectuez les opérations suivantes:
- Entrez l'ancien texte du lien hypertexte que vous souhaitez trouver dans le Trouvez ce que zone de texte, puis tapez le nouveau texte du lien hypertexte par lequel vous souhaitez remplacer dans le Remplacez-le par zone de texte;
- Spécifiez l'étendue dans laquelle vous souhaitez rechercher et remplacer le chemin du lien hypertexte à partir du Dans la liste déroulante;
- Ensuite, sélectionnez Hyperliens dans la liste déroulante Regarder dans;
- Enfin, cliquez Trouver tout bouton, toutes les cellules correspondantes contenant le texte du lien hypertexte spécifique ont été répertoriées dans la zone de liste inférieure.
3. Puis clique Remplacer tout bouton, les anciens chemins de lien hypertexte ont été remplacés par les nouveaux à la fois, voir capture d'écran:
Cliquez pour télécharger Kutools for Excel pour un essai gratuit !
Articles plus relatifs:
- Extraire les adresses réelles des hyperliens
- Supposons que vous ayez une plage de cellules contenant des hyperliens et que vous deviez maintenant voir la destination réelle des hyperliens et les extraire des hyperliens comme illustré ci-dessous. Existe-t-il des moyens simples de résoudre rapidement ce problème?
- Convertir les URL d'image en images réelles dans Excel
- Si vous avez une liste d'adresses URL d'image dans la colonne A, et maintenant, vous souhaitez télécharger les images correspondantes à partir des URL et les afficher dans la colonne B adjacente comme capture d'écran de gauche. Dans Excel, comment pouvez-vous extraire rapidement et facilement les images réelles des URL d'images?
- Convertir le texte de l'URL en lien hypertexte 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 devez maintenant convertir toutes les URL non liées en liens hypertexte cliquables, comme illustré ci-dessous. 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 pouvez-vous convertir automatiquement plusieurs URL non liées en liens hypertexte cliquables dans Excel?
- Ouvrir une page spécifique d'un document PDF à partir d'un lien hypertexte Excel
- Lorsque vous liez une cellule à un fichier PDF, vous accédez normalement à la première page du fichier PDF lorsque vous cliquez pour ouvrir le lien hypertexte. Si vous devez accéder directement à une page spécifique du fichier PDF en cliquant sur le lien hypertexte, cet article peut vous rendre service.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition 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é de 50% et réduit des centaines de clics de souris chaque jour!
