Excel VBA質問箱 IV

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

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


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

68309 / 76738

←次へ　｜　前へ→


	【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"　の部分をプログラムで変更して下さい。

以上、

0 hits

▼

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