Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


68673 / 76734 ←次へ | 前へ→

【12593】オートフィルタ
質問    - 04/4/8(木) 16:24 -

引用なし
パスワード
   初めて投稿させて頂きます
sheet1のデータをオートフィルタで検索して、それをsheet2に貼り付けたいのですが、下記のように試したところ、
Selection.AutoFilter Field:=5, Criteria1:="トヨタホームつくし株式会社"
  ActiveWindow.SmallScroll Down:=-21
  Range("C7:L41").Select
  Selection.Copy
  Selection.AutoFilter Field:=5
  Sheets("つくし").Select
  Range("A5").Select
  Sheets("つくし").Paste
End Sub
Sheets("つくし").Pasteの部分がエラーになるのですがなぜなのですか?

2 hits

【12593】オートフィルタ 04/4/8(木) 16:24 質問
【12595】Re:オートフィルタ IROC 04/4/8(木) 17:25 回答
【12609】Re:オートフィルタ 04/4/9(金) 10:49 質問
【12610】Re:オートフィルタ ぴかる 04/4/9(金) 11:04 回答

68673 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free