Deseamos conocer los cambios en la hoja del libro Excel que se realizan en una columna. Para ello creamos una macro que genere un archivo de texto con los cambios.
Disponemos de la herramienta de Excel de control de cambios, pero deseamos crear una macro que nos registre en un archivo .txt, los cambios realizados en la columna B de la hoja, indicando la celda, el valor escrito, así como la fecha y hora.
- Con Excel abierto.
- Pulsar la tecla Alt y mantener pulsada / Pulsar la tecla F11. Mostrará el editor de Visual Basic.
- Ir a: Explorador de Proyectos / VBAProject / Doble Clic sobre Hoja1 (O la hoja deseada). Si el panel no está visible Ir a: Barra de menú / Ver / Explorador de proyectos. Mostrará la ventana del módulo donde escribimos la macro.
- Escribir el código de la macro:Private Sub Worksheet_Change(ByVal Target As Range)
Open “cambios.txt” For Append As #1If Target.Column = 1 Thenruta = Target.Address
valor = Target.ValueWrite #1, ruta, valor, NowEnd IfClose #1End Sub“cambios.txt” será el archivo que registra los cambios en la misma carpeta del libro. - Guardar el libro con la extensión *.xlsm. Libro habilitado para macros.
- Al modificar los valores de la Hoja1 (donde se insertó el código) se anotarán en el archivo generado automáticamente.
- Ir a la carpeta donde se guardó el libro / Abrir el archivo: cambios.txt. Verificar los cambios que realicemos en la columna B de la Hoja1.
