- Dans Excel, il est possible d'ajouter des liens hypertextes : des mails, des adresses de sites Web ou divers liens de navigation sur les feuilles de calculs, comme sur l'exemple ci-dessous :
- Pour supprimer un lien hypertexte, on fait un clic droit sur une cellule contenant un lien hypertexte et on choisit Supprimer le lien hypertexte.
- Si votre classeur contient une multitude de liens, cette manipulation devient très rapidement fastidieuse...
- Je vous propose une petite macro qui va faire ce douloureux travail à votre place.
- Dans un classeur, taper Alt + F11 au clavier pour ouvrir Visual Basic puis insérer un nouveau module comme ci-dessous :
- Taper le code suivant dans la fenêtre du module.
- La méthode Hyperlinks.Delete efface tous les liens hypertexte contenus dans les feuilles du classeur.
Public Sub Supprimer_Liens_Hypertextes()
Dim feuille As Object
For Each feuille In Worksheets
feuille.Hyperlinks.Delete
Next
End Sub
- Cliquer sur Fichier puis sur Fermer et retourner à Microsoft Excel.
- De retour sur votre classeur, taper Alt + F8, choisir la macro Supprimer_Liens_Hypertextes et cliquer sur Exécuter. Tous les liens hypertextes du classeur sont alors supprimés.
Aucun commentaire:
Enregistrer un commentaire