Hi lordofscones,
Here's a macro to restore the italics. To use it, open both documents, activate the original document, add the macro to it, switch back to the document view, then run the macro (via Alt-F8).
Code:
Sub Reformat()
Dim Doc As Document, i As Long, j As Long
Set Doc = ActiveWindow.Next.Document
With ActiveDocument.Range
With .Find
.ClearFormatting
.Text = ""
.Font.Italic = True
With .Replacement
.ClearFormatting
.Text = ""
End With
.Forward = True
.Wrap = wdFindStop
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute
End With
Do While .Find.Found
i = .Start
j = .End
Doc.Range(i, j).Font.Italic = True
.Collapse wdCollapseEnd
.Find.Execute
Loop
End With
End Sub
Aside from the italics, is there any other formatting that should be preserved?