¿Cómo crear una lista a partir de las mismas celdas en varias hojas en Excel?
Supongamos que distribuimos cada tabla de ventas mensuales en una hoja de trabajo separada, como se muestra en la siguiente captura de pantalla, y todas las tablas de ventas tienen el mismo diseño. Ahora queremos crear una lista con todos los valores de suma (Celda E6) en varias hojas de trabajo. ¿Cómo lo hacemos? ¿Y si creamos una lista dinámica a partir de los valores de suma de cada hoja de trabajo? Hay dos formas para ti:
Crear una lista a partir de las mismas celdas en varias hojas con VBA
Crear una lista dinámica a partir de las mismas celdas en varias hojas con Kutools para Excel
Crear una lista a partir de las mismas celdas en varias hojas con VBA
Con el siguiente código VBA, puedes crear fácilmente una lista a partir de las celdas especificadas en varias hojas de trabajo. Puedes hacer lo siguiente:
Paso 1: Selecciona la celda especificada desde la cual crearás tu lista. En nuestro caso, seleccionamos la Celda E6.
Paso 2: Presiona simultáneamente las teclas Alt + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones, haz clic en Insertar > Módulo, y luego pega el siguiente código en la ventana del módulo.
VBA: Crear una lista a partir de las mismas celdas en varias hojas
Sub CreateList()
Dim xAddWs As Worksheet
Dim xWs As Worksheet
Dim RngAddress As String
xTitleId = "KutoolsforExcel"
RngAddress = Application.ActiveCell.Address
Set xAddWs = Application.ActiveWorkbook.Sheets.Add
xAddWs.Name = xTitleId
i = 1
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xTitleId Then
xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value
i = i + 1
End If
Next
End Sub
Paso 3: Presiona la tecla F5 o haz clic en el botón Ejecutar para ejecutar este VBA.
Luego, todos los valores de la celda especificada en todas las hojas de trabajo se copian en una nueva hoja de trabajo llamada KutoolsforExcel. Ver captura de pantalla:
Este VBA llenará la lista en una nueva hoja de trabajo, y los valores en la lista son estáticos, lo que no cambiará con los valores originales.
Sin embargo, a veces puede que quieras llenar la lista en un rango específico y que los valores de la lista siempre correspondan con los valores originales en las celdas específicas todo el tiempo. Para satisfacer estas necesidades, deberías probar el siguiente método.
Crear una lista dinámica a partir de las mismas celdas en varias hojas con Kutools para Excel
Este método presentará la utilidad Dinámicamente Referir Hojas de Trabajo de Kutools para Excel para crear una lista dinámica a partir de las mismas celdas en varias hojas de trabajo.
Kutools para Excel - Cargado con más de 300 herramientas esenciales para Excel. ¡Disfruta de funciones de IA permanentemente gratis! ¡Descarga ahora!
Paso 1: Selecciona el Rango donde llenarás la lista dinámica, y haz clic en Kutools > Más > Autoincrementar referencias de hojas de cálculo.


Paso 2: En el cuadro de diálogo Abrir Rellenar referencias de hojas de trabajo que aparece,
(1) Haz clic en el cuadro Orden de llenado, y selecciona un tipo de llenado de la lista desplegable. En nuestro caso, seleccionamos Llenar por columna, luego por fila;
(2) En la Fórmula de relleno caja, especifica la dirección de la celda desde la cual crearás una lista dinámica, y luego haz clic en el Bloquear botón para bloquear la fórmula.
(3) Haz clic en el botón Rellenar rango.
Ahora verás que los valores en las celdas especificadas en todas las hojas de trabajo se llenan en el rango especificado como se muestra en la siguiente captura de pantalla:
Cuando los valores originales cambien, los valores correspondientes en esta lista especificada cambiarán automáticamente.
Kutools para Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfruta de funciones de IA gratis permanentemente! Consíguelo ahora
Demostración
Artículos relacionados:
Las mejores herramientas de productividad para Office
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!