Financial Quarter 1

[MikeAuz1979]

Hi,

I'm trying to return the financial quarter of a date rather than the calendar quarter. The financial year being 1 July - 30 Jun

For example something like FinQuarter(1 July 06) returns 1

Thanks for any help!

 

[Remou]

How about:

[tt]IIf(Format(dteDate, "q") < 3, Format(dteDate, "q") + 2, Format(dteDate, "q") - 2)[/tt]

Where dteDate = mm/dd/yyyy

 

[raskew]

Hi -

There are many instances when a fiscal year does not start on 1 Jan. Try the following which allows the user to specify the FY start date.

Function fGetFYQtr(FYStart As Date, pDate As Date) As Integer          
   'To call: from debug (immediate) window 
   '? fGetFYQtr(#7/1/06#, #10/1/06#) 
   'returns: 2 
   fGetFYQtr = DateDiff("m", FYStart, pDate) \ 3 + 1 
End Function

HTH - Bob