Red Text

  • Thread starter Thread starter Johnnyboy5
  • Start date Start date
J

Johnnyboy5

Red Text


I have a template document - in which some the text in various places
is in RED “instructions etc” which is to be deleted before its saved.

Can someone suggest a “macro” which can select all the “RED” text and
then delete it.

Thanks

Johnny
 
Sub DeleteRed()
Dim orng As Range
Set orng = ActiveDocument.Range
With orng.Find
.Font.Color = wdColorRed
Do While .Execute(Forward:=True)
orng.Delete
Loop
End With
End Sub

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

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

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

Red Text


I have a template document - in which some the text in various places
is in RED “instructions etc” which is to be deleted before its saved.

Can someone suggest a “macro” which can select all the “RED” text and
then delete it.

Thanks

Johnny
 
Graham has provided the macro you need, but you don't really need a macro if
you're doing it yourself:

1. Ctrl+H to open the Replace dialog.

2. Click More to expand the dialog.

3. With the insertion point in the (empty) "Find what" box, click Format,
then Font, and choose red as the color. You will see "Format: Font color:
Red" under the "Find what" box.

4. Leaving the "Replace with" box empty, click Replace All.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org

Red Text


I have a template document - in which some the text in various places
is in RED “instructions etc” which is to be deleted before its saved.

Can someone suggest a “macro” which can select all the “RED” text and
then delete it.

Thanks

Johnny
 
Graham has provided the macro you need, but you don't really need a macroif
you're doing it yourself:

1. Ctrl+H to open the Replace dialog.

2. Click More to expand the dialog.

3. With the insertion point in the (empty) "Find what" box, click Format,
then Font, and choose red as the color. You will see "Format: Font color:
Red" under the "Find what" box.

4. Leaving the "Replace with" box empty, click Replace All.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USAhttp://word.mvps.org


Red Text

I have a template document - in which some the text in various places
is in RED “instructions etc” which is to be deleted before its saved.

Can someone suggest a “macro” which can select all the “RED” textand
then delete it.

Thanks

Johnny

Thanks both, went for Graham's macro - as its a one click action.

Thanks Graham -

Johnny
 

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

Similar Threads

Now getting red text 20
Little red X 6
Track Changes 4
Comments to Text 3
VBA to select font/colour not working 1
Little red X again 1
red dotted underlined text 2
Apple launches red iPhone 7 and 7 Plus, and new iPad 3

Back
Top