Excel VBA質問箱 IV

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

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


1593 / 13644 ツリー ←次へ | 前へ→

【73250】マクロ作成について 知恵をお貸しください 午後の紅茶 12/12/12(水) 22:02 質問[未読]
【73251】Re:マクロ作成について 知恵をお貸しくだ... UO3 12/12/12(水) 22:26 発言[未読]
【73252】Re:マクロ作成について 知恵をお貸しくだ... UO3 12/12/12(水) 22:36 発言[未読]
【73253】Re:マクロ作成について 知恵をお貸しくだ... 午後の紅茶 12/12/12(水) 22:43 お礼[未読]

【73250】マクロ作成について 知恵をお貸しくださ...
質問  午後の紅茶 E-MAIL  - 12/12/12(水) 22:02 -

引用なし
パスワード
   現在マクロを初めて組んでおります。
マクロに詳しい方おりましたら、是非ともアドバイスお願い致します。
現状下記動作が実施されるマクロの作成をこれから始めようとしております。

-------------------------------------------------------------
データ1というシートがあり、現状それらのシートの中にある
2行目から始まる「A列(No)とB列(名称)のデータ」と
「C列からO列(各月の記録)」が記載されている元データを対象に、

T列の2行目の欄にあるデータ入力規則で作成した、
1月から12月を選択できるT3行目から対象月を選択した際に、
それら何れかの月の列「C列(1月)からO列(12月)」にある
1列全てのデータを対象に、オートフィルタ機能の「空白以外のセル」を
実行した際に表示される結果表示を、W列の三行目に表示させたいと
考えております。

また最終的にU列(No)&V列(名称)&W列(選択した対象月抜粋データ)を
3行目から表示させるマクロを想定しております。
-------------------------------------------------------------

夜分遅くとなりますがアドバイス頂けますと幸いです
不明な点ございましたら、コメントください。
よろしくお願いします。

【73251】Re:マクロ作成について 知恵をお貸しく...
発言  UO3  - 12/12/12(水) 22:26 -

引用なし
パスワード
   ▼午後の紅茶 さん:

こんばんは

1行目がタイトル行だと想定します。
A1には No とか B1 には 名称とか、C1からは ○月 と、これは T2にいれるものと同じ文字列。
こういうことを前提にします。

U2にA1と同じもの、V2にB1と同じものを入れておきます。W2には =T2 といれ、
T3に '<> (先頭クォーテーション)といれておきます。
で、T2 に何か月を選択して入力してください。

こうした上で、以下の操作をマクロ記録してください。
・2007以降ならデータメニューのフィルターグループの詳細設定。
 2003以前ならデータ->フィルター->フィルターオプションの設定
・でてきたダイアログに対し
 リスト範囲(L)に A:N
 検索条件範囲(C)に T2:T3
 選択した範囲(O)を選ぶ
 抽出範囲(T) に U2:W2
 これでOKを押す。

【73252】Re:マクロ作成について 知恵をお貸しく...
発言  UO3  - 12/12/12(水) 22:36 -

引用なし
パスワード
   ▼午後の紅茶 さん:

追申です。
一度、上記の操作を行っておけば、マクロを使わずとも、T2で月を選択した後フィルターオプションのダイアログを表示させると、設定項目がすべて入っています。
唯一、指定した範囲(O)のチェックのみがはずれていますので、これをチェックしてOKを押すだけで
目的の抽出がされますよ。

【73253】Re:マクロ作成について 知恵をお貸しく...
お礼  午後の紅茶 E-MAIL  - 12/12/12(水) 22:43 -

引用なし
パスワード
   ▼UO3 さん:
>▼午後の紅茶 さん:
>
>追申です。
>一度、上記の操作を行っておけば、マクロを使わずとも、T2で月を選択した後フィルターオプションのダイアログを表示させると、設定項目がすべて入っています。
>唯一、指定した範囲(O)のチェックのみがはずれていますので、これをチェックしてOKを押すだけで
>目的の抽出がされますよ。

U03さん
詳しいご説明に加え、追伸までありがとうございます。
早速アドバイス頂いた内容を元に作り直したいと思います。

夜分遅くにも関わらず素早いアドバイスありがとうございました。

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