why is this causing a problem?

[codesmith]

Sub testDateCompare()
    Dim nmiDate As String
    nmiDate = CDate("23/4/08")
    Dim origDate As String
    origDate = CDate("23/04/2008 15:05")
    origDate = Left(origDate, InStr(origDate, " "))
    
    Dim minDate As String
    minDate = WorksheetFunction.Min(origDate, nmiDate)
    MsgBox minDate
End Sub

Giving '400' error!?

thanks in advance.

 

[mikerickson]

Read the op's code again.
He wants to compare the dates without time part. (doesn't mean much to me anyway though)

The result is the same.
If the two date/times are on different days, the earliest of the dates (no time component) is the same as the date of the earliest time.

If they are on the same day, that's the date that is returned.

The date of the earliest time = the earliest of the dates without time component.
Int(Min(a,b)) = Min(Int(a),Int(b))

 

[jindon]

The result is the same.
If the two date/times are on different days, the earliest of the dates (no time component) is the same as the date of the earliest time.

If they are on the same day, that's the date that is returned.

The date of the earliest time = the earliest of the dates without time component.
Int(Min(a,b)) = Min(Int(a),Int(b))

Talking about different thing.
I only took OP's sample data, so my posts.