It sounds pretty simple. I am trying to create copy Outlook’s e-mail bodytext with "Match Destination Formatting" to a placeholder text in a Word document.

I have been trying for hours to record different workflows. None of them are working. I am using Office 2003 and VB 6.5

Here’s my VBA code.

Public Sub CopyPaste()
Selection.Copy
Dim objDoc As Word.Document
Selection.PasteAndFormat (wdFormatSurroundingFormattingWithEmphasis)
Set objDoc = Nothing
Set objSel = Nothing
End Sub


Where can I download templates for this simple workflow? Thank you any advice or help.