Si vous héritez des feuilles de calcul d’autres personnes, vous constaterez peut-être que certaines feuilles de calcul contiennent de très nombreux liens hypertexte. Ces hyperliens sont souvent créés automatiquement par Excel lorsque vous importez ou entrez des informations dans la feuille de calcul. (Je les vois apparaître tout le temps lorsque je colle des informations dans une feuille de calcul qui a été copiée à partir d’une page Web quelque part.)

Si vous souhaitez supprimer ces hyperliens, vous pouvez le faire en cliquant dessus avec le bouton droit de la souris et en choisissant Hyperlien | Supprimer le lien hypertexte du menu contextuel.

Faire cela avec des dizaines ou des centaines de liens hypertexte peut rapidement prendre énormément de temps. Accomplir une telle tâche plus rapidement nécessite l’utilisation d’une macro.

La macro suivante supprime rapidement tous les hyperliens dans une feuille de calcul, sans affecter quoi que ce soit d’autre qu’elle peut contenir:

Sub KillLinks1()

Do Until ActiveSheet.Hyperlinks.Count = 0         ActiveSheet.Hyperlinks(1).Delete     Loop End Sub

La macro fonctionne en parcourant la collection Hyperlinks et en supprimant tout ce qui s’y trouve. (La collection Hyperlinks permet d’accéder à tous les hyperliens d’un document. Pratique, hein?)

Vous pouvez, si vous le souhaitez, rendre la macro encore plus courte, jusqu’à une seule ligne:

Sub KillLinks2()

ActiveSheet.Hyperlinks.Delete End Sub

Sélectionnez la feuille de calcul que vous souhaitez affecter, exécutez l’une de ces macros et vous venez de gagner beaucoup de temps!

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (10782) s’applique à Microsoft Excel 2007, 2010, 2013, 2016, 2019 et Excel dans Office 365. Vous pouvez trouver une version de cette astuce pour l’ancienne interface de menu d’Excel ici:

link: / excel-Getting_Rid_of_All_Hyperlinks [Se débarrasser de tous les hyperliens].