Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

8936 / 76732

←次へ　｜　前へ→


	【73364】Re:AdvancedFilterメソッドについて

UO3 - 12/12/26(水) 9:53 -


	引用なし

	パスワード

▼ニャンソさん：

おはようございます

まず、お願いしたように「最初のレイアウトの簡単なBook1」を作成して、
私がアップしたコード「そのままで」試していただきたかったですね。
で、「感触」をつかんで、要件の理解が正しいのか間違っているのかを確認いただきたかったのです。
もっとも、後から提示された要件は、レイアウト以外にも、がらっとかわっていますので
「感触」もつかみづらいかもしれませんが。

ニャンソさんは【フィルターオプション】についてはご存じでしょうか？
あるリストから、抽出すべきタイトルと、そのタイトル列での抽出条件を与えて、データを抽出する機能です。
（エクセル上の操作で可能ですし、それをコードで実行することもできるものです）

で、旧レイアウトではリスト範囲がＡ～Ｅ列。　なので、　少し離れた　Ｇ列とＨ列を作業列にして
Ｇ列には、Ａ列（地区）から【一意の値】を抽出し、そこで抽出された地区を１つずつ　Ｈ列の検索条件欄にいれて
地区の数だけフィルタリングを行い印刷するコードです。

少なくとも、改訂されたコードで対象にしているBook1のリストは　D:E ですので、
抽出されたとしても、この２列しか抽出されません。
（２枚同じものが印刷されたというところは、ちょっと不思議ですが）

また、アップしたコードは、Book2への抽出の前に Book2のセルの値をすべてクリアしています。
そこに、あらかじめ何かがセットされているという説明がなかったものですから。

さらに、そこには「罫線」があるのですか？
そうしますと、かりに罫線が１００行分セットされていたとして、抽出が１０行でも、からっぽの
９０行も印刷されますが、それでいいのｐですか？
また、仮に、抽出が３００行だったら罫線なしの行が２００行印刷されますが、それでいいのですか？

このような部分も、きちんと説明いただかないと、こちらからは、実際のシートが見えないわけですので
いくらコードをアップしても、使えないコードになる公算が大きいですね。

422 hits

▼

【73344】AdvancedFilterメソッドについて ニャンソ 12/12/21(金) 23:34