![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?c9bd177)
No.1ベストアンサー
- 回答日時:
ご参考にどうぞ。
このマクロでは、データ範囲のすぐ下の行も一緒にコピーされてしまいますが、空白のはずなので問題ないと思います。検索されなかった場合は、上記の空白セルの行がコピーされてしまうわけですが、これも空白なので使用上の問題はないかと思います。
Sub test2()
Sheets("Normal").Select
Range("A2").AutoFilter Field:=1, Criteria1:=Sheets("読込").Range("B2"), _
Operator:=xlAnd, Criteria2:=Sheets("読込").Range("C2")
Sheets("Normal").AutoFilter.Range.Offset(1, 0).Copy
Sheets("読込").Select
Range("C3").Select
ActiveSheet.Paste
Sheets("Normal").Select
Application.CutCopyMode = False
ActiveSheet.ShowAllData
Selection.AutoFilter
End Sub
この回答へのお礼
お礼日時:2003/06/13 16:09
ありがとうございます。
他の質問の方も見てくださったんですね。とても嬉しいです。
思い通りに動いてくれました。本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルでフィルタ後の列の重複を回避したい 6 2022/10/13 12:50
- Visual Basic(VBA) エクセルのマクロで対象ごとにシート分けしてその内容をセルに書き込みたい 9 2022/08/24 13:23
- Visual Basic(VBA) Excel vbaについて知恵もしくは、コード教えて下さいm(__)m ① 表にあるデータをコピー、 2 2022/09/01 23:57
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Visual Basic(VBA) エクセルVBA 2 2022/04/27 13:29
- Visual Basic(VBA) VBA 検索と入力 Excel ブック ぶぶぶ シート ししし 列V 検索対象の列です 最終行は、お 6 2023/05/17 01:40
- Excel(エクセル) Excelにて、行の最後のセルの値をコピーして別sheetに張りつけるVBAコードをご教授願います 3 2022/11/20 14:35
- Visual Basic(VBA) エクセルVBAコピー 2 2022/06/08 21:45
- Excel(エクセル) エクセルでフィルタ後、考えている場所に値コピーができない。 1 2022/05/02 21:01
- Visual Basic(VBA) 指定列最終行までのスペースを改行するVBAについて 2 2022/06/01 19:50
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelで行ごとコピー、同じ行を...
-
PDFの一部を切り取って別のシー...
-
【エクセル】表の中の文字だけ...
-
C+vのvは英語で何の頭文字...
-
VBAのテキストボックスに文字列...
-
数式による空白を無視して最終...
-
エクセル VBA・マクロ コピー ...
-
塗りつぶしの色をコピーするには
-
エクセルでコピーしたものをコ...
-
Excel 3列毎のセルを別の表に抽...
-
空白行を無視してコピーするマ...
-
セルに値がある行のみを抽出す...
-
セルから一部だけを抜き出して...
-
コピーされたセルの文字が途中...
-
ショートカットでのコピーと右...
-
エクセルの1件平均の出し方なの...
-
【EXCEL】画像もVLOOKUPさせた...
-
EXCEL 1つ飛ばしのセル参照
-
コピー&貼り付けの仕方を教え...
-
WORDのグレー括弧って?
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelで行ごとコピー、同じ行を...
-
PDFの一部を切り取って別のシー...
-
塗りつぶしの色をコピーするには
-
C+vのvは英語で何の頭文字...
-
Excelで、決まった行を繰り返し...
-
Excel 3列毎のセルを別の表に抽...
-
WORDのグレー括弧って?
-
セルに値がある行のみを抽出す...
-
【エクセル】表の中の文字だけ...
-
VBAのテキストボックスに文字列...
-
EXCEL 1つ飛ばしのセル参照
-
マイナスの場合「xxxx-」...
-
数式による空白を無視して最終...
-
コピーされたセルの文字が途中...
-
セルから一部だけを抜き出して...
-
画面写真でコピーペーストする...
-
空白行を無視してコピーするマ...
-
エクセルでコピーしたものをコ...
-
コピー&貼り付けの仕方を教え...
-
エクセルでマクロにてセル色と...
おすすめ情報