View Single Post
 
Old 08-15-2023, 04:37 AM
Italophile Italophile is online now Windows 11 Office 2021
Expert
 
Join Date: Mar 2022
Posts: 540
Italophile is just really niceItalophile is just really niceItalophile is just really niceItalophile is just really nice
Default

You can avoid selecting the text by using the following:

Code:
    With ActiveDocument.Content.ParagraphFormat
        .Shading.Texture = wdTextureNone
        .Shading.ForegroundPatternColor = wdColorAutomatic
        .Shading.BackgroundPatternColor = wdColorAutomatic
    End With
Reply With Quote