求能自动“矩形”选定文字让其变颜色的VBA代码

13907933959

1、选定文档每段首行缩进开头的第一个字。选定后让字体变为白色。
2、“矩形”选择文档每行开头的第一个字（首行缩进的除外）选定后让字体变为紫色。
3、“矩形”选择文档每行开头的第二个字（首行缩进的除外）选定后让字体变为黄色。
4、“矩形”选择文档每行开头的第三个字（首行缩进的除外）选定后让字体变为黑色。
5、“矩形”选择文档每行开头的第四个字（首行缩进的除外）选定后让字体变为红色。

代码最好能每段分开用，也能合起来用。恳请懂的前辈们赐教、谢谢！

蓝桥玄霜

建议上传表格附件来说明问题。

13907933959

蓝桥玄霜 发表于 2015-6-14 09:18
建议上传表格附件来说明问题。

前辈好！

谢谢前辈的回复，我的不是表格，是Word文档。如下面上传的附件。还请前辈赐教能在文档内自动“矩型”选定文字让其变颜色的VBA代码。谢谢！