Please Note: This article is written for users of the following Microsoft Word versions: 2007, 2010, 2013, 2016, 2019, and 2021. If you are using an earlier version (Word 2003 or earlier), this tip may not work for you. For a version of this tip written specifically for earlier versions of Word, click here: Unwanted Styles.

Unwanted Styles

Written by Allen Wyatt (last updated March 17, 2018)
This tip applies to Word 2007, 2010, 2013, 2016, 2019, and 2021

Rhana asked for a way to remove unwanted styles from the Style drop-down list on the Formatting toolbar. There is no easy way to do this; in fact, some styles are included on the list by default. For instance, Normal and three Heading styles are always visible. If you have additional styles showing up which you know you don't use and should not be there, then the only successful way to remove the styles from the drop-down list is to effectively recreate the document. This is not quite as drastic as it sounds however; you can follow these general steps:

Save your document in RTF format, but append the .TXT extension. Then close the file.
Open the newly saved document file in a text editor (such as Notepad) so that you can see the RTF code. Here is a sample of the RTF code for a footer (note the definition of the style is contained between curly brackets):

{\s242\tqc\tx4320\tqr\tx8640 \fs20\lang1033 \sbasedon0\snext242 footer;}

Use the text editor's Find command to search for the unwanted style's name. Thus, if you wanted to get rid of Heading 5, you would search for “Heading 5”.
Delete all information between the brackets, as well as the brackets themselves, for the unwanted style.
Save and close the file.
Open the file in Word. Allow Word to convert the RTF file into a Word document file.
Look in the Style drop-down list to verify that the unwanted styles are missing.
Save the file as a Word document.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (8522) applies to Microsoft Word 2007, 2010, 2013, 2016, 2019, and 2021. You can find a version of this tip for the older menu interface of Word here: Unwanted Styles.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. Learn more about Allen...

MORE FROM ALLEN

Displaying Negative Times

Excel allows you to perform math using times as operands. If you subtract a later time from an earlier time, you should ...

Discover More

Finding Fields

Fields allow you to add simple dynamic content to your document. Here's how you can find the fields when you need to know ...

Discover More

Jumping to a Specific Cell Using a Hyperlink

Excel allows you to define hyperlinks in your worksheets, and these can target specific cells on other worksheets. Here ...

Discover More

Do More in Less Time! Are you ready to harness the full power of Word 2013 to create professional documents? In this comprehensive guide you'll learn the skills and techniques for efficiently building the documents you need for your professional and your personal life. Check out Word 2013 In Depth today!

More WordTips (ribbon)

Changing the Names of Multiple Styles

Want to change the names assigned to a large group of styles? You can make the task a snap with the macro presented in ...

Discover More

Moving All Headings Down One Level

Do you want to demote all the headings in your document by one level? There are some great tools built into the program ...

Discover More

Searching for Styles

If you use styles to format your text, you can later search for words and phrases that are formatted using various ...

Discover More

FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] (all 7 characters, in the sequence shown) in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

Notify me about new comments ONLY FOR THIS TIP

Notify me about new comments ANYWHERE ON THIS SITE

Hide my email address

What is 0 + 7?

2018-03-19 13:51:54

mzk

Whoa! BTW, wouldn't you have to change txt back to rtf first?

2018-03-19 11:15:32

Susan Uttendorfsky

This is very useful to me. I frequently receive documents that were written in R2L format, and to add to the chaos, they've been opened and edited in various versions of Word and in various operating systems. Many times there are a ton of unused styles listed that were carried along from computer to computer. Some I can right-click and Delete, but some seem to be more deeply embedded and I can't delete them. I suspect this will work much better!

Susan Uttendorfsky
Adirondack Editing

2018-03-18 05:31:33

Ken Endacott

Jan-Christian. The macro that you quote comes from the tip:
https://word.tips.net/T001337_Removing_Unused_Styles.html

However there is a big problem with this macro because the statement oStyle.Delete is slow and it can take around an hour if there are several dozen styles to delete. A very much faster command is OrganizerDelete. See the comments in the above tip for details.

2018-03-17 07:46:39

Alison

I usually do this by deleting the unwanted styles (and/or modifying/replacing them with the ones I prefer) and saving it as a Word template, which I can then apply as required to any document.

2018-03-17 07:13:22

Jan-Christian Lupander

Re Removing unwanted styles

This is what I have been using:

Sub Stylecleaner()
Dim oStyle As Style
For Each oStyle In ActiveDocument.Styles
'Only check out non-built-in styles
If oStyle.BuiltIn = False Then
With ActiveDocument.Content.Find
.ClearFormatting
.Style = oStyle.NameLocal
.Execute FindText:="", Format:=True
If .Found = False Then oStyle.Delete
End With
End If
Next oStyle it's
End Sub

Note: I might well have picked up this macro, or at least the idea somewhere, so I make no claim to be the creator of it!

2018-03-17 04:54:30

Rhonda Bracey

Another quick method is to delete them via the Organizer. See this blog post of mine for details: https://cybertext.wordpress.com/2010/01/28/word-remove-unwanted-styles-quickly/

--Rhonda

This Site

Got a version of Word that uses the ribbon interface (Word 2007 or later)? This site is for you! If you use an earlier version of Word, visit our WordTips site focusing on the menu interface.