Exclude superscript footnote numbers when changing the font color in a Word document

Posted on 2016-11-19
Medium Priority
Last Modified: 2016-11-22

Is there a way to format all content in a Word (2010) document except superscript numbers linked to footnotes?

On occasion I paste articles from the internet directly into Word documents. I use the standard Ctrl+v paste (vs. Special or TextOnly) because the articles commonly have numbered footnotes with the numbering in a different colored superscript font. (By the way, I realize — and it's OK — that the numbers link back to the footnote in the original webpage rather than to somewhere later in the Word doc.)

After pasting an article, I've noticed that I can Select All and change the font, the font size, and all of the paragraph settings without affecting the appearance of the footnote numbers. However, as soon as a make a change in the font color, it changes the color of the footnote numbers (but not the superscript format or link function).

Is there a way I can make the color change to all the normal text without affecting the color of the footnote numbers?

Question by:WeThotUWasAToad
LVL 54

Accepted Solution

Rgonzo1971 earned 2000 total points
ID: 41894615
pls try these the first to color in red  the selection all except the footnotes placeholders

Sub Macro1()

For Each Char In Selection.Range.Characters
    If Asc(Char) <> 2 Then
        Char.Font.Color = vbRed
    End If
End Sub

Open in new window

the second to change the color of the footnotes placeholders back to automatic
Sub Macro2()
    Set rng = ActiveDocument.Range
    With rng.Find
        .Replacement.Font.Color = wdColorAutomatic
        .Text = "^f"
        .Replacement.Text = "^&"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .Execute Replace:=wdReplaceAll
    End With
End Sub

Open in new window


Author Closing Comment

ID: 41897957
Thanks for the response.

Featured Post

Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

As a person who answers a lot of questions, I often see code that could be simplified, made easier to read, and perhaps most importantly made easier to maintain if the code was modified to use the Select Case statement. This article explains how to…
Read this tutorial to learn how to fix repeating password error prompts when setting up Gmail IMAP with Microsoft Outlook. The entire process is described with step by step, illustrated instructions. Enjoy...
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…
Look below the covers at a subform control , and the form that is inside it. Explore properties and see how easy it is to aggregate, get statistics, and synchronize results for your data. A Microsoft Access subform is used to show relevant calcul…

624 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question