Прескочи на основното съдържание

Как да обърна обобщена таблица в Excel?

Автор: Слънце Последна промяна: 2020-05-25
doc-reverse-pivottable-1
Искали ли сте някога да обърнете или транспонирате обобщената таблица в Excel точно както на екранните снимки по-долу. Сега ще ви кажа бързите начини за обръщане на обобщена таблица в Excel.
(11 стъпки) Обратна обобщена таблица с помощта на PivotTable и PivotChart Wizard
(7 стъпки) Обратна обобщена таблица с Kutools за размерите на таблицата за транспониране на Excel добра идея3

стрелка син десен балон Обърнете обобщената таблица с PivotTable и PivotChart Wizard

За да обърнете обобщената таблица, първо трябва да отворите диалоговия прозорец на съветника за обобщена таблица и обобщена диаграма и да създадете нова обобщена таблица в Excel.

1. Натиснете Alt + D + P клавишни комбинации за отваряне на диалоговия прозорец на съветника за обобщена таблица и обобщена диаграма, след което проверете Множество диапазони на консолидация опция под Къде са данните, които искате да анализирате раздел и Осева таблица опция под Какъв вид отчет искате да създадете раздел.

Забележка: Можете също да добавите командата PivotTabe и PivoChart Wizard в лентата с инструменти за бърз достъп и щракнете, за да отворите диалоговия прозорец.

doc-reverse-pivottable-2

2. кликване Напред за да отидете на следващия диалогов прозорец за проверка Ще създам полетата на страницата и щракнете върху Напред.

doc-reverse-pivottable-3

3. Изберете вашите базови данни, след което щракнете Добави за да добавите диапазона от данни към Всички диапазони списък. Вижте екранна снимка:

doc-reverse-pivottable-4

4. кликване Напред за да преминете към последната стъпка на съветника, проверете опцията, от която се нуждаете Къде искате да поставите отчета с обобщена таблица раздел. След това щракнете завършеност.

doc-reverse-pivottable-5

5. Сега се създава нова обобщена таблица и щракнете двукратно върху последната клетка в десния долен ъгъл на новата обобщена таблица, след което се създава нова таблица в нов работен лист. Вижте екранни снимки:
doc-reverse-pivottable-6

iv>

6. След това създайте нова обобщена таблица въз основа на тази нова таблица. Изберете цялата нова таблица и щракнете Поставете > Осева таблица > Осева таблица.

doc-reverse-pivottable-7

7. След това в изскачащия диалогов прозорец проверете опцията, от която се нуждаете Изберете къде искате да бъде поставен отчетът с обобщена таблица раздел.

doc-reverse-pivottable-8

8. кликване OK. Тогава Списък с полета на обобщена таблица се появява прозорец и плъзнете Ред намлява Колона полета към Етикети на редове раздел и поле Стойност към Ценности раздел. Вижте екранна снимка:

doc-reverse-pivottable-9

9. След това щракнете върху произволна клетка от новата обобщена таблица и отидете на Дизайн раздела, за да щракнете върху Оформление на отчет > Показване в табличен формуляр.

doc-reverse-pivottable-10

10. След това отидете на щракване Оформление на отчета отново, за да щракнете Повторете всички етикети на елементи от списъка. Вижте екранна снимка:

doc-reverse-pivottable-11

Забележка: Това е не Повторете всички етикети на елементи команда в падащия списък на Оформление на отчета в Excel 2007, просто пропуснете тази стъпка.

11. кликване Дизайн > Междинните суми > Не показвай междинни суми.

doc-reverse-pivottable-12

Сега осевата таблица е обърната. Вижте екранна снимка:

doc-reverse-pivottable-13


стрелка син десен балон Обърнете обобщената таблица с Kutools за размерите на таблицата за транспониране на Excel

С горния начин има толкова много стъпки за решаване на задачата. За да подобрите значително ефективността на работата си и да намалите работните часове, предлагам да обърнете обобщената таблица с Kutools за ExcelЕ Транспониране на размерите на таблицата функция.

1. Изберете базовите данни и щракнете Kutools > Обхват > Транспониране на размерите на таблицата.

doc обратна осева таблица 20

2. В Транспониране на размерите на таблицата диалог, проверка Кръстосана таблица за списък под Тип транспониране раздел, след което изберете клетката, в която искате да поставите новата таблица.

инструмент за добавяне на excel за промяна на 2d таблица на 1d

3. кликване Ok за да създадете нова таблица и след това вмъкнете заглавки над новата таблица. Вижте екранна снимка:

doc-reverse-pivottable-16

4. Изберете новата таблица, включително заглавките, и щракнете Поставете > Осева таблица > Осева таблица, след това в Създаване на обобщена таблица диалогов прозорец, проверете опцията, от която се нуждаете, под Изберете къде искате да бъде поставен отчетът с обобщена таблица раздел.

doc-reverse-pivottable-17

5. кликване OK, и в Списък с полета на обобщена таблица прозорец, плъзнете Ред намлява Колона полета към Етикети на редове раздел и Стойност поле към Ценности раздел.
doc-reverse-pivottable-9

6. Щракнете върху която и да е клетка от новата обобщена таблица и щракнете Дизайн > Оформление на отчета > Показване в табличен вид, след което щракнете върху Оформление на отчета отново, за да щракнете Повторете всички етикети на елементи. Вижте екранни снимки:

doc-reverse-pivottable-10doc-reverse-pivottable-11

Забележка: Това е не Повторете всички етикети на елементи команда в падащия списък на бутона Оформление на отчета в Excel 2007, просто я пропуснете.

7. кликване Дизайн > Междинните суми > Не показвай междинни суми.

doc-reverse-pivottable-12

Сега осевата таблица е обърната. Вижте екранна снимка:

doc-reverse-pivottable-19

с Kutools за ExcelЕ Транспониране на размерите на таблицата функция, можете също така да конвертирате таблица със списък в кръстосана таблица. Щракнете тук, за да научите повече информация.


Бързо транспонирайте Cross table в списък или обратно

Докато получавате лист с кръстосана таблица, който трябва да конвертирате в таблица със списък, как можете бързо да се справите с него? с Kutools от Excel Транспониране на размерите на таблицата помощна програма, можете да конвертирате таблица с кръстосани размери в таблица с три измерения или обратно възможно най-бързо.   Щракнете за 30-дневен пълнофункционален безплатен пробен период!
doc транспониране кръст към списък
 
Kutools за Excel: с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни.

Относителни статии:

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (1)
No ratings yet. Be the first to rate!
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
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations