ruddy81

ruddy81

 España @ruddy81 desde - visto
Preguntar

Actividad pública reciente

Ha valorado "Excelente" la respuesta

Apoyo con código de Vb

respondió: Prueba esto Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("D2:D10000")) Is Nothing Then ActiveCell.Offset(-1, -1).Value = Date End If End Sub Debes colocarlo en la hoja donde quieres que haga eso