Please Note: This article is written for users of the following Microsoft Word versions: 2007, 2010, 2013, and 2016. 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 June 9, 2018)

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:

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 (12122) applies to Microsoft Word 2007, 2010, 2013, and 2016. 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

Conditionally Deleting Rows

Want to delete a bunch of rows in a worksheet based on the value in a certain cell of each row? There are a couple of ...

Discover More

Changing Fonts in Data Validation Drop-Down Lists

The data validation capabilities of Excel allow you to easily create drop-down lists showing what data is acceptable for ...

Discover More

Changing How the Power Button Behaves

When you shut down your system, you normally use the Power button that is visible after you click the Start button. You ...

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)

Using a Macro to Change the Formatting of All Instances of a Word

If you have a word that you need to make sure is formatted the same way throughout your document, there are several ways ...

Discover More

Changing Kerning

When you need to adjust the space Word uses between characters, you need to adjust what is called “kerning.” This tip ...

Discover More

Specifying Font Styles

Fonts, by default, come with one or more styles that define variations of how that font is displayed in your document. ...

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 five less than 7?

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.