Supprimer les hyperliens - Exemples de code VBA

Supprimer tous les hyperliens d'une feuille

Le code suivant supprime tous les hyperliens de Sheet1 :

12345 Sub DeleteHyperLinks()Sheet1.Hyperlinks.DeleteFin du sous-marin

Et si vous n'avez pas besoin d'une sous-routine réutilisable, mais plutôt d'une solution ponctuelle, utilisez la fenêtre d'exécution :

1. Sélectionnez la feuille à partir de laquelle supprimer les liens hypertexte

2. Appuyez sur Alt+F11 pour ouvrir le VBE

3. Dans le menu principal VBE, choisissez Affichage->Fenêtre immédiate

4. Dans la fenêtre Exécution, collez le code suivant, puis appuyez sur Entrée

1 ActiveSheet.Hyperlinks.Delete

wave wave wave wave wave