Bonsoir, j'ai + de 1500 liens hypertexte dans un document word 2002, comment
puis-je faire pour tous les supprimer sans passer sur chaque lien et le
supprimer ?
Y a t-il une commande ou une option que je ne connais pas ?
Est-ce que tu a essayer la fonction rechercher/remplacer ?
Tu recherche "Liens hyper-texte" et tu rempace par "rien...."
Autrement, il doit aussi y avoir une solution sur la FAQ à l'adresse suivante : http://faqword.free.fr/articles.php?lng=fr&pg$0
Salutations Dédé "chesterfield" a écrit dans le message de news:41b4d578$0$20832$
Bonsoir, j'ai + de 1500 liens hypertexte dans un document word 2002, comment
puis-je faire pour tous les supprimer sans passer sur chaque lien et le supprimer ?
Y a t-il une commande ou une option que je ne connais pas ?
Ou dois-je passer par une macro pour çà ?
Si oui, quelle serait-elle ?
Merci d'avance.
:o)
Geo
Bonjour chesterfield
Bonsoir, j'ai + de 1500 liens hypertexte dans un document word 2002, comment puis-je faire pour tous les supprimer sans passer sur chaque lien et le supprimer ?
Tu veux purement et simplement les supprimer ? ou les remplacer par autre chose ?
On peut faire édition remplcaer et mettre "^d" sans les guillemets qui veut dire : tout champ. L'ennui c'est qui efface aussi les autres mais ça peut en valoir la peine. Sinon on eout faire une petite macro du genre :
Sub EffaceHLk() Dim i As Integer For i = 1 To ActiveDocument.Fields.Count If ActiveDocument.Fields(i).Type = wdFieldHyperlink Then ActiveDocument.Fields(i).Delete End If Next i End Sub
Bonjour chesterfield
Bonsoir, j'ai + de 1500 liens hypertexte dans un document word 2002,
comment puis-je faire pour tous les supprimer sans passer sur chaque
lien et le supprimer ?
Tu veux purement et simplement les supprimer ?
ou les remplacer par autre chose ?
On peut faire édition remplcaer et mettre "^d" sans les guillemets qui veut
dire : tout champ.
L'ennui c'est qui efface aussi les autres mais ça peut en valoir la peine.
Sinon on eout faire une petite macro du genre :
Sub EffaceHLk()
Dim i As Integer
For i = 1 To ActiveDocument.Fields.Count
If ActiveDocument.Fields(i).Type = wdFieldHyperlink Then
ActiveDocument.Fields(i).Delete
End If
Next i
End Sub
Bonsoir, j'ai + de 1500 liens hypertexte dans un document word 2002, comment puis-je faire pour tous les supprimer sans passer sur chaque lien et le supprimer ?
Tu veux purement et simplement les supprimer ? ou les remplacer par autre chose ?
On peut faire édition remplcaer et mettre "^d" sans les guillemets qui veut dire : tout champ. L'ennui c'est qui efface aussi les autres mais ça peut en valoir la peine. Sinon on eout faire une petite macro du genre :
Sub EffaceHLk() Dim i As Integer For i = 1 To ActiveDocument.Fields.Count If ActiveDocument.Fields(i).Type = wdFieldHyperlink Then ActiveDocument.Fields(i).Delete End If Next i End Sub
