Rounding data in Vba

[PcMax]

Hi,

From a list of dates in column B
I used Function that returns the data in column C
I ask what i can do to find rounding of the column D

A B C D
1 26/10/11 19.00 35 19.00.00 19.00
2 26/10/11 19.04 49 19.05.00 19.00
3 26/10/11 19.05 41 19.05.00 19.05
4 26/10/11 19.08 20 19.05.00 19.05

I attach a file with the data to compare, you can get in VBA this rounding in date ?

Thanks in advance