将表格转换为文本并匹配分隔符的颜色

Question

我有一个大表，每个单元格都有一个着色的单词。我想将此表转换为文本，以便我可以在其上执行其他功能。

问题是Word输入的分隔符是默认颜色，因此我生成的文本将是（蓝色文本）（黑色分隔符）（绿色文本）（黑色分隔符）（黄色文本）等等。

有没有办法用与上一个或后一个词相同颜色的分隔符查找/替换每个分隔符？

以下是我目前的情况：

Sub PrepareTable()

With Selection
.WholeStory
.PasteExcelTable False, False, False
.Tables.Item(1).Columns(1).Delete
.Tables(1).Range.Select
.Rows.ConvertToText Separator:=wdSeparateByDefaultListSeparator, _
    NestedTables:=True
End With

End Sub