Where's the error?

[Barguast]

Is there anything wrong with this function? Whenever I call it, I get an error saying "Wrong number of arguments or invalid property assignment" with the Day function highlighted...

Private Function DaysInMonth(iMonth As Long, iYear As Long) As Integer

    DaysInMonth = Day(DateSerial(iYear, iMonth + 1, 0))

End Function

... it looks okay to me. This is code running under VBA in MS Access if that makes a difference.

[DKenny]

Here's my version of this function.

Function DaysInMonth(MthNum As Integer, YrNum As Integer) As Integer
Dim dtTemp As Date
    
    dtTemp = DateSerial(YrNum, MthNum, 1)
    DaysInMonth = DateAdd("M", 1, dtTemp) - dtTemp
End Function

[NeedSomeAnswers]

Works Fine when i run it !!, what version of Access are you using ?

I don't see any reason why this shouldn't work to be honest !

[Hack]

Worked just fine for me as well.

[salvelinus]

Do you have the reference set to use Day()? What's the error?

[Barguast]

Do you have the reference set to use Day()? What's the error?

Erm... maybe. How can I check for that? I replaced the function with DKenny's version and that seems to work. I'm pretty sure I had used the Day function before though, and it worked then...

[salvelinus]

In the VBE, Tools-References and check Microsoft DAO 3.6 Object Library (at least I think that's the correct one, according to the Object Browser)

[Barguast]

Yeah, it's selected so I'm not sure the problem is.

This isn't related (or at least I don't think so) but I doubt it's worth creating a new topic for. Apparently the Range object (used for a spreadsheet control) has a resize function...

'Get the range of the current table
Dim tableRange As Range
Set tableRange = Sheet.Cells(1, 1)
 
Set tableRange = tableRange.Resize(m_dimX, m_dimY)

.. however, whenever I run that I get 'Method or data member not found'. I figured I might as well post it here since, again, it seems to be VBA not finding something it should (whether it be a function or a method).

This isn't going well at all...