Este ejemplo supervisa los cambios del usuario en la celda A1.
La lista se construye en la columna B a partir de la celda B2
Coloque la siguiente macro de evento en el área de código de la hoja de trabajo:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RR As Range, N As Long, v As Variant
Set RR = Intersect(Target, Range("A1"))
If RR Is Nothing Then Exit Sub
v = Range("A1").Text
N = Cells(Rows.Count, "B").End(xlUp).Row + 1
Application.EnableEvents = False
Range("B" & N).Value = v
Application.EnableEvents = True
End Sub
Debido a que es un código de hoja de trabajo, es muy fácil de instalar y usar automáticamente:
- haga clic derecho en el nombre de la pestaña cerca de la parte inferior de la ventana de Excel
- seleccione Ver código: esto abre una ventana VBE
- pegue las cosas y cierre la ventana VBE
Si tiene alguna duda, primero pruébelo en una hoja de prueba.
Si guarda el libro, la macro se guardará con él. Si está utilizando una versión de Excel más tarde que 2003, debe guardar el archivo como .xlsm en lugar de .xlsx
Para eliminar la macro:
- abrir las ventanas VBE como arriba
- borrar el código
- cierra la ventana de VBE
Para obtener más información sobre las macros en general, consulte:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
y
http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx
Para obtener más información sobre Macros de eventos (código de hoja de trabajo), consulte:
http://www.mvps.org/dmcritchie/excel/event.htm
¡Las macros deben estar habilitadas para que esto funcione!