lior03
11-08-2005, 11:21 PM
hello
i am trying to use a select case statment with a datediff function:
Function dayDiff(dte1 As Date, dte2 As Date, basis)
Select Case basis
Case ww
dayDiff = DateDiff("ww", dte1, dte2)
Case d
dayDiff = DateDiff("d", dte1, dte2)
Case m
dayDiff = DateDiff("m", dte1, dte2)
Case q
dayDiff = DateDiff("q", dte1, dte2)
End Select
End Function
what went wrong?
thanks
moshe
i am trying to use a select case statment with a datediff function:
Function dayDiff(dte1 As Date, dte2 As Date, basis)
Select Case basis
Case ww
dayDiff = DateDiff("ww", dte1, dte2)
Case d
dayDiff = DateDiff("d", dte1, dte2)
Case m
dayDiff = DateDiff("m", dte1, dte2)
Case q
dayDiff = DateDiff("q", dte1, dte2)
End Select
End Function
what went wrong?
thanks
moshe