Anita est en train de reformater un long document (plus de 300 pages) qui a été converti de PDF en Word. Elle a beaucoup d’expérience avec Word et les styles et en utilisant Rechercher et remplacer pour corriger des documents mal formatés. Dans ce cas, il y a un problème qu’elle n’arrive pas à résoudre. Le document d’origine comportait des lignes horizontales dans l’en-tête et le pied de page qui ont été converties en lignes graphiques dans le document Word. Elle souhaite supprimer toutes ces lignes graphiques, mais la recherche de ^ g ne les trouve pas. Anita se demande s’il existe un moyen d’automatiser la suppression de ces lignes graphiques, car elle préfère ne pas avoir à cliquer et à appuyer sur Del plus de 600 fois.

Comme il semble que le processus de conversion PDF ajoute les graphiques à l’en-tête et au pied de page, cela signifie qu’ils ne sont pas facilement «trouvables» en effectuant une recherche et un remplacement régulière. Au lieu de cela, vous voudrez utiliser une macro pour vous en débarrasser. L’exemple suivant ne regarde que dans la zone d’en-tête et de pied de page et supprime tous les graphiques qu’il y trouve.

Sub FooterHeaderGraphicFind()

Dim rStory As Range     Dim i As Integer

For Each rStory In ActiveDocument.StoryRanges         If rStory.StoryType = wdPrimaryFooterStory Or _           rStory.StoryType = wdPrimaryHeaderStory Then             For i = rStory.Shapes.Count To 1 Step -1                 rStory.Shapes(i).Delete             Next i         End If     Next rStory End Sub

Notez qu’il supprime toutes les formes de l’en-tête ou du pied de page, pas seulement les lignes. (Il n’y a aucun moyen de différencier le contenu d’une forme graphique d’une autre.)

Bien sûr, il pourrait y avoir un moyen beaucoup plus simple de gérer la situation, sans avoir besoin d’une macro:

  1. Ouvrez le document Word qui a été converti à partir du fichier PDF.

  2. Ouvrez un tout nouveau document. (Vous devriez maintenant avoir deux documents ouverts en même temps.)

  3. Dans le document converti, appuyez sur Ctrl + A. Cela sélectionne tout dans le document.

  4. Appuyez sur Ctrl + C. Cela copie tout dans le Presse-papiers.

  5. Basculez vers le tout nouveau document.

  6. Assurez-vous que l’onglet Accueil du ruban est affiché.

  7. Cliquez sur la flèche vers le bas sous l’outil Coller. Word affiche une variété d’options de collage.

  8. Cliquez sur l’outil Conserver le texte uniquement. (Il ressemble à un presse-papiers avec la lettre A en bas à droite.) Word colle le texte non formaté du Presse-papiers dans le document cible.

Cette approche devrait éliminer tout type d’artefacts graphiques et de formatage introduits dans le document par le processus de conversion PDF.

Le résultat est un document «propre» que vous pouvez mettre en forme comme vous le souhaitez.

Cette approche est particulièrement simple si vous avez implémenté et pouvez appliquer des styles dans tout le document.

_Note: _

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

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

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (13510) s’applique à Microsoft Word 2007, 2010, 2013 et 2016.