Як розділити довгий стовпець на кілька стовпців у Excel?
Розбийте довгий стовпець на кілька стовпців за допомогою VBA
Розділіть довгий стовпець на кілька стовпців за допомогою Kutools для Excel
Розбийте довгий стовпець на кілька стовпців за допомогою VBA
1. прес Alt + F11 клавіші разом, щоб відкрити Microsoft Visual Basic для додатків вікна.
2. клацання Insert > Модулі і скопіюйте наступний код VBA у спливаюче вікно.
VBA: Розбийте довгий стовпець на кілька стовпців.
Sub SplitColumn()
'Updateby20141106
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xRow As Integer
Dim xCol As Integer
Dim xArr As Variant
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type: = 8)
xRow = Application.InputBox("Rows :", xTitleId)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
Set InputRng = InputRng.Columns(1)
xCol = InputRng.Cells.Count / xRow
ReDim xArr(1 To xRow, 1 To xCol + 1)
For i = 0 To InputRng.Cells.Count - 1
xValue = InputRng.Cells(i + 1)
iRow = i Mod xRow
iCol = VBA.Int(i / xRow)
xArr(iRow + 1, iCol + 1) = xValue
Next
OutRng.Resize(UBound(xArr, 1), UBound(xArr, 2)).Value = xArr
End Sub
3. клацання прогін кнопку або натисніть F5 клавішу для запуску VBA, і з'явиться діалогове вікно для вибору списку даних, а потім натисніть OK щоб перейти, щоб вказати, скільки рядків в одному стовпці потрібно в наступному діалоговому вікні, а потім натисніть OK і виберіть клітинку для виведення результату. Дивіться скріншоти:
4. клацання OK, тоді ви можете бачити, як довгий стовпець розділений на кілька стовпців, і кожен стовпець має 15 комірок.
Розділіть довгий стовпець на кілька стовпців за допомогою Kutools для Excel
Можливо, хтось із вас не любить використовувати код VBA, на щастя, ви можете використовувати Діапазон трансформації корисність Kutools для Excel швидко і легко перетворити довгий стовпець на фіксовану кількість стовпців.
Kutools для Excel, з більш ніж 300 зручні функції, полегшує вам роботу. |
після установки Kutools для Excel, виконайте наведені нижче дії.(Безкоштовно завантажте Kutools для Excel зараз!)
1. Виберіть дані стовпця, які потрібно розділити, і натисніть Кутулс > Діапазон > Діапазон трансформації. Дивіться знімок екрана:
2. У діалоговому вікні, що з’явиться, поставте галочку Один стовпець для діапазону варіант, а потім поставте прапорець Фіксована вартість параметр і введіть потрібну кількість стовпців у текстове поле. Дивіться знімок екрана:
3. клацання Ok і виберіть одну клітинку для видалення розділених даних. Дивіться знімок екрана:
4. клацання OK щоб закінчити операції. Тепер дані довгих стовпців розділено на три стовпці.
Це простіше, ніж код VBA? З Тransform Діапазон утиліта, ви можете перетворити рядок в діапазон, діапазон в рядок або один стовпець.
Транспонуйте один стовпець / рядок до діапазону або навпаки
Швидко розділіть одну клітинку на стовпці або рядки на основі роздільника
|
В Excel розділяти клітинку на стовпці за допомогою Майстра крок за кроком нудно. Але з Kutools для Excel's Розділені клітини утиліта, ви можете: 1, перетворити одну комірку в стовпці або рядки на основі роздільника; 2, перетворити рядок у текст і число; 3, перетворити рядок на основі певної ширини, клацаючи. Натисніть, щоб отримати повнофункціональну 30-денну безкоштовну пробну версію! |
Kutools для Excel: із понад 300 зручними надбудовами Excel, які можна безкоштовно спробувати без обмежень протягом 30 днів. |
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!