| 
    
     |  | 日付を基準にデータを抽出方法を教えてください。 
 マクロで次の構文を記入しました。
 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さんにご指導いただいたのですが、いまひとつ理解できず自分なりに設定方法を変更しました。
 
 
 |  |