Ok,

Run this macro:

Sub MyRightFormat()
Dim oRng As Word.Range
Set oRng = ActiveDocument.Range
With oRng
.Font.Color = wdColorBrightGreen
.Font.Size = 31
.Italic = True
.Underline = wdUnderlineDouble
End With
MsgBox "This is my idea of a well formatted document. Do you agree?"
End Sub

Wanda, what your real question?

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


wanda wrote:
I have a document in word office - document was transferred from an
old word perfect program. After downloading the document, the format
is wrong.