Excelのマクロ（VBA）について教えてください。

質問

このようなマクロをつくりたいのですがうまく作れません。
セルをコピーした後、貼り付け先のセルを選択して、
＜ここからがマクロ＞
形式を選択して貼り付け→罫線を除くすべて
＜マクロ終了＞
他の貼り付け方法はうまくできるのですが、「罫線を除くすべて」だけができません。
参考までにこれが作られたVBAです。

Sub Macro1()

Selection.PasteSpecial Paste:=xlAllExceptBorders, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

End Sub

以上です。
どなたかアドバイスよろしくお願いします。

回答No.2

tamagawa49 · ベストアンサー

私はExcel2003を使っていますが、マクロの記録をすると

Sub Macro1()
Selection.PasteSpecial 　　Paste:=xlPasteAllExceptBorders, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub

と記録されました。
ちなみにどちらのマクロでも2003では「罫線なし」の貼り付けが実行されました。従ってExcel2000のバグだと思われます。

ただし、プログラムの実行のバグではなく、マクロ記録のバグのようですので、試しにマクロ文の中身を手で修正して
xlPasteAllExceptBorders
にしてみたらいかがでしょうか。

お礼

ご回答ありがとうございます。
tamagawa49さんの言う通りに、マクロ文を変更したら、できました！
大変助かりました。ありがとうございましたm( )m

回答No.1

snoopy64

僕も同じエラーが出ました。バグみたいです。
全て貼り付けた後、罫線を消す（または付ける）事にしたらどうでしょうか。
頑張ってくださいヽ(^。^)ノ

参考URL：

http://support.microsoft.com/default.aspx?scid=kb;ja;415379&Product=xlw2kINT

お礼

ご回答ありがとうございます。
バグなんですね。ちょっと不便ですが、snoopy64さんのおっしゃる通りにやってみたいと思います。