Thanks Macropod! That's exactly what I was looking for.
I did have a problem with using .Text = "<[0-9]@>"
It would only report 3, even though I had numbers up to 9 in the doc.
I changed it to .Text = "[0-9]" and it's behaving as expected. I'm not sure what the version you recommended does, or maybe I need to do something different to allow that?


I am setting the Red to RGB values as 255,0,0. Which ends up being wdRed.