copyで張りつけられないってエラーは出ないと思うんだが
コピー時にエラーがでるのか貼り付け時にエラーがでるのか?

ActiveSheet指定したときに、実際は何が対象になってるか確認してみろよ
実際にコピーされているものが何かも確認してみろよ