Crear Macro en otra hoja

Hola Dam como hago si la columna N que quiero copiar en otra hoja llamada "Data". Osea que la fecha se copie en la hoja "Data" en la columna N. Gracias

Private Sub Worksheet_Change(ByVal Target As Range)
'Por.DAM
If Not Intersect(Target, Range("H18:H48")) Is Nothing Then
For Each t In Target
Cells(t.Row, "N") = Date
Next
End If
End Sub

1 Respuesta

Respuesta
1

Así quedaría

Private Sub Worksheet_Change(ByVal Target As Range)
'Por.DAM
If Not Intersect(Target, Range("H18:H48")) Is Nothing Then
    For Each t In Target
        Sheets("Data").Cells(t.Row, "N") = Date
    Next
End If
End Sub

Saludos.DAM

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas