You need to wrap your working code inside a loop that processes each 'StoryRange' in the document. There are plenty of examples on this forum and you can do a wider search if this post doesn't help.
https://www.msofficeforums.com/word-...fic-color.html

__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia