Dsum issue

[mjwakema]

I would like to know if this is possible?

my report date is in 1 table and my data is in a seperate table. I would like to sum my hours from the Appleton table from a date range in the YearMonth table

Public Function CorpRIR()
Dim mySum
Dim begD As Variant
Dim endD As Variant
Dim number

begD = DLast("ReportDate", "tblYearMonth")
endD = begD - 240 ' this will be a variable latter on just hardcoded for testing

mySum = DSum("[AppletonHours]", "tblAppleton", "[tblYearMonth]![ReportDate]= between #" & begD & "# & And #" & endD & "#")
end function

Thank you

 

[CJ_London]

Not this way - your dsum criteria need to relate to the records in tblAppleton and is also written slightly incorrectly - you either use '=' or you use 'between', but not both at the same time. and you shouldn't have the '&' in "# & And #".

I cannot suggest a solution as you have not provided sufficient information, other than to say you need to have a date field in tblAppleton and you should use that field name instead of [tblYearMonth]![ReportDate]