Type Mismatch?

[WrldIntlR]

Function CheckDup(ByVal clmn As Long) As Boolean
Dim ws As Worksheet
Dim irow As Long
Dim c As Long
c = clmn
Set ws = ThisWorkbook.Worksheets("TimeSheet")
'find the last entry for day
irow = ws.Cells(Rows.Count, c).End(xlUp).Value

I'm getting the mismatch on the last line. Can't figure out why. I've tried long, integer, string. Doesn't make a difference.

 

[WrldIntlR]

Dang it all never mind. The type mismatch wasn't with the value I was passing to the function, it was with iRow as long instead of string. Oops. Sorry.