ここから本文です

VBAについて オートフィルタで抽出した表をSpecialCellsでコピーして 他のシート...

このエントリーをはてなブックマークに追加

質問者

ygrpk389さん

2011/4/415:57:28

VBAについて
オートフィルタで抽出した表をSpecialCellsでコピーして
他のシートに貼り付けようしたらエラーが発生して貼り付け
できない状況です。

解消方法を教えて下さい・・・。
原因が全然わかりません。。。

実行時エラー'1004':

コピー領域と貼り付け領域の形が違うため、情報を貼り付けることができません。情報
を貼り付けるには、次のいずれかの操作を行ってください:

?1つのセルをクリックし、貼り付けてみてください。
?貼り付け元の形を確かめ、適切な範囲を選択したあと、貼り付けてみてください。

補足ご回答ありがとうございます。
コピー元のシートは結合だらけです。
コピー先のシートに結合は一切ありません。
「解除」するというのは、コピー元のシートの結合を全てやめないと貼り付けできない
ということでしょうか??
つまりコピー元に結合セルがある貼り付けはVBAではできないということでしょうか?

手動で貼り付けすると、結合の貼り付けも含めてうまくいくのですが。。。

閲覧数:
957
回答数:
2
お礼:
25枚

違反報告

ベストアンサーに選ばれた回答

hige_082さん

2011/4/516:05:46

ygrpk389さん

説明不足です
結合も行方向の結合、列方向の結合によっても違います

コードが分らないので、確実なことはいえませんが、手動で出来るのなら
試しに、貼り付け部分のコードを下記のコードに置き換えてみてください

Sheets("コピー先").Select
Range("A1").Select
ActiveSheet.Paste

参考まで

質問した人からのコメント

2011/4/6 08:15:49

ご回答ありがとうございました。
Worksheets("").を前につけたら解消しました。

ちょい足しを取り消しますが
よろしいですか?

  • 取り消す
  • キャンセル
  • このエントリーをはてなブックマークに追加

このQ&Aで解決しましたか?質問する

閉じる

ベストアンサー以外の回答

1〜1件/1件中

グレード

カテゴリマスター

2011/4/416:28:54

こんにちは。
セルの結合が、コピー前のシートにあるのか、コピー先のシートにあるのか、その両方か、を確認してください
オートフィルターでセルをコピーする場合、よくあるエラーです。その場合は結合の解除をしてください

ちょい足しを取り消しますが
よろしいですか?

  • 取り消す
  • キャンセル

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

ID/ニックネームを選択し、「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問や知恵ノートは選択されたID/ニックネームのMy知恵袋で確認できます。

ほかのID/ニックネームで利用登録する