Passer au contenu principal

Comment sélectionner tous les paragraphes d'en-tête dans Word?

Parfois, nous devons supprimer ou modifier tous les paragraphes d'en-tête. La première étape consiste à sélectionner tous les paragraphes d'en-tête. Ce didacticiel vous apprendra les méthodes suivantes pour sélectionner tous les paragraphes d'en-tête.

Sélectionnez tous les paragraphes d'en-tête avec le Rechercher et remplacer

Sélectionnez tous les paragraphes d'en-tête avec le VBA

Sélectionnez tous les paragraphes d'en-tête avec Kutool for Word


flèche bleue bulle droiteSélectionnez tous les paragraphes d'en-tête avec le Rechercher et remplacer

Onglet Office : apporte des interfaces à onglets à Word, Excel, PowerPoint...
ot mot milieu annonce 100
Améliorez votre flux de travail maintenant.      en savoir plus       Téléchargement gratuit

La fonction Rechercher et remplacer dans Word est le moyen le plus courant de sélectionner tous les paragraphes d'en-tête.

Étape 1: cliquez sur Accueil >Trouvez et sélectionnez le Recherche avancée marque

Étape 2: cliquez sur Plus bouton pour afficher plus d'options de recherche;

doc-select-title-paragraphes-1

Étape 3: cliquez sur Format marquez les options contextuelles ci-dessous.

doc-select-title-paragraphes-2

Étape 4: cliquez sur le Style pour sélectionner le style de titre vous avez utilisé dans la boîte de dialogue Rechercher le style.

doc-select-title-paragraphes-3

Remarque: cette méthode ne peut sélectionner qu'un seul paragraphe d'en-tête à chaque fois. La modification de tous les paragraphes d'en-tête prend du temps.


flèche bleue bulle droiteSélectionnez tous les paragraphes d'en-tête avec le VBA

Alternativement, nous pouvons utiliser le VBA pour sélectionner tous les paragraphes de titres.

Étape 1: Presse «Alt-F11» pour ouvrir la fenêtre Microsoft Visual Basic pour Application;

Étape 2: cliquez sur Module sur le insérer tab, copiez et collez le code VBA suivant dans la fenêtre Module;

Étape 3: Cliquez ensuite sur Courirdoc-signe-inversé-6 bouton pour appliquer le VBA.

Le code VBA pour sélectionner tous les paragraphes d'en-tête:

Sous SelectHeadingParagraphs ()
Dim tempTable comme paragraphe
Application.ScreenUpdating = Faux
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Pour chaque tempTable dans ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading2
Si tempTable.Style = ActiveDocument.Styles (wdStyleHeading2) Alors
'Debug.Print "aaa"
tempTable.Range.Editors.Add wdEditorEveryone
Si fin
Suivant
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub

À noter : cette méthode prend Heading2 comme exemple. Heading2 peut changer pour un autre style de titre.


flèche bleue bulle droiteSélectionnez tous les paragraphes d'en-tête avec Kutool for Word

Existe-t-il un moyen plus simple de sélectionner tous les paragraphes d'en-tête? Kutool for Word est votre meilleur choix. Après avoir installé Kutool for Word, vous pouvez sélectionner tous les titres (paragraphes d'en-tête) en un seul clic.

Kutools for Word, un complément pratique, comprend des groupes d'outils pour faciliter votre travail et améliorer votre capacité à traiter des documents Word. Essai gratuit pendant 45 jours! Achetez-le Maintenant!

Cliquez Kutools >Sélection de paragraphe dans le groupe Sélection de paragraphe. Voir la capture d'écran

doc-select-title-paragraphes-4

Pour plus d'informations sur Sélectionnez les paragraphes d'en-tête de Kutools for Word, veuillez visiter : Sélection de paragraphe Description des fonctions


Meilleurs outils de productivité bureautique

Kutools for Word - Élevez votre expérience Word avec Over 100 Caractéristiques remarquables !

Plongez dans les fonctionnalités mises en évidence ci-dessous ou cliquez ici pour explorer toute la puissance de Kutools for Word.

(I.e. Maîtrise des documents: Pages divisées  /  Fusionner des documents  /  Exporter la sélection dans différents formats (PDF/TXT/DOC/XLSX)  /  Conversion par lots en PDF  /  Exporter des pages sous forme d'images  /  Imprimer plusieurs fichiers à la fois 

Édition du contenu: Rechercher et remplacer par lots sur plusieurs fichiers   /  Redimensionner toutes les images   /  Transposer les lignes et les colonnes du tableau  /  Convertir le tableau en texte 

🧹 Nettoyage sans effortBalayez Espaces supplémentaires  /  Sauts de section  /   Tous les en-têtes  /  Boîtes de texte  /  Liens hypertextes  /  Pour plus d'outils de suppression, rendez-vous sur notre groupe Supprimer

Insertions créatives: insérer Mille séparateurs  /  Cases à cocher  /  Boutons radio  /  code QR  /  Code barres  /  Tableau des lignes diagonales  /  Légende de l'équation  /  Légende  /  Légende de la table  /  Plusieurs images  /  Découvrez-en plus dans notre groupe d'insertion

🔍 Sélections de précision: Identifiez des pages spécifiques  /  les tables  /  formes  /  paragraphes de titre  /  Naviguez en toute simplicité grâce à notre groupe Select

Améliorations des étoiles: Naviguez rapidement vers n’importe quel endroit  /  insertion automatique de texte répétitif  /  basculer de manière transparente entre les fenêtres de document  /  11 outils de conversion 

Transformez vos tâches Word avec Kutools. 👉 Téléchargez avec un essai de 30 jours maintenant 🚀.

 
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This is very useful definitely, thank you very much. Is there a way to add bold text in the selection? what would be the best way to change line 7? I want to get all headings and also all keywords in normal text that are marked bold in the text.
This comment was minimized by the moderator on the site
Thanks, this is very useful. I wanted to select all instances of all Headings at once, so I changed line 7 to this:
If tempTable.OutlineLevel <> wdOutlineLevelBodyText Then
This comment was minimized by the moderator on the site
Thanks, this is very useful. I wanted to select all instances of Heading1 and Heading2 at once, so I changed line 7 to this: If (tempTable.Style = ActiveDocument.Styles(wdStyleHeading1)) Or (tempTable.Style = ActiveDocument.Styles(wdStyleHeading2)) Then
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations