Please Note: This article is written for users of the following Microsoft Word versions: 2007 and 2010. 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: Applying Bold Italics.

Applying Bold Italics

by Allen Wyatt
(last updated December 25, 2015)

5

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 Home tab of the ribbon) 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 the Quick Access Toolbar.

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.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (12122) applies to Microsoft Word 2007 and 2010. You can find a version of this tip for the older menu interface of Word 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

Rounded Table Edges

Tables can be a great addition to many documents, as they allow you to arrange and present information in a clear and concise ...

Discover More

Incrementing References by Multiples when Copying Formulas

You can easily set up a formula to perform some calculation on a range of cells. When you copy that formula, the copied ...

Discover More

Determining the Hour of the Day

Need to figure out the hour represented by a particular time value? It's easy to do in a macro; just use the Hour function, ...

Discover More

Learning Made Easy! Quickly teach yourself how to format, publish, and share your content using Word 2013. With Step by Step, you set the pace, building and practicing the skills you need, just when you need them! Check out Microsoft Word 2013 Step by Step today!

More WordTips (ribbon)

Understanding Strikethrough Formatting

The strikethrough text feature in Word can be used as part of your document or to indicate that changes have been made to the ...

Discover More

Applying Formatting to Words

You don't have to select whole words before applying direct character formatting. With the proper Word options set, simply ...

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

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 + 0?

2015-12-27 06:15:05

ken Endacott

The following macro will change the selection from no formatting to both bold and italic and if run again will toggle back to no formatting.

The macro has another useful feature. If the selected text is bold only it will change it to italic only and vice versa.

Sub BoldItalics3()
With Selection.Font
.Bold = Not .Bold
.Italic = Not .Italic
End With
End Sub


2015-12-26 13:07:30

Karl

I usually do this by Selecting then Ctrl-B. Ctrl-I. If there are more sections to do then clicking in the already formatted section and double-clicking Format Painter button (to lock it on) allows one to do both changes by dragging mouse over the text to be changed.


2015-12-26 00:13:50

Muhammad Aamir

How i will type this forumlas
and where i will type these formulas


2015-12-25 11:54:07

Zvi

Rod:
Very elegant


2014-06-09 12:22:58

Rod Grealish

Essentially there is one decision to be made - is the selected text bold and italic? If so, make it non-bold and non-italic. In all other cases make it bold and italic.

Sub BoldItalics3()
'
' Combined Bold and Italic formatting
'
With Selection.Font
If .Bold And .Italic Then
.Bold = False
.Italic = False
Else
.Bold = True
.Italic = True
End If
End With
End Sub

(I have used a With statement to factor out the Selection.Font object.)


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.

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.