Print this page | Go back to previous topic
Forum nameThe Computer Forum
Topic subjectRE: batch change the heading level in word 2010
Topic URLhttp://www.pcqanda.com/dc/dcboard.php?az=show_topic&forum=2&topic_id=564212&mesg_id=564231
564231, RE: batch change the heading level in word 2010
Posted by Caerty, Fri May-26-17 09:18 AM
Hi,

1. You can use “Find and Replace" in word , you can choose the heading style in Format for Find Style and Replace Style.

2. You can also promote or demote the level of all Headings

2.1 First of all, click “View” then choose “Outline”.
2.2 In “Outline” view, you press “Ctrl+ A” to select the entire document.
2.3 Next click the single right arrow in “Outline Tools” demote the level of all headings in the document. Or click the single left arrow to promote heading level. Each click promotes or demotes one level a time. So, make one or multiple clicks accordingly.
2.4 Lastly, click “Close Outline View” to exit.

3. or you can use VBA
Sub PromoteOrDemoteParagraph()
Dim strRule As String

Selection.WholeStory
strRule = InputBox("To promote heading level, enter p" & vbNewLine & "To demote heading level, enter d")

If strRule = "p" Then
Selection.Paragraphs.OutlinePromote
Else
Selection.Paragraphs.OutlineDemote
End If
Selection.Collapse wdCollapseStart
End Sub

Here is teh article I find this way,

https://www.datanumen.com/blogs/3-ways-batch-promote-demote-heading-levels-word-document/

Hope it helps.