Update on fiscal year

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

Thanks to Marshall Barton I have solved some of the problem. I got the box
to total up the right number of months to a fiscal year by changing some code
but when it comes to next year in April it continues to total up instead of
starting a new year. Fiscal year is 1 April to 31 March

Public Function gettxt6MET(UserID As Variant) As Integer
Dim strWhere As String

If Not IsNull(UserID) Then
strWhere = "UserID = " & UserID & " AND inputText = 'Book Off Sick' AND
Inputdate > #" & Format(DateAdd("m", -8, Date)) & "#"
gettxt6MET = DCount("UserID", "tblInput", strWhere)
End If
End Function

Any ideas, thanx in advance - my programming is limited so please be gentle
.

Relevant Pages

  • Re: Calculated field vs module
    ... Herman ... "Marshall Barton" wrote in message ... >>Public Function caltarea(Pertar As String) As String ...
    (microsoft.public.access.reports)
  • Re: Help with split() function in VB
    ... Marshall Barton wrote: ... Only a Variant variable can contain an array: ... Dim aAs String ...
    (microsoft.public.access.modulesdaovba)
  • Re: Calculated field vs module
    ... "Marshall Barton" wrote in message ... > hermie wrote: ... >>Public Function caltarea(Pertar As String) As String ...
    (microsoft.public.access.reports)
  • Re: Help with split() function in VB
    ... Marshall Barton wrote: ... Only a Variant variable can contain an array: ... Dim aAs String ...
    (microsoft.public.access.modulesdaovba)
  • Re: taking a numeric field and converting it to hex
    ... "Marshall Barton" wrote: ... > and your 11 character string of digits is bigger than a Long ... > Dim lngHigh As Long ...
    (microsoft.public.access.modulesdaovba)