Saltar al contenido principal

¿Cómo revertir una tabla dinámica en Excel?

doc-pivotante-inverso-1
¿Alguna vez ha querido revertir o transponer la tabla dinámica en Excel como se muestra en las capturas de pantalla a continuación? Ahora te diré las formas rápidas de invertir una tabla dinámica en Excel.
(11 pasos) Tabla dinámica inversa con el Asistente para tablas dinámicas y gráficos dinámicos
(7 pasos) Tabla dinámica inversa con Kutools para las dimensiones de la tabla de transposición de Excel buena idea3

flecha azul burbuja derecha Tabla dinámica inversa con el Asistente para tablas dinámicas y gráficos dinámicos

Para invertir la tabla dinámica, primero debe abrir el cuadro de diálogo Asistente para tablas dinámicas y gráficos dinámicos y crear una nueva tabla dinámica en Excel.

1. Prensa Alt+D+P teclas de método abreviado para abrir el cuadro de diálogo del Asistente para tablas dinámicas y gráficos dinámicos, luego, marque Múltiples rangos de consolidación opción bajo ¿Dónde están los datos que quieres analizar? sección y Tabla dinámica opción bajo ¿Qué tipo de informe desea crear? .

Note: También puede agregar el comando PivotTabe y PivoChart Wizard en la barra de herramientas de acceso rápido y hacer clic para abrir el cuadro de diálogo.

doc-pivotante-inverso-2

2. Hacer clic en Siguiente para ir al siguiente cuadro de diálogo para comprobar Crearé los campos de la página opción, y haga clic en Siguiente.

doc-pivotante-inverso-3

3. Seleccione sus datos base y haga clic en Añada para agregar el rango de datos al Todos los rangos lista. Ver captura de pantalla:

doc-pivotante-inverso-4

4. Hacer clic en Siguiente para ir al último paso del Asistente, marque la opción que necesita en ¿Dónde desea colocar el informe de tabla dinámica? sección. Luego haga clic Acabado.

doc-pivotante-inverso-5

5. Ahora se crea una nueva tabla dinámica y haga doble clic en la última celda en la esquina inferior derecha de la nueva tabla dinámica, luego se crea una nueva tabla en una nueva hoja de trabajo. Ver capturas de pantalla:
doc-pivotante-inverso-6

iv>

6. Luego cree una nueva tabla dinámica basada en esta nueva tabla. Seleccione la tabla completamente nueva y haga clic en recuadro > Tabla dinámica > Tabla dinámica.

doc-pivotante-inverso-7

7. Luego, en el cuadro de diálogo emergente, marque la opción que necesita en Elija dónde desea colocar el informe de tabla dinámica .

doc-pivotante-inverso-8

8. Hacer clic en OK. Entonces un Lista de campos de tabla dinámica aparece el panel y arrastre el Fila y Columna campos al Etiquetas de fila sección y campo Valor para Nuestros Valores sección. Ver captura de pantalla:

doc-pivotante-inverso-9

9. Luego haga clic en cualquier celda de la nueva tabla dinámica y vaya a la Diseño pestaña para hacer clic en Diseño de informe> Mostrar en forma tabular.

doc-pivotante-inverso-10

10. Luego ve a hacer clic Diseño del informe de nuevo para hacer clic Repetir todas las etiquetas de artículo de la lista. Ver captura de pantalla:

doc-pivotante-inverso-11

Note: Esto no es Repetir todas las etiquetas de artículo comando en la lista desplegable de Diseño del informe en Excel 2007, omita este paso.

11. Hacer clic en Diseño > Subtotales > No mostrar subtotales.

doc-pivotante-inverso-12

Ahora la tabla dinámica está invertida. Ver captura de pantalla:

doc-pivotante-inverso-13

flecha azul burbuja derecha Tabla dinámica inversa con Kutools para las dimensiones de la tabla de transposición de Excel

Con la forma anterior, hay tantos pasos para resolver la tarea. Para mejorar enormemente la eficiencia de su trabajo y reducir las horas de trabajo, le sugiero que invierta la tabla pivotante con Kutools for Excel, Dimensiones de la mesa de transposición .

1. Seleccione los datos base y haga clic en Kutools > Gama de Colores > Dimensiones de la mesa de transposición.

doc reversible pivotante 20

2. En el Dimensiones de la mesa de transposición diálogo, comprobar Tabla cruzada para listar bajo Tipo de transposición sección, luego seleccione la celda en la que desea colocar la nueva tabla.

herramienta complementaria de Excel para cambiar la tabla 2d a 1d

3. Hacer clic en Ok para crear una nueva tabla y luego insertar encabezados sobre la nueva tabla. Ver captura de pantalla:

doc-pivotante-inverso-16

4. Seleccione la nueva tabla, incluidos los encabezados, y haga clic en recuadro > Tabla dinámica > Tabla dinámica, luego en el Crear tabla dinámica cuadro de diálogo, marque la opción que necesita en Elija dónde desea colocar el informe de tabla dinámica .

doc-pivotante-inverso-17

5. Hacer clic en OKY, en Lista de campos de tabla dinámica panel, arrastrar Fila y Columna campos para Etiquetas de fila sección, y Valor campo para Nuestros Valores .
doc-pivotante-inverso-9

6. Haga clic en cualquier celda de la nueva tabla dinámica y haga clic en Diseño > Diseño del informe > Mostrar en forma tabularY, a continuación, haga clic Diseño del informe de nuevo para hacer clic Repetir todas las etiquetas de artículo. Ver capturas de pantalla:

doc-pivotante-inverso-10doc-pivotante-inverso-11

Note: Esto no es Repetir todas las etiquetas de artículo comando en la lista desplegable del botón Diseño de informe en Excel 2007, simplemente omítalo.

7. Hacer clic en Diseño > Subtotales > No mostrar subtotales.

doc-pivotante-inverso-12

Ahora la tabla dinámica está invertida. Ver captura de pantalla:

doc-pivotante-inverso-19

Con Kutools for Excel, Dimensiones de la mesa de transposición característica, también puede convertir la tabla de lista en tabla cruzada. Haga clic aquí para conocer más información.

Transponer rápidamente la tabla cruzada a la lista o viceversa
Mientras recibe una hoja con tabla cruzada que necesita convertir a tabla de lista, ¿cómo puede manejarla rápidamente? Con Kutools para Excel Dimensiones de la mesa de transposición utilidad, puede convertir una tabla de dimensiones cruzadas en una tabla de tres dimensiones o viceversa lo más rápido que pueda.   ¡Haga clic para obtener una prueba gratuita de 30 días con todas las funciones!
doc transponer cruz a la lista
 
Kutools para Excel: con más de 300 prácticos complementos de Excel, prueba gratis sin límite en 30 días.

Artículos relativos:

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples  |   Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear 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  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas   |  Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas   |  Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas:  12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y 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...

Descripción

Office Tab lleva 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!
Comments (1)
No ratings yet. Be the first to rate!
King Storm
King Storm
This comment was minimized by the moderator on the site
VBA code:

Sub Unpivot()
'
Dim Rowlabel As Range
Dim Columnlabel As Range
Dim Pap As Range
Dim Tabl As Range
Dim i As Integer
Dim j As Integer
Dim a As Integer
Dim b As Integer
Dim Data As Range
Dim k As Integer
Dim Label As Range
Dim pvtCache As PivotCache
Dim pvt As PivotTable
Dim SrcData As String
'
ActiveSheet.Copy Before:=Worksheets(1)
Set Tabl = Selection
For Each Pap In Tabl
If Pap.MergeCells Then
With Pap.MergeArea
.UnMerge
.Value = Pap.Value
End With
End If
Next
i = Application.InputBox("So dong chua label", "Hoang", i, Type:=2)
j = Application.InputBox("So cot chua label", "Hoang", j, Type:=2)
On Error Resume Next
Sheets("Unpivot_Table").Delete
Sheets.Add.Name = "Unpivot_Table"
Set Pap = Range("Unpivot_Table!B2")
b = Tabl.Rows.Count
a = Tabl.Columns.Count
Set Data = Range(Tabl.Cells(i + 1, j + 1), Tabl.Cells(b, a))
Set Columnlabel = Range(Tabl.Cells(i + 1, 1), Tabl.Cells(b, j))
Set Rowlabel = Range(Tabl.Cells(1, j + 1), Tabl.Cells(i, a))
Pap.Select
For Each Column In Data.Columns
Column.Copy
Selection.PasteSpecial Paste:=xlPasteValues
Columnlabel.Copy
Selection.Offset(0, 1).PasteSpecial Paste:=xlPasteValues
Column.Copy
Selection.Offset(b - i, -1).Select
Next Column
Pap.Offset(0, j + 1).Select
For Each Column In Rowlabel.Columns
Column.Copy
Range(Selection, Selection.Offset(b - i - 1, 0)).PasteSpecial Paste:=xlPasteValues, Transpose:=True
Selection.End(xlDown).Offset(1, 0).Select
Next Column
Set Label = Range(Pap.Offset(-1, 0), Pap.Offset(0, i + j + 1))
For k = 1 To i + j + 1
Label.Cells(1, k).Value = Application.InputBox(Label.Cells(2, k).Value & " la", "Hoang", k, Type:=2)
Next
Range(Pap.End(xlUp), Pap.End(xlDown).End(xlToRight)).Select
SrcData = ActiveSheet.Name & "!" & Selection.Address
On Error Resume Next
Sheets("Pivot").Delete
Sheets.Add.Name = "Pivot"
Set pvtCache = ActiveWorkbook.PivotCaches.Create( _
SourceType:=xlDatabase, _
SourceData:=SrcData)
Set pvt = pvtCache.CreatePivotTable( _
TableDestination:="Pivot!" & Sheets("Pivot").Range("A3").Address(ReferenceStyle:=xlR1C1), _
TableName:="PivotTable1")
End Sub
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations