Reversing italics

P

Paul MR

I converted several pages of text from Word Perfect to Word 2000. In
the WP original roughly every 200th word was italicized. In Word it's
all reversed: the originally italicized words are in normal text and
everything else is in italics. Is there a painless way in Word to
reverse this back to the way it was?
 
G

Graham Mayor

As we know little about your document, I suspect you will need a macro. The
following should work:

Sub ReplaceExample()
With Selection
With .Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = ""
.Font.Italic = False
.Replacement.Text = ""
.Replacement.Font.Underline = wdUnderlineDotDash
.Forward = True
.Wrap = wdFindContinue
.format = True
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
.Execute Replace:=wdReplaceAll
Selection.HomeKey wdStory
.ClearFormatting
.Replacement.ClearFormatting
.Font.Italic = True
.Replacement.Font.Italic = False
.Execute Replace:=wdReplaceAll
Selection.HomeKey wdStory
.ClearFormatting
.Replacement.ClearFormatting
.Font.Underline = wdUnderlineDotDash
.Replacement.Font.Underline = wdUnderlineNone
.Replacement.Font.Italic = True
.Execute Replace:=wdReplaceAll
End With
End With
End Sub

http://www.gmayor.com/installing_macro.htm

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 
J

Jean-Guy Marcil

Paul MR was telling us:
Paul MR nous racontait que :
I converted several pages of text from Word Perfect to Word 2000. In
the WP original roughly every 200th word was italicized. In Word it's
all reversed: the originally italicized words are in normal text and
everything else is in italics. Is there a painless way in Word to
reverse this back to the way it was?

You could use Find/Replace.

1) On the tool bar, set a Highlight colour, such as yellow.
2) Do (CTRL-h) to open the "Find and Replace" dialogue. Find all non-italic
words (With the cursor in the "Find what:" field, do (CTRL-i) until it says
"Font: Not Italic" beneath the field) and replace by Highlight (Find/Replace
uses the current High light colour) - you may need to click on "More" in
order to get to the "Format" button to set Highlight as a replace parameter
3) Do (CTRL-a) in the document to select all the content
4) Remove all italics (CTRL-i) and unselect the document content by clicking
anywhere once.
5) Reset the highlight colour to "None" on the toolbar.
6) Find all words formatted with Highlight and replace with Highlight (Which
is now "None," so it will effectively remove the highlighting) and italic.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top