....WorksheetFunction.Int(Date).Value ....
If you've been given good help, use the icon to give reputation feedback, it is appreciated. Always put your code between [code] and [/code] tags.