Colocar fecha en varias celdas

[Mauricio Ventura]

Hola nuevamente!

Estoy haciendo una planilla donde necesito que se ingrese la fecha automáticamente en varias celdas al modificar la celda izquierda.

Por ejemplo, al ingresar un dato en la celda "C" se ingrese la fecha en la celda "D", lo mismo con la celda "G" y"H", y así con muchas más celdas!

Intenté con el código:

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Application.Intersect(Target, Range("D:D")) Is Nothing Then

Range("C" & Target.Row) = Date

End If

End Sub

Pero no encuentro el modo de extenderlo hacia otras celdas.

Muchas gracias!

NUEVO SALDOS - copia.rar

[Armando Montes]

Hola Mauricio, este ejemplo puede servirte:

Los codigos publicados deben usar etiquetas:

Normas AyudaExcel | Ayuda Excel

Hora y Fecha Estatica.xls