¿Cómo crear una lista a partir de las mismas celdas en varias hojas en Excel?
Supongamos que implementamos todas las tablas de ventas mensuales en una hoja de trabajo separada, como se muestra a continuación, y que todas las tablas de ventas tienen el mismo diseño. Ahora queremos crear una lista de todos los valores de suma (celda E6) en múltiples hojas de trabajo. ¿Cómo hacerlo? ¿Y si crea una lista dinámica a partir de los valores de suma de cada hoja de trabajo? Hay dos formas para ti:
Cree una lista a partir de las mismas celdas en varias hojas con VBA
Cree una lista dinámica a partir de las mismas celdas en varias hojas con Kutools for Excel
Combine fácilmente varias hojas de trabajo / libros de trabajo en una sola hoja de trabajo / libro de trabajo
Puede resultar tedioso combinar docenas de hojas de diferentes libros de trabajo en una sola hoja. Pero con Kutools for Excel, Combinar (hojas de trabajo y libros de trabajo) utilidad, puede hacerlo con solo varios clics.
Cree una lista a partir de las mismas celdas en varias hojas con VBA
Con el siguiente código VBA, puede crear fácilmente una lista a partir de las celdas especificadas en varias hojas de trabajo. Puede hacer lo siguiente:
Paso 1: Seleccione la celda especificada desde la que creará su lista. En nuestro caso, seleccionamos la celda E6.
Paso 2: Prensa otro + F11 teclas simultáneamente para abrir la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en recuadro > Móduloy luego pegue el siguiente código en la ventana del módulo.
VBA: cree 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: Prensa F5 o haga clic en el Ejecutar botón 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 de la lista son estáticos y no cambiarán con los valores originales.
Sin embargo, a veces es posible que desee completar la lista en un rango especificado y requerir que los valores de la lista siempre se correspondan con los valores originales en las celdas especificadas todo el tiempo. Para satisfacer estas necesidades, debe probar el siguiente método.
Cree una lista dinámica a partir de las mismas celdas en varias hojas con Kutools for Excel
Este método introducirá Kutools for Excel, Refiera dinámicamente a las hojas de trabajo utilidad para crear una lista dinámica a partir de las mismas celdas en varias hojas de trabajo.
Kutools for Excel - Equipado con más de 300 herramientas esenciales para Excel. Disfrute de una completa 30¡Prueba GRATUITA de un día sin necesidad de tarjeta de crédito! ¡Descargar ahora!
Paso 1: seleccione el rango donde completará la lista dinámica y haga clic en el Kutools > Más > Refiera dinámicamente a las hojas de trabajo.
Paso 2: En el cuadro de diálogo Abrir Referencias de hojas de trabajo de relleno,
(1) Haga clic en el Completar pedido cuadro y seleccione un tipo de relleno de la lista desplegable. En nuestro caso, seleccionamos Llenar verticalmente celda tras celda;
(2) En el Fórmula de relleno cuadro, especifique la dirección de celda desde la que creará una lista dinámica, y luego haga clic en el Bloquear . para bloquear la fórmula.
(3) Haga clic en el Rango de llenado del botón.
Ahora verá que los valores en las celdas especificadas en todas las hojas de trabajo se completan en el rango especificado como se muestra a continuación:
Cuando los valores originales cambiaron, los valores correspondientes en esta lista especificada se cambiarán automáticamente.
Kutools for Excel - Potencia Excel con más de 300 herramientas esenciales. Disfrute de una completa 30¡Prueba GRATUITA de un día sin necesidad de tarjeta de crédito! Consíguelo ahora
De demostración
Artículos relacionados:
Las mejores herramientas de productividad de oficina
Potencia tus habilidades de Excel con Kutools for Excely experimente la eficiencia como nunca antes. Kutools for Excel Ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab Trae la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite 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 de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
