Як вертикально розділити значення комірок в Excel?
В Excel ви можете застосувати Текст у стовпці функція розділити значення комірок на кілька стовпців по горизонталі, але це не допоможе вам розділити вміст комірки на кілька рядків по вертикалі. І в цій статті я розповім про кілька швидких способів розділити значення комірок на рядки вертикально за допомогою певного роздільника в Excel.
Розділіть значення комірок на рядки вертикально за допомогою роздільника з кодом VBA
Розділіть значення клітинок на рядки вертикально за допомогою розділювача за допомогою Kutools для Excel
Розділіть значення комірок на рядки вертикально за допомогою роздільника з кодом VBA
Наступний код VBA може допомогти вам розділити значення клітинки на рядки вертикально за допомогою будь-якого роздільника, як завгодно, будь-ласка, зробіть наступне:
1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.
2. Натисніть Insert > Модуліта вставте наступний код у Модулі Вікно
Код VBA: Розбийте значення комірок на рядки вертикально за допомогою певного роздільника
Sub splitvertically()
'updatebyExtendoffice
Dim xRg As Range
Dim xOutRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xStr As String
Dim xOutArr As Variant
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If xOutRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xStr = "" Then
xStr = xCell.Value
Else
xStr = xStr & ";" & xCell.Value
End If
Next
xOutArr = VBA.Split(xStr, ";")
xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub
3. Потім натисніть F5 клавішу для запуску цього коду, і з'явиться підказка, щоб нагадати вам вибрати значення комірок, які потрібно розділити вертикально, див. знімок екрана:
4. А потім клацніть OK , вискакує інше вікно, щоб нагадати вам вибрати клітинку, щоб поставити результат, див. знімок екрана:
5. Клацання OK і значення клітинки розділено на список розділювачем, див. знімок екрана:
примітки: У наведеному вище коді ви можете змінити крапку з комою ; до будь-яких інших обмежувачів, які вам потрібні.
Розділіть значення клітинок на рядки вертикально за допомогою розділювача за допомогою Kutools для Excel
Kutools для ExcelАвтора Розділені клітини Функція - це потужна утиліта, вона може допомогти вам розділити значення комірок на кілька стовпців або рядків будь-якими роздільниками, як вам потрібно.
Kutools для Excel : з більш ніж 300 зручними надбудовами Excel, які можна спробувати без обмежень протягом 30 днів. |
після установки Kutools для Excel, будь ласка, виконайте наступне:
1. Виділіть комірки, які потрібно розділити на рядки за певним роздільником.
2. Потім натисніть Кутулс > Злиття та розділення > Розділені клітини, див. скріншот:
3, в Розділені клітини діалогове вікно, виберіть Розділити на ряди під тип розділ, а потім перевірте Інше від Розділено на розділу та введіть роздільник, за яким потрібно розділити значення комірок, див. знімок екрана:
4. А потім клацніть Ok , у вікні, що вискакує, виберіть клітинку для виведення результату, див. знімок екрана:
5, І натисніть OK кнопки, значення комірки були розділені на рядки на основі конкретного роздільника, як показано на наступному знімку екрана:
Завантажте та безкоштовну пробну версію Kutools для Excel зараз!
Демонстрація: розділіть значення клітинок на рядки вертикально за допомогою розділювача за допомогою Kutools для Excel
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!