vba turn off shading of selection

[Charles Kenyon]

I am trying to turn off the shading of a range. That is, set it to no shading.
I can set it to white, which usually will be fine, but not turn off shading altogether.

If I set it to Automatic, it is black.

[HansV]

Try this:

Code: Select all

    Dim rng As Range
    Set rng = ...
    With rng.Shading
        .Texture = wdTextureNone
        .ForegroundPatternColor = wdColorAutomatic
        .BackgroundPatternColor = wdColorAutomatic
    End With

[Charles Kenyon]

Thank you. I will give that a try.