Question

我正致力于访问我被困在一点。请帮助我有一个计算字段：

Sum(IIf(Format([Ref_Date],"yyyymm")

之间

Format(DateSerial(Year(Date()),1,1),"yyyymm")

并且

Format(Date(),"yyyymm"),1,0))

它正在自动计算，但我有一个报告过滤器工具，我将选择日期，现在我需要将该日期范围（即：用户日期范围）传递到此函数中，以便它适用于任何日期。我怎样才能做到这一点？

Answer 1

您可以在VBA中创建这样的函数，如果日期在所需范围内，则返回true，然后您可以使用该结果执行任何其他计算。

Function InDateRange(RefDate As Date, StartDate As Date, EndDate As Date) As Boolean

    If (RefDate >= StartDate) And (RefDate <= EndDate) Then InDateRange = True

End Function

您可以在文本框的控件源中使用该功能;

=IIF(InDateRange([txtRef],[txtStart],[txtEnd]),1,0)

其中txtRef，txtStart和txtEnd是日期值为的文本框。

从文本框中访问2010计算的字段引用

1 个答案: