VBA POWERPOINT：将带有格式的文本从Powerpoint复制到单词

Question

Right now I'm copying text into word like so:

wrdDoc.Range.InsertAfter someShapeWithText.TextFrame.TextRange.Text & vbCr & vbCr

I want it to copy with formatting ie certain words are bolded, coloured, etc. Cant quite figure out how to do it. Fairly new to VBA.

Answer 1

You need to trigger copy and paste to keep formatting. I think you could go this way (using your variables which I couldn't test)

someShapeWithText.TextFrame.TextRange.Copy
wrdDoc.Range.Paste