Excel VBA質問箱 IV

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

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


11978 / 13646 ツリー ←次へ | 前へ→

【12963】日付の選択方法 まえだ 04/4/20(火) 15:40 質問
【12969】Re:日付の選択方法 ちん 04/4/20(火) 16:37 回答
【12975】Re:日付の選択方法 まえだ 04/4/20(火) 17:16 質問
【12984】Re:日付の選択方法 ちん 04/4/20(火) 18:36 回答
【13008】Re:日付の選択方法 まえだ 04/4/21(水) 8:47 お礼

【12963】日付の選択方法
質問  まえだ E-MAIL  - 04/4/20(火) 15:40 -

引用なし
パスワード
   日付を基準にデータを抽出方法を教えてください。

マクロで次の構文を記入しました。
Private Sub CommandButton5_Click()
  '15日締め切り
  Unload my_menu
  Worksheets("shoku").Range("b1").Value = Date
  Sheets("食数").Range("A3:Aa50000").AdvancedFilter Action:=xlFilterCopy, _
    CriteriaRange:=Worksheets("shoku").Range("a1:a3"), CopyToRange:=Worksheets("shoku").Range("a10:aa10"), Unique:= _
    False
End Sub

ワークシート"shoku"には次の計算式と、タイトルを書きました。
A1:日付、A2:=DATE(YEAR(B1),MONTH(B1)-1,16)
A3:=DATE(YEAR(B1),MONTH(B1),15)

これで、フィルターオプションの抽出を行いたいのですが、条件の日付で3/16から4/15日までのデータを抽出という条件の設定方法がわかりません。

IROCさんにご指導いただいたのですが、いまひとつ理解できず自分なりに設定方法を変更しました。

【12969】Re:日付の選択方法
回答  ちん  - 04/4/20(火) 16:37 -

引用なし
パスワード
   まえだ さん こんにちは、ちんといいます。

▼まえだ さん:
>日付を基準にデータを抽出方法を教えてください。
>
>マクロで次の構文を記入しました。
>Private Sub CommandButton5_Click()
>  '15日締め切り
>  Unload my_menu
>  Worksheets("shoku").Range("b1").Value = Date
>  Sheets("食数").Range("A3:Aa50000").AdvancedFilter Action:=xlFilterCopy, _
>    CriteriaRange:=Worksheets("shoku").Range("a1:a3"), CopyToRange:=Worksheets("shoku").Range("a10:aa10"), Unique:= _
>    False
>End Sub
>
>ワークシート"shoku"には次の計算式と、タイトルを書きました。
>A1:日付、A2:=DATE(YEAR(B1),MONTH(B1)-1,16)
>A3:=DATE(YEAR(B1),MONTH(B1),15)
>
>これで、フィルターオプションの抽出を行いたいのですが、条件の日付で3/16から4/15日までのデータを抽出という条件の設定方法がわかりません。
>
>IROCさんにご指導いただいたのですが、いまひとつ理解できず自分なりに設定方法を変更しました。

マクロの作成で、日付けの抽出を記録してみて下さい。
1.マクロの新規作成
2.「データ」−>「フィルター」−>「オートフィルタ」
3.▼をクリックし、(オプション..)をクリック
4.日付けの条件式を設定して下さい。

作成したマクロの"yyyy/mm/dd" の部分をプログラムで変更して下さい。

以上、

【12975】Re:日付の選択方法
質問  まえだ E-MAIL  - 04/4/20(火) 17:16 -

引用なし
パスワード
   ▼ちん さん:
>まえだ さん こんにちは、ちんといいます。
>
>マクロの作成で、日付けの抽出を記録してみて下さい。
>1.マクロの新規作成
>2.「データ」−>「フィルター」−>「オートフィルタ」
>3.▼をクリックし、(オプション..)をクリック
>4.日付けの条件式を設定して下さい。
>
>作成したマクロの"yyyy/mm/dd" の部分をプログラムで変更して下さい。
>
>以上、
出来ました。
ご連絡ありがとうございます、ご指導いただいたのはオートフィルターですが、アドバンスフィルターの方法も教えていただけないでしょうか。

教えていただいた方法で絞り込んで、別のシートにコピーしたほうが簡単ですかね。

【12984】Re:日付の選択方法
回答  ちん  - 04/4/20(火) 18:36 -

引用なし
パスワード
   まえだ さん こんばんは、ちんといいます。
▼まえだ さん:
>▼ちん さん:
>>まえだ さん こんにちは、ちんといいます。
>>
>>マクロの作成で、日付けの抽出を記録してみて下さい。
>>1.マクロの新規作成
>>2.「データ」−>「フィルター」−>「オートフィルタ」
>>3.▼をクリックし、(オプション..)をクリック
>>4.日付けの条件式を設定して下さい。
>>
>>作成したマクロの"yyyy/mm/dd" の部分をプログラムで変更して下さい。
>>
>>以上、
>出来ました。
>ご連絡ありがとうございます、ご指導いただいたのはオートフィルターですが、アドバンスフィルターの方法も教えていただけないでしょうか。
>
>教えていただいた方法で絞り込んで、別のシートにコピーしたほうが簡単ですかね。

参考になりそうなホームページがありました。
アドバンスフィルターの AND/OR の使用方法がのってます。
http://www.geocities.co.jp/SiliconValley-SanJose/9236/subdoc2/0183.htm

以上、

【13008】Re:日付の選択方法
お礼  まえだ E-MAIL  - 04/4/21(水) 8:47 -

引用なし
パスワード
   ▼ちん さん:
>まえだ さん こんばんは、ちんといいます。
>▼まえだ さん:
>>▼ちん さん:
>>>まえだ さん こんにちは、ちんといいます。
>>>
>>>マクロの作成で、日付けの抽出を記録してみて下さい。
>>>1.マクロの新規作成
>>>2.「データ」−>「フィルター」−>「オートフィルタ」
>>>3.▼をクリックし、(オプション..)をクリック
>>>4.日付けの条件式を設定して下さい。
>>>
>>>作成したマクロの"yyyy/mm/dd" の部分をプログラムで変更して下さい。
>>>
>>>以上、
>>出来ました。
>>ご連絡ありがとうございます、ご指導いただいたのはオートフィルターですが、アドバンスフィルターの方法も教えていただけないでしょうか。
>>
>>教えていただいた方法で絞り込んで、別のシートにコピーしたほうが簡単ですかね。
>
>参考になりそうなホームページがありました。
>アドバンスフィルターの AND/OR の使用方法がのってます。
>http://www.geocities.co.jp/SiliconValley-SanJose/9236/subdoc2/0183.htm
>
>以上、

ありがとうございます、バッチリ理解できそうです。
しかし、よくこんなサイトご存知ですね、次回も何かありましたらよろしくお願いします。

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