Visual Basic para Aplicaciones - codigo......

Hola amigos de LWP, tengo una aplicacion en excel que cuenta con tres Hojas en la primera tiene una lista de las personas que se les presta unas llaves y la fecha de prestamo mas la fecha que deben de entregar las llaves, en la hoja dos tiene los mismos datos solo cambia por fecha de entrega y en la tercer Hoja tengo la lista de todas las personas que no han entregado las llaves y que se paso la fecha de entrega.......... y lo que quiero es que al abrir esta hoja, por medio de instrucciones aparescan en rojo las fechas de las personas que no han entregado las llaves, que en la segunda hoja al momento de entregar las llaves si estan dentro de la fecha de entrega se borre el registro de la primera hoja, pero que si el registro de la primera hoja tiene las fechas en rojo (¡¡¡se paso de la fecha de entrega!!!) no permita borrar el registro de la primera hoja y mande un mensaje para tomar acciones y que por medio de una macro o instrucciones se envie la informacion a word de las personas que no han entregado las llaves y que esta por cumplirse la fecha limite y de las personas que ya se les vencio la fecha de entrega de llaves para una lista negra en word??????????????????????? de antemano muchas gracias su amigo Jorge

Saludos,
El codigo es extenso pero espero q esto te sirva

Private Sub CommandButton1_Click()
Dim b, c As Integer
n = 6
Range("b" & n).Select
Do Until Range("b" & n) = ""
Range("b" & n).Select
If Range("b" & n) < Range("b1") + 3 Then
Range("a" & n).Select
Selection.Interior.ColorIndex = 3
Range("b" & n).Select
Selection.Interior.ColorIndex = 3
Range("c" & n).Select
Selection.Interior.ColorIndex = 3
n = n + 1
Else
Range("a" & n).Select
Selection.Interior.ColorIndex = 41
Range("b" & n).Select
Selection.Interior.ColorIndex = 41
Range("c" & n).Select
Selection.Interior.ColorIndex = 41
n = n + 1
End If
Loop
MsgBox "Listo!!!!!"

End Sub

MUCHAS GRACIAS AMIGO EBER LO VOY A PONER EN PRACTICA Y SI NO ES MUCHO PEDIR.... SI TENGO ALGUNA DUDA ¿TE PUEDO CONSULTAR.........???? TU AMIGO JORGE