質問: マクロで抽出結果のコピーをする。 マクロで抽出したデータ(複数のブック)を他のブックに貼りつけようとしてるのですが、抽出結果が何も無い場合に抽出元データのコピー範囲以外が貼りつけられます。 具体的には、 ブックが2つ(1、2) 抽出条件は日付が2018/11/14~2018/11/19のデータ コピーはaの3行目からと指定してます。 (貼りつけ元データ1) a b c 1 2(No) (日付) (氏名) 3 1 2018/11/14 佐藤 4 2 2018/11/22 小川 (貼りつけ元データ2) a b c 1 2(No) (日付) (氏名) 3 1 2018/10/15 田中 4 2 2018/12/03 鈴木 (抽出結果) a b c 1 2(No) (日付) (氏名) 3(No) (日付) (氏名) 4 1 2018/11/14 佐藤 全てに抽出条件に該当するデータがある場合はキレイに貼りつけられます。 マクロ初心者です。 もしかしてコピーの設定の仕方が間違ってるのでしょうか。 ws2.range("a3", ws2.cells(rows.count, 1).end(xlup)).resize(, 8).copy r 調べても分からなかったです。 どなたか知識のある方、教えて下さい。 よろしく お願いいたします。
回答: no.2です。 >抽出結果に必ずしもa3があるとは限らないのでa3指定は難しいかもです。 sqlserverカテで質問しているのでてっきりsql文で取り出したデータをシートに貼り付け、その後の話かと思いましたが・・・ もしかしてexcelのautofilterでの話でしょうか? そうすると『可視セル』を選択してコピー元とする方法になりますよ。 オートフィルタを使い倒す http://officetanaka.net/excel/vba/tips/tips155c.htm ・タイトル行を除いてコピーする タイトル行についてはvbaで2行目に直接書き込んでしまう(列数にもよりますが)方法と、 コピー先のa2が空白の時だけコピー元の2行目のみをコピペするif文を作成するか等ですかね。