形式を選択して貼り付け→テキスト のマクロ

ワードXPです。
形式を選択して貼り付けのマクロができません。
マクロを
編集→形式を選択して貼り付け→テキスト→ok→登録
つくります。
しかし、これでマクロをつくると普通の貼り付けになってしまいます。

どうすれば、テキストが貼り付けられるでしょうか。
よろしくお願いします。

No.1 ベストアンサー 回答者： enunokokoro 回答日時： 2008/04/26 17:58

テキストとしての貼り付けが[マクロ記録]されないためですね。

記録されたものは以下のようになっています。

Sub Macro1()
'
' Macro1 Macro
' 記録日 平成20年*月**日 記録者 **********
'
Selection.PasteAndFormat (wdPasteDefault)
End Sub
　　　　　　↓

これでは単なる貼り付けをしたのと同じなので" wdPasteDefault "を
" wdPlainText "に変更します。
　　　　　　↓

Sub テキスト貼り付け()
'
' テキスト貼り付け Macro
' 記録日 平成20年*月**日 記録者 **********
'
Selection.PasteAndFormat (wdFormatPlainText)
End Sub

No.3 回答者： yasu182 回答日時： 2008/04/27 12:30

http://okwave.jp/qa2428257.html

私も以前に似たような質問をしました
参考にしてくださいね

No.2 回答者： mshr1962 回答日時： 2008/04/26 17:59

下記のコードでできませんか？

Selection.PasteAndFormat (wdFormatPlainText)