How I have compare date?

[epatrik]

How I have compare date?

If Date(Table2.Cell",1)) >= Date(Calendar4.Value) Then
Code.....
End if

Error description:
Input stringer was music land and correct form.

[Erel]

Just remove the Date keywords:
If Table2.Cell(...) >= Calendar4.Value Then

[epatrik]

Same problem.

Calendar4.Format = "dd-mm-yyyy"
X = "30-09-2007"

If X >= Calendar4.Value Then
MsgBox(X)
End If

[Erel]

You need first to convert the string into a date value using DateParse:
If DateParse(X) >= Calendar4.Value Then...

[epatrik]

Much thanks already it steps.