MS Word VBA Coding Help

Question

I saw this article and it was a huge help.
https://www.datanumen.com/blogs/3-ways-batch-change-text-format-text-boxes-word-document/
But I'm a novice and can't figure out how to code a module to change the font color of all text inside all shapes in my enormous Word document.
I'd be grateful for any help.

Answer 1

The article you reference provide VBA code you can learn from. In the routine they are changing font size with the following:

objShape.TextFrame.TextRange.Font.Size = “16"

To change the color of text, that is also a property of Font. Below is an example you could use to change the color to Blue.

 objShape.TextFrame.TextRange.Font.ColorIndex = wdBlue

You can do a web search on Word VBA Font.ColorIndex Enumeration and get a listing of all the color values.

Answer 2

You can get Word 2013 and other VBA documentation at:

https://www.microsoft.com/en-us/download/details.aspx?id=40326