Concatenar fecha actual en celda recién capturada (modificada).
Digamos que tenemos una hoja de excel y en la columna A voy capturando datos, lo que busco es una Macro que se ejecute después de modificar una celda del rango de la columna A, y que dicha macro tome en cuenta el valor de la celda A# y después lo concatene con la fecha actual en la misma celda A#.
Ejemplo:
1.- La celda A5 esta vacía, no tiene información
2.- En la celda A5 capturo el valor "LUNA" y salgo de la Celda
3.- La Macro se ejecuta y re modifica la celda concatenando le la fecha actual
A5 = "LUNA 27/04/2016"
Y así sucesivamente con cada celda que modifique de esa columna A.
1 respuesta
Respuesta de Dante Amor
1
H o l a:
Pon la siguiente macro en los eventos de tu hoja
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Not Intersect(Target, Range("A:A")) Is Nothing Then
If Target.Count > 100 Then Exit Sub
For Each c In Target
Application.EnableEvents = False
c.Value = c.Value & " " & Format(Date, "dd/mm/yyyy")
Application.EnableEvents = True
Next
End If
End SubSigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
- En el panel del lado derecho copia la macro
' : ) 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias ' : )
