Skip to main content

¿Cómo registrar los valores cambiantes en una celda en Excel?

Author: Siluvia Last Modified: 2025-06-04

¿Cómo registrar cada valor cambiante para una celda que cambia con frecuencia en Excel? Por ejemplo, el valor original en la celda C2 es 100. Al cambiar el número 100 a 200, el valor original, 100, se mostrará automáticamente en la celda D2 para su registro. Cuando cambie 200 a 300, el número 200 se insertará en la celda D3; al cambiar 300 a 400, se mostrará 300 en D4 y así sucesivamente. El método de este artículo puede ayudarte a lograrlo.

Registrar valores cambiantes en una celda con código VBA


Registrar valores cambiantes en una celda con código VBA

El siguiente código VBA puede ayudarte a registrar cada valor cambiante en una celda en Excel. Por favor, sigue los siguientes pasos.

1. En la hoja de cálculo que contiene la celda donde deseas registrar los valores cambiantes, haz clic derecho en la pestaña de la hoja y luego haz clic en Ver Código en el menú contextual. Ver captura de pantalla:

A screenshot showing the context menu with the View Code option in Excel.

2. Luego se abrirá la ventana de Microsoft Visual Basic para Aplicaciones; por favor, copia el siguiente código VBA en la ventana de Código.

Código VBA: registrar valores cambiantes en una celda

Dim xVal As String
'Update by Extendoffice 2018/8/22
Private Sub Worksheet_Change(ByVal Target As Range)
    Static xCount As Integer
    Application.EnableEvents = False
    If Target.Address = Range("C2").Address Then
        Range("D2").Offset(xCount, 0).Value = xVal
        xCount = xCount + 1
    Else
        If xVal <> Range("C2").Value Then
         Range("D2").Offset(xCount, 0).Value = xVal
        xCount = xCount + 1
        End If
    End If
    Application.EnableEvents = True
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    xVal = Range("C2").Value
End Sub

Notas: En el código, C2 es la celda en la que deseas registrar todos sus valores cambiantes. D2 es la celda en la que se llenará el primer valor cambiante de C2.

3. Presiona las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.

A partir de ahora, cada vez que cambies los valores en la celda C2, los valores anteriores se registrarán en D2 y en las celdas debajo de ella.

Las mejores herramientas de productividad para Office

🤖 Kutools AI Aide: Revoluciona el análisis de datos basado en: Ejecución inteligente | Generar código | Crear fórmulas personalizadas | Analizar datos y generar gráficos | Invocar Funciones mejoradas
Funciones populares: Buscar, resaltar o marcar duplicados | Eliminar filas en blanco | Combinar columnas o celdas sin perder datos | Redondear...
Super BUSCARV: Búsqueda por varios criterios | Búsqueda de varios valores | Búsqueda en varias hojas | Coincidencia difusa....
Lista desplegable avanzada: Crea rápidamente una lista desplegable | Lista desplegable dependiente | Lista desplegable de selección múltiple....
Administrador de columnas: Agregar un número específico de columnas | Mover columnas | Alternar el estado de visibilidad de columnas ocultas | Comparar rangos y columnas...
Funciones destacadas: Cuadrícula de enfoque | Vista de diseño | Barra de fórmulas mejorada | Administrador de Libro de trabajo y Hoja de cálculo | Biblioteca de AutoTexto | Selector de fechas | Combinar Datos | Cifrar/Descifrar celdas | Enviar correo electrónico por lista | Super Filtro | Filtro especial (filtrar celdas con fuente en negrita/cursiva/tachado...)...
Top15 conjuntos de herramientas:12 herramientas de texto (Agregar texto, Eliminar caracteres específicos, ...) | Más de50 tipos de gráficos (Diagrama de Gantt, ...) | Más de40 fórmulas prácticas (Calcular edad basada en la fecha de nacimiento, ...) |19 herramientas de inserción (Insertar código QR, Insertar imagen desde ruta, ...) |12 herramientas de conversión (Convertir a palabras, Conversión de moneda, ...) |7 herramientas para combinar y dividir (Combinar filas avanzado, Dividir celdas, ...) | ... y más

Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...


Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo

  • Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
  • ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!