View Single Post
 
Old 08-16-2023, 07:14 AM
darkmaster006 darkmaster006 is offline Windows 10 Office 2021
Novice
 
Join Date: Aug 2023
Posts: 10
darkmaster006 is on a distinguished road
Default

Thank you both!

Quote:
Originally Posted by Italophile View Post
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
This seems to be the best solution. It, indeed, avoids selecting the text, which is what I wished to happen.
For texts that are all formatted as "one paragraph", this works perfectly. Example:


This gets "cleaned" well, like this:


Yet, when I get a text that has "multiple paragraphs", like this:


Nothing gets changed. Do you have any idea how to do it to texts like these too? The only way I've found, so far, is to paste them to another document, without formatting. It's not ideal, but it's what I've found worked so far. There must be an easier way to do it in-document and with macros, like the code above.
Reply With Quote