Please Note: This article is written for users of the following Microsoft Word versions: 97, 2000, 2002, and 2003. If you are using a later version (Word 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Word, click here: Applying Bold Italics.

Applying Bold Italics

by Allen Wyatt
(last updated April 18, 2017)

3

As I am formatting documents, there are many times I need a particular word or passage to be formatted in both bold and italics. Word includes tools (on the Formatting toolbar) that apply bold and italics, but not bold italics. I got tired of doing two clicks, so I created my own tool to apply both formats at once. The resulting macro can then be assigned to a toolbar tool, right next to the Bold and Italics tools.

The simplest way to do this is with a macro as follows:

Sub BoldItalics1()
    Selection.Font.Bold = True
    Selection.Font.Italic = True
End Sub

This macro turns on the attributes, but it doesn't do any toggling. In other words, you can't turn off bold italics by using the same macro, as you can with the individual Bold and Italics tools. This led to the "next generation" macro, which checks to see the state of the selected text before making any changes:

Sub BoldItalics2()
    Dim BIStatus As Integer

    BIStatus = 0
    If Selection.Font.Bold Then BIStatus = BIStatus + 1
    If Selection.Font.Italic Then BIStatus = BIStatus + 1

    If BIStatus = 0 Then
        Selection.Font.Bold = True
        Selection.Font.Italic = True
    End If
    If BIStatus = 1 Then
        Selection.Font.Bold = True
        Selection.Font.Italic = True
    End If
    If BIStatus = 2 Then
        Selection.Font.Bold = False
        Selection.Font.Italic = False
    End If
End Sub

The first lines of the macro increment a variable (BIStatus) depending on whether the Bold or Italic properties are set for the selection. When these lines are complete, BIStatus will be 0 if the selected text is neither bold nor italic, 1 if it is either bold or italic, or 2 if it is both bold and italic.

If BIStatus is set to 0 or 1, then the Bold and Italic properties for the selected text are set. If they were previously set (BIStatus is 2), then both properties are turned off.

Note:

If you would like to know how to use the macros described on this page (or on any other page on the WordTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (606) applies to Microsoft Word 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Word (Word 2007 and later) here: Applying Bold Italics.

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. ...

MORE FROM ALLEN

Jumping To a Comment

Got a document with lots of comments in it? You can navigate from comment to comment with ease by using the Go To tab of ...

Discover More

Converting From Numbers to Text

If you have a range of numeric values in your worksheet, you may want to change them from numbers to text values. Here's ...

Discover More

Adding Hyperlinks to an Index

Word provides a full set of tools you can use to generate an index for your document. One thing you can't do, however, is ...

Discover More

Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!

More WordTips (menu)

Changing the Height of a Font

Scaling the width of a font is easy to do with Word's formatting capabilities. Scaling the height of the fonts is not so ...

Discover More

Underlining Quoted Text

Do you have a document in which you need to convert all the quoted text (text surrounded by quotes) to underlined text? ...

Discover More

Understanding Underlines

Part of the formatting you can add to your text is underlining. That simple word (underlining) represents quite a few ...

Discover More
Subscribe

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}] 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.

What is 6 + 4?

2017-07-31 01:23:53

Vengala Reddy Ch

I have created styles in word 2013. After applying styes If I want make particular word or para bold or italic it's applying to whole document why?
Could you please suggest?


2017-01-10 10:37:19

Dan

Would it be neater to use

If BIStatus < 2 Then

instead of two separate IF statements for 1 and 0?


2016-04-16 11:23:31

Adrian

Allen,

I have a bunch of already existing text in Word 2002 that I need to bold and italicize the first paragraph letter. How do I do this, other than manually?

Thanks so much for answering!

Adrian


This Site

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

Newest Tips
Subscribe

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

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.