Excel VBA質問箱 IV

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

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


68896 / 76734 ←次へ | 前へ→

【12362】見出し項目をのぞいてコピー
質問  SF  - 04/4/1(木) 0:54 -

引用なし
パスワード
     品名   個数   金額
1 りんご   1    500
2 バナナ   2    300
3 りんご   4    2000
4 バナナ   2    300

というデータを「りんご」でオートフィルタすると
  品名   個数   金額
1 りんご   1    500
3 りんご   4    2000

となりますが、これを別のブックに見出し項目をのぞいたデータ部分のみ
コピーしようと考えています。

行番号が1と3となってしまい、うまくいかないので
    With Range("a1:c5")
      .AutoFilter field:=1, Criteria1:=りんご
      .SpecialCells(xlCellTypeVisible).Copy
    End With
とやってみたのですが、これだと見出し項目もコピー対象になっちゃうんですよね。
上手い方法はないでしょうか?
初歩的な質問で申し訳ありません・・・
1 hits

【12362】見出し項目をのぞいてコピー SF 04/4/1(木) 0:54 質問
【12363】Re:見出し項目をのぞいてコピー IROC 04/4/1(木) 9:28 回答
【12364】Re:見出し項目をのぞいてコピー IROC 04/4/1(木) 9:29 回答
【12369】Re:見出し項目をのぞいてコピー Jaka 04/4/1(木) 13:08 回答
【12390】Re:見出し項目をのぞいてコピー SF 04/4/2(金) 2:53 お礼

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