excel中使用VBA 改变word字体颜色保存退出后颜色未改变

蜗牛耶

首次在excel中使用VBA 改变test.docx文件中所有字体颜色从黑色改为蓝色，保存退出后可以得到正确的结果，文件所有字体颜色都改变为蓝色。
再运行程序将字体颜色从蓝色变为黑色时，发现保存退出后颜色未改变，文件所有字体颜色还是蓝色。
为什么同样的代码，运行结果不一样。
整蒙了，求大神们指点迷津~


Sub test()
    Dim WordApp, WordDoc As Object
    Dim path As String

    path = ThisWorkbook.path

    Set WordApp = CreateObject("Word.Application")
'    WordApp.Visible = True

    Set WordDoc = WordApp.Documents.Open(path & "\test.docx")

    WordDoc.Application.Selection.WholeStory

    WordDoc.Application.Selection.Font.ColorIndex = 1 '黑色
'    WordDoc.Application.Selection.Font.ColorIndex = 2 '蓝色


    WordDoc.Close True
    Set WordDoc = Nothing

    WordApp.Quit
    Set WordApp = Nothing

End Sub

蜗牛耶

之前代码用的wps，发现换成office，运行正常，怀疑是wps的原因，谢谢各位，问题解决了。