现在我正在将文字复制到文字中：
wrdDoc.Range.InsertAfter someShapeWithText.TextFrame.TextRange.Text & vbCr & vbCr
我希望它用格式复制，即某些单词是粗体，彩色等。 无法弄清楚如何做到这一点。 VBA相当新的。
答案 0 :(得分：0)
您需要触发copy和paste以保持格式化。我想你可以这样（使用你无法测试的变量）
someShapeWithText.TextFrame.TextRange.Copy
wrdDoc.Range.Paste