マクロで文字だけ貼り付けるには？

コピーしてあるＨＰ上の文字列をA6セルに貼り付けたいんですが、クリップボードには書式情報も入っている様で、下記のマクロだと後ろのセルが結合されたり色がついたりします。
テキストだけ張り付けるにはどうすれば良いのでしょうか？

Sub ネットから貼付()
Range("A6").PasteSpecial
End Sub

No.4 ベストアンサー 回答者： shishishishi 回答日時： 2003/11/02 19:03

No3です。

へんですね。今も

Sub test()
Range("A6").Select
ActiveSheet.PasteSpecial Format:="テキスト"
End Sub

でやってみましたがちゃんとできました。
HPをコピーしないうちに実行すると「WorksheetクラスのPasteSpecialメソッドが失敗しました」と出ますけど。

わたしのはWin98SE　エクセル2000です。

この回答へのお礼

書き込んでいるうちに再度アドバイスがあったようで、何度もすみません。
いまNo３のお礼に入れましたが半角で上手くいきました。
お手数をお掛けしました。
有難うございました。

お礼日時：2003/11/02 19:27

No.3 回答者： shishishishi 回答日時： 2003/11/01 02:34

> ActiveSheet.PasteSpecial Format:=Text

> でやってみましたが、やはりセルが結合されてHPの色が張り付きます。

Format:=Text ではなくFormat:="テキスト"でやってみてください。

この回答への補足

Sub test()
Range("A6").Select
ActiveSheet.PasteSpecial Format:="テキスト"
End Sub

だと「WorksheetクラスのPasteSpecialメソッドが失敗しました」と出ます。

補足日時：2003/11/02 11:15

この回答へのお礼

時間がたってから済みません。
再度やってみましたら、"テキスト"を半角カナにすると成功しました。
有難うございました。m(_ _)m

お礼日時：2003/11/02 19:19

No.2 回答者： 0shiete 回答日時： 2003/11/01 00:46

Range("A6").PasteSpecial Paste:=xlPasteValues

でしょうか？試していません<(__)>

この回答への補足

エラー1004と出ました。
クリップボードに入ってるのはHPからの文字列なのでxlPasteValuesではダメなのでしょうか？

補足日時：2003/11/01 01:27

No.1 回答者： HageoyaZ 回答日時： 2003/11/01 00:41

真ん中の一行を

ActiveSheet.PasteSpecial Format:="テキスト"
としたらいかがでしょうか？

この回答への補足

Range("A6").Select
ActiveSheet.PasteSpecial Format:=Text
でやってみましたが、やはりセルが結合されてHPの色が張り付きます。

補足日時：2003/11/01 01:26

この回答へのお礼

連絡が遅くなりました。
Format:="テキスト" だとエラーだったので、textにしたらHPの色が付いたりしたんですが、意外と半角カナの"テキスト"を使うと旨くいきました。
有難うございました。　m(_ _)m

お礼日時：2003/11/02 19:18