Excel VBA質問箱 IV

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

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


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

8552 / 76732

←次へ　｜　前へ→


	【73750】Re:複数ソートして別々に印刷

UO3 - 13/2/8(金) 12:36 -


	引用なし

	パスワード

▼nonoka さん：

こんにちは

実際のフィルタリングのタイトル行は　９　行目ですね。
（つまり　９行目に　▼　がある状態ですね。）

で、Ｌ列にあるコードの種類だけ自動的に印刷ということですね。
現在オートフィルターが設定されていると思いますので、それを活かし
フィルターオプションをかますのはいかがでしょう。

１．作業用のからっぽの別シートを用意します。（最終的には非表示でも構いません）
２．フィルターオプションで、Ｌ９から始まるＬ列の領域を選択して、重複を無視して
　作業用シートのＡ列に、Ｌ列一意の値を抽出します。
３．あとは作業用シートのＡ２～Ａ○までの値をループで取り出し、その値で元シートの
　Ｌ列をオートフィルターで絞り込み。
　ここについては、とりあえず固定値でフィルタリングしましょう。
４．抽出された状態で印刷します。

この中で　３．のループ処理以外は操作を行いマクロ記録すればコードが生成されます。

あとは。３．のループコードを書き、そこで取得した値を　３．で固定で抽出する操作で
生成されるコードの抽出条件に変数で与えるということになります。

まず、ここまで、やってみられてはいかがでしょう。

291 hits

▼

【73747】複数ソートして別々に印刷 nonoka 13/2/8(金) 11:28