Comment convertir un ensemble de liens texte en hyperliens actifs dans Excel ?

Si vous avez une liste d'adresses URL au format texte brut, comment pourriez-vous activer ces URL textuelles pour les transformer en hyperliens cliquables comme le montre la capture d'écran suivante ?

Convertir un ensemble de liens texte en hyperliens actifs avec des formules

Convertir un ensemble de liens texte en hyperliens actifs Kutools pour Excel

Convertir un ensemble de liens texte en hyperliens actifs avec du code VBA

Convertir un ensemble de liens texte en hyperliens actifs avec des formules

Double-cliquer sur chaque cellule pour activer les hyperliens un par un prendra beaucoup de temps. Voici quelques formules que je peux vous présenter, suivez les étapes ci-dessous :

Entrez cette formule : =HYPERLINK(A2, A2) dans une cellule vide où vous souhaitez afficher le résultat, puis faites glisser la poignée de recopie vers le bas pour appliquer cette formule aux cellules souhaitées, et tous les liens texte seront convertis en hyperliens actifs, voir capture d'écran :

Convertir un ensemble de liens texte en hyperliens actifs Kutools pour Excel

Voici un outil pratique - Kutools pour Excel, avec sa fonctionnalité Convertir les hyperliens, vous pouvez rapidement convertir un ensemble de liens texte en hyperliens cliquables et extraire les adresses réelles des hyperliens à partir des chaînes de texte contenant des hyperliens.

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

1. Sélectionnez les cellules contenant les liens texte que vous souhaitez activer.

2. Ensuite, cliquez sur Kutools > Lien > Convertir les hyperliens, voir capture d'écran :

3. Dans la boîte de dialogue Convertir les hyperliens, sélectionnez l'option Remplacer les adresses des hyperliens par le contenu des cellules sous la section Type de conversion, puis cochez Convertir la plage source si vous souhaitez placer les adresses réelles dans la plage d'origine, voir capture d'écran :

4. Cliquez ensuite sur le bouton OK, et les liens texte sont activés immédiatement, voir capture d'écran :

Remarque : Si vous souhaitez placer le résultat dans une autre cellule plutôt que dans la cellule d'origine, décochez Convertir la plage source, puis sélectionnez une cellule où vous souhaitez afficher le résultat depuis la Plage de résultats comme le montre la capture d'écran suivante :

Cliquez pour télécharger Kutools pour Excel et essayez-le gratuitement dès maintenant !

Convertir un ensemble de liens texte en hyperliens actifs avec du code VBA

Le code VBA ci-dessous peut également vous aider à résoudre cette tâche, veuillez procéder comme suit :

1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.

Code VBA : Convertir un ensemble de liens texte en hyperliens actifs :

Sub activateHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub

3. Appuyez ensuite sur la touche F5 pour exécuter ce code, et une boîte de dialogue apparaît pour vous rappeler de sélectionner les cellules que vous souhaitez convertir en hyperliens cliquables, voir capture d'écran :

4. Cliquez ensuite sur le bouton OK, et les liens texte simples ont été convertis en hyperliens actifs, voir capture d'écran :