¿Cómo crear una lista combinando las mismas celdas de varias hojas de Excel?
Supongamos que tenemos cada tabla mensual de ventas en una hoja de cálculo independiente, como se muestra en la siguiente captura de pantalla, y que todas las tablas comparten el mismo diseño. Ahora queremos crear una lista con todos los valores totales (celda E6) de varias hojas. ¿Cómo podemos hacerlo? ¿Y qué sucede si deseamos generar una lista dinámica con los valores totales de cada hoja? A continuación, le presentamos dos métodos:
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, podrá crear fácilmente una lista a partir de las celdas especificadas en varias hojas de cálculo. Siga estos pasos:
Paso 1: Seleccione la celda específica desde la que creará su lista. En nuestro caso, elegimos la celda E6.
Paso 2: Pulse simultáneamente las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en Insertar > Módulo y, a continuación, pegue 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 SubPaso 3: Pulse la tecla F5 o haga clic en el botón Ejecutar para ejecutar este código VBA.
A continuación, todos los valores de la celda especificada en todas las hojas de cálculo se copian en una nueva hoja de cálculo denominada KutoolsforExcel. Vea la captura de pantalla:
Este código VBA rellenará la lista en una hoja de cálculo nueva, y los valores de la lista son estáticos, por lo que no se actualizarán al modificar los valores originales.
Sin embargo, en ocasiones es posible que desee rellenar la lista en un rango limitado y necesite que los valores de la lista coincidan siempre con los valores originales de las celdas especificadas. Para satisfacer estas necesidades, pruebe 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 presenta la utilidad Kutools para Excel’s Autoincrementar referencias de hojas de cálculo para crear una lista dinámica a partir de las mismas celdas en varias hojas de cálculo.
Kutools para Excel: incluye más de 300 herramientas esenciales que harán sus tareas en Excel más rápidas, sencillas y eficientes.¡Descárguelo ahora!
Paso 1: Seleccione el rango en el que desea rellenar la lista dinámica y haga clic en Kutools > Más > Autoincrementar referencias de hojas de cálculo.
Paso 2: En el cuadro de diálogo Rellenar referencias de hojas de cálculo que se abre,
(1) Haga clic en el cuadro Orden de llenado y seleccione un tipo de relleno en la lista desplegable. En nuestro caso, hemos seleccionado Llenar por columna, luego por fila.
(2) En el cuadro Fórmula de relleno, especifique la dirección de la celda desde la que creará una lista dinámica y, a continuación, haga clic en el botón Bloquear
para bloquear la fórmula.
(3) Haga clic en el botón Rellenar rango.
Ahora verá que los valores de las celdas especificadas en todas las hojas de cálculo se han rellenado en la Rango limitado, tal como se muestra en la siguiente captura de pantalla:
Cuando cambien los valores originales, los valores correspondientes en esta lista se actualizarán automáticamente.
Kutools para Excel: potencie Excel con más de 300 herramientas esenciales, agilice y simplifique su trabajo, y aproveche las funciones de IA para un procesamiento de datos más inteligente y una mayor productividad.Consígalo ahora
Demostración
Artículos relacionados:
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos