[v12345]

можно подробнее? »

Все просто:

Код:

Sub PasteOnlyText()
On Error Resume Next
    Selection.PasteSpecial Link:=False, DataType:=wdPasteText, Placement:=wdInLine
End Sub

В крайнем случае можно просто записать макрорекодером цепочку действий: вкладка Главная - стрелка под кнопкой Вставить - Специальная вставка - Неформатированный текст.