Як легко і швидко транспонувати дані про діапазон і стек в Excel?
Наприклад, є деякі дані, що відображаються в групах, і тепер я хочу транспонувати діапазон і скласти дані в кожному стовпці, як показано нижче. У цій статті я ознайомлю з методами цього завдання в Excel.
Транспонування та складання даних за допомогою VBA
Транспонування та складання даних за допомогою Transpose Table Dimension
Транспонування та складання даних за допомогою VBA
Ви можете застосувати код VBA для транспонування та складання даних.
1. Виберіть дані, крім заголовків стовпців, і натисніть Alt + F11 клавіші для ввімкнення Microsoft Visual Basic для додатків вікна.
2. клацання Insert > Модулі, і вставте код нижче в Модулі.
VBA: Транспонування та стек даних
Sub ConvertTableToList()
'UpdatebyExtendoffice20161121
Const TEST_COLUMN As String = "A"
Dim i As Long, j As Long
Dim iLastRow As Long
Dim iLastCol As Long
Application.ScreenUpdating = False
With ActiveSheet
iLastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
For i = iLastRow To 2 Step -1
iLastCol = .Cells(i, .Columns.Count).End(xlToLeft).Column
For j = iLastCol To 3 Step -1
.Rows(i + 1).Insert
.Cells(i + 1, 2).Value = .Cells(i, j).Value
.Cells(i, j).Value = ""
Next j
Next i
.Rows(1).Delete
End With
Application.ScreenUpdating = True
End Sub
3. прес F5 ключ, а потім дані були транспоновані та складені. Дивіться знімок екрана:
Примітка: У коді VBA A вказує розміщення даних транспонування в стовпці A активного аркуша та заміну вихідних даних у стовпці A.
Транспонування та складання даних за допомогою Transpose Table Dimension
Якщо ви хочете швидко і легко транспонувати дані про діапазон і стек без коду VBA, ви можете подати заявку Kutools для ExcelАвтора Переміщення розміру таблиці утиліта
Kutools для Excel, з більш ніж 300 зручні функції, полегшує вам роботу. |
після установки Kutools для Excel, виконайте наведені нижче дії:(Безкоштовно завантажте Kutools для Excel зараз!)
1. Виберіть дані, якими ви користуєтесь, клацніть Кутулс > Діапазон > Транспонуйте розміри таблиці. Дивіться знімок екрана:
2. У діалоговому вікні поставте галочку Перехресна таблиця для переліку і виберіть комірку, куди потрібно розмістити транспоновані дані Діапазон результатів (одна клітинка) текстове вікно. Дивіться знімок екрана:
3. клацання Ok. Тепер діапазон транспонований і складений у стовпці.
Транспонувати дані про діапазон і стек
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!