Fecha Por Cada Celda

es un Macro
*************

Option Compare Text
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

With Target
Select Case .Column
'la celda donde la fecha/ la celda donde se crea la fecha
/borar la fecha creada
Case 1: If .Value <> "" Then .Offset(, 5) = Now Else .Offset(,
5).ClearContents

End Select
End With

End Sub

************

"KM ** Ve" escribió en el mensaje
news:%

Hola Amigos, tengo la columna (A) para Registrar Fechas y en la Columna
(B) para Registrar Horas y en la Columna (C) nombre, como hago cuando
escribo el nombre en la columna (C) que registra la Fecha y Hora en las
columnas especificada, en la misma columna de fecha y hora cada nombre
lleva una fecha y hora deferente.



Gracias

KM**VE