Problema con buscar duplicados y eliminar solo una fila.

Tengo una hoja donde hay algunos duplicados. Necesito una macro para buscar los duplicados y comparando los dos encontrados quiero eliminar la fila cuyo campo FECHA sea inferior entre los dos duplicados. Además antes de eliminarlo quiero que la columna HORAS de las dos filas se resten entre si y la diferencia se quede en el valor HORAS de la fila que no se elimina. Como mucho sólo hay posibilidad de un máximo de dos registros duplicados entre si. Pero la hoja puede contener 10.000 filas y haber muchos duplicados. Por lo general la hoja ya está ordenada por fecha de menor a mayor.