Please Note: This article is written for users of the following Microsoft Word versions: 2007, 2010, and 2013. 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: X-ing Out Text.
Written by Allen Wyatt (last updated January 9, 2023)
This tip applies to Word 2007, 2010, and 2013
Cindy asked if there is a way to "type over" words with a different character. In particular, she wanted to "x" out some characters. She doesn't want to do a strikethrough, but actually use the "x" character to type over characters already in the document.
The best way to do this in Word is to use EQ field with the \o (overtype) switch. Follow these steps:
eq \o(my text,xxxxxxx)
This field approach works great for short text selections, and you could always convert it into a macro if you have lots of text you want to affect in this manner. The following macro carries this concept even further—it displays the overtype x characters in red, and it doesn't overtype spaces:
Sub OverstrikeWithX2() Dim i As Integer MyString = Selection.Text ' Insertion point only/single character/multiple character range handler If Selection.Characters.Count = 1 Then Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend If Selection.Characters.Count = 2 Then Selection.MoveLeft Unit:=wdCharacter, Count:=2, Extend:=wdExtend Else Selection.MoveLeft Unit:=wdCharacter, Count:=1 End If Else Selection.MoveLeft Unit:=wdCharacter, Count:=1 End If ' end range handler For i = 1 To Len(MyString) Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend ' paragraph marker and space handler If Selection.Text = Chr(13) Or Selection.Text = " " Then While Selection.Text = Chr(13) Or Selection.Text = " " If i = Len(MyString) Then Selection.MoveRight Unit:=wdCharacter, Count:=1 Exit Sub Else i = i + 1 Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.MoveRight Unit:=wdCharacter, Count:=1, _ Extend:=wdExtend End If Wend End If ' end paragraph marker & space handler With Selection .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, _ PreserveFormatting:=False .TypeText Text:="eq \o(" .MoveRight Unit:=wdCharacter, Count:=1 .TypeText Text:=",x)" .Delete Unit:=wdCharacter, Count:=1 ' The next three lines turns the overstike "x" red .MoveLeft Unit:=wdCharacter, Count:=1 .MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend .Font.Color = wdColorRed .Fields.ToggleShowCodes .MoveRight Unit:=wdCharacter, Count:=1 End With Next i End Sub
The macro adds a single field for each character being overtyped, and is therefore appropriate for text of almost any length.
There is also an entirely different approach you may want to try, this time using text boxes. Create a text box and inside of it type as many x characters as desired in the font and size desired. Make sure the text box is formatted so it has no fill (which makes it transparent), has no border, and floats over text with no text wrapping. Drag the text box over the text to be x-ed out and size as necessary.
Note:
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (2532) applies to Microsoft Word 2007, 2010, and 2013. You can find a version of this tip for the older menu interface of Word here: X-ing Out Text.
The First and Last Word on Word! Bestselling For Dummies author Dan Gookin puts his usual fun and friendly candor back to work to show you how to navigate Word 2013. Spend more time working and less time trying to figure it all out! Check out Word 2013 For Dummies today!
Want to quickly format some text in your document? Select, right-click, and make a selection, and you can get to the ...
Discover MoreWhen you open documents that were created a long time ago on a system far, far away (sounds almost epic, doesn't it?), ...
Discover MoreIf you need to remove any explicit character formatting from some text, you'll want to commit the shortcut in this tip to ...
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
2018-10-26 10:06:29
Danny Nicholas
On Word 2016 (Maybe most Word versions), this does not actually replace the text. It just inserts x'ed out text at the insertion point, leaving you with the task of removing the unaltered text. Still useful and fun, since xxxxx is not the only option (pretty much anything except ) and you could probably use \) )
2015-02-03 21:20:03
I have followed the instructions above exactly as listed. It doesn't work. Am I doing something wrong? Please advise.
2015-01-30 14:26:34
Paul Lagasse
Thanks for the macro. An interesting editing option that I had never thought of before, but I can foresee it being useful in certain situations.
2015-01-24 18:00:37
whatabob
In following precisely the instructions for manual execution of this tip, I find that the text to be overprinted is not replaced by its overprinted self. If the text to be affected is first selected, then Cut (ctl-X), it can be pasted (ctl-V) following the "[ctl-F9]eq o("; and finally followed by the comma the appropriate number of overprint characters, and "[shift-F9])". This leaves a clean overprinted rendering.
I believe that the suggested macro could be modified to achieve this complete action by appending the overprint character to the target text, and then selecting it and the text to be overprinted — prior to invoking the macro. I'll try to recoup my macro skills by attempting this modification.
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.
Visit the WordTips channel on YouTube
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2024 Sharon Parq Associates, Inc.
Comments