Comment supprimer plusieur hyperliens et leurs cibles?

Fermé

Bergee - 13 janv. 2017 à 21:22
gbinforme

Messages postés: 14935
Date d'inscription: lundi 18 octobre 2004
Statut: Contributeur
Dernière intervention: 24 juin 2020

- 16 janv. 2017 à 22:07

Bonjour,

Il y a-t-il quelquen qui saurait comment supprimer plusieurs hyperliens et leurs cible de façon rapide et efficace?

J'aurais environs 500 liens qui pointent chacun vers des cibles situées dans 2 répertoires différent.

Merci.

A voir également:

Supprimer lien hypertexte excel
Supprimer DES hyperliens d'un coup avec OoO ✓ - Forum - Bureautique
Problème fichier qui supprime ma cible internet ✓ - Forum - Virus / Sécurité
Supprimer hyperlien libreoffice calc ✓ - Forum - LibreOffice / OpenOffice
Supprimer hyperlien indesign ✓ - Forum - InDesign
[oOo Writer] supprimer un hyperlien - Forum - Logiciels

5 réponses

Réponse 1 / 5

gbinforme

Messages postés: 14935
Date d'inscription: lundi 18 octobre 2004
Statut: Contributeur
Dernière intervention: 24 juin 2020

4 623
13 janv. 2017 à 21:51

Bonjour,

Tes 500 liens sont situés dans un classeur excel ? un document word ?

Réponse 2 / 5

Bergee
13 janv. 2017 à 22:09

Merci gbinforme, désolé, les hyperliens sont dans un tableau Excel volumineux ou chaque ligne possèdent parfois 2 hyperliens dans 2 cellules différentes. Je dois supprimer plusieurs lignes et supprimer les cibles présente dans 2 folders différents admettons appelés À et B.

J'ai un délai très court afin de réaliser le mandat et faire le tout manuellement serait impensable.

Merci

Réponse 3 / 5

gbinforme

Messages postés: 14935
Date d'inscription: lundi 18 octobre 2004
Statut: Contributeur
Dernière intervention: 24 juin 2020

4 623
13 janv. 2017 à 22:28

Bonjour,

Pour excel, avec 2010 ou plus, tu sélectionnes ta colonne concernée et clic droit "supprimer les liens hypertext"

Réponse 4 / 5

bergee
13 janv. 2017 à 23:20

Le fait est que j'ai seulement quelques lignes à supprimer avec sur chacune 1 ou 2 cellules avec des liens hypertextes.

Cette action supprimera également les cibles dans les dossiers en question ?

gbinforme

Messages postés: 14935
Date d'inscription: lundi 18 octobre 2004
Statut: Contributeur
Dernière intervention: 24 juin 2020

4 623
14 janv. 2017 à 09:13

Bonjour,

Cette action supprimera également les cibles dans les dossiers en question ?
Absolument pas si tu veux supprimer les cibles de tes liens tu ne peux le faire qu'avec une macro mais ce n'est pas simple à tester car cela dépend de ta configuration et des droits sur les dossiers.

eriiic

Messages postés: 24425
Date d'inscription: mardi 11 septembre 2007
Statut: Contributeur
Dernière intervention: 10 août 2022

7 104
14 janv. 2017 à 12:32

Bonjour,

J'ajouterai qu'est-ce que supprimer une cible pour toi ?
- vider la cellule pointée ?
- supprimer le fichier ?
Un exemple de fichier avec qq liens type serait bienvenu.
eric

Bergee
14 janv. 2017 à 16:18

Bonjour,

pour les besoins du travail a effectuer j'ai déposé le document Excel dans un dossier nommé nouveau dossier. dans le folder nouveau dossier j'y ai mis 2 folders qui se nomment A et B.

les hyperliens sont dans les colonnes D et E. Les hyperliens de la colonne D pointent vers les fichiers dans le folder A et ceux de la colonne E vers le folder B.

J'ai les pleins droits sur les folders (droits de modification et suppression).

Les fichiers cibles sont des PDF pu des Word.

Je ne m'y connaît pas dans les macro. Mais je sais comment l'ajouter dans Excel et comment l’exécuter.

Je sais aussi comment faire un copy paste dans le module de la macro pour ensuite l'enregistrer.

Merci à l'avance, vous êtes mon dernier espoir.

Bergee
14 janv. 2017 à 21:52

Merci énormément gbinforme! Mais pourrais-je choisir les ligne que je voudrais supprimer avant d'exécutera macro?

gbinforme

Messages postés: 14935
Date d'inscription: lundi 18 octobre 2004
Statut: Contributeur
Dernière intervention: 24 juin 2020

4 623
14 janv. 2017 à 22:28

pourrais-je choisir les ligne que je voudrais supprimer avant d'exécutera macro?

Tu n'avais pas précisé que tu voulais en garder. Dans ce cas avec ce nouveau code, tu sélectionnes ta plage avant de lancer la macro qui ne supprime que ce qui est sélectionné.

Public Sub suppr_liens()
Dim cel As Range
For Each cel In Selection
    If cel.Hyperlinks.Count > 0 Then
        If cel.Hyperlinks(1).Address <> "" Then Kill cel.Hyperlinks(1).Address
        cel.Hyperlinks(1).Delete
        cel.Value = ""
    End If
Next cel
End Sub

Tu peux d'ailleurs ne sélectionner qu'une cellule.

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 5

gbinforme

Messages postés: 14935
Date d'inscription: lundi 18 octobre 2004
Statut: Contributeur
Dernière intervention: 24 juin 2020

4 623
14 janv. 2017 à 18:02

Bonjour Bergee,

Ton exposé me parait très clair alors je te propose cette macro.
Attention car ensuite, il n'y a plus de traces, ni lien, ni fichier et l'on ne revient pas en arrière. C'est extrêmement destructeur mais apparemment c'est ton souhait...

Public Sub suppr_liens()
Dim cel As Range
For Each cel In ActiveSheet.Range("D1:E" & Range("D:E").SpecialCells(xlCellTypeLastCell).Row).Cells
    If cel.Hyperlinks.Count > 0 Then
        Kill cel.Hyperlinks(1).Address
        cel.Hyperlinks(1).Delete
        cel.Value = ""
    End If
Next cel
End Sub

Newsletters