访问VBA以使用日期循环

时间:2018-04-12 19:48:39

标签: date ms-access access-vba

我有一个名为" ForecastMacro"在Access数据库中需要选择运行的日期。我希望2017年全年都可以运行。在Access中,我创建了一个包含日期[FormDates]的表单。然后在宏的查询中使用指定的表单日期[FDate]来创建预测模型。宏内部有多个查询的标准" ForecastMacro"其中date = [FormDates]![FDate]

  1. 我不确定如何在访问
  2. 中使用vba代码运行宏
  3. 并移至[FormDates]
  4. 日期中的下一个日期

    我找到了这段代码,但我不确定如何以一种迭代[FormDates]的方式实现它,然后运行" ForecastingMacro"?

    Publice Sub LoopOverDateRange()
    Const startdate As Date = #1/1/2017#
    Const enddate As Date = #12/31/17#
    Dim d As Date
    Dim i As Integer 
    i = 1
    For d = startdate To enddate
    d
    i=i++
    Next
    End Sub
    

    任何帮助都非常感谢!!!!! :)

0 个答案:

没有答案