Как разделить значения ячеек вертикально в Excel?
При работе в Excel вы можете столкнуться с ситуациями, когда несколько значений в одной строке или нескольких строках нужно преобразовать в вертикальный список. Это особенно полезно, когда данные хранятся в горизонтальном формате, но их необходимо обработать или проанализировать в формате столбца.
В этом руководстве будут рассмотрены три эффективных метода для преобразования значений ячеек вертикально:
Разделение значений ячеек на строки вертикально в Excel
- Использование формулы (Excel 365) – Лучший способ для динамических и автоматических преобразований
- Использование Kutools для Excel – Быстрое и простое решение со специализированным инструментом для всех версий Excel
- Использование VBA-кода – Идеально подходит для автоматизации процесса во всех версиях Excel
Разделение значений ячеек на строки вертикально с помощью формулы (Excel 365)
Если у вас есть Excel 365, вы можете использовать функции TEXTSPLIT, TEXTJOIN и TRANSPOSE для преобразования значений ячеек вертикально без ручного труда.
Пожалуйста, скопируйте и вставьте следующую формулу в пустую ячейку, затем нажмите клавишу "Enter", и Excel автоматически разместит данные в несколько строк, см. скриншот:
=TRANSPOSE(TEXTSPLIT(TEXTJOIN(";", TRUE, A1:A4), ";"))
- TEXTJOIN(";", TRUE, A1:A4): Объединяет текст в ячейках A1 до A4 в одну строку, разделенную точками с запятой (;).
- TEXTSPLIT(...): Разделяет объединенную строку обратно на отдельные значения, используя точку с запятой в качестве разделителя.
- TRANSPOSE(...): Преобразует получившийся вертикальный список значений в горизонтальную строку (или наоборот, в зависимости от исходной ориентации).
✅ Преимущества:
- ✔ Динамические обновления: Если исходные данные изменяются, формула автоматически обновляет результаты.
- ✔ Никаких ручных усилий: Устраняет необходимость в повторяющемся ручном разделении.
- ✔ Настройка разделителей: Замените точку с запятой (;) любым другим разделителем (например, запятая, пробел), чтобы соответствовать вашим данным.
❌ Недостатки:
- ✘ Доступно только в Excel 365, не работает в старых версиях Excel.
Разделение значений ячеек на строки вертикально с помощью Kutools для Excel
Если вы используете Excel 2019 или более раннюю версию, вы можете воспользоваться "Kutools для Excel" – мощным дополнением с специализированными инструментами для легкого преобразования и управления данными. С помощью функции "Разделить данные на строки" вы сможете легко преобразовать значения ячеек вертикально на основе любого нужного вам разделителя.
После установки "Kutools для Excel", выполните следующие действия:
- Нажмите "Kutools" > "Объединить и разделить" > "Разделить данные на строки", см. скриншот:

- В диалоговом окне "Разделить данные на строки" укажите следующие операции:
- Выберите ячейки, которые вы хотите разделить;
- В разделе "Разделитель" выберите разделитель, который определит, как следует разделить содержимое ячейки. Здесь я выберу "точка с запятой".
- Наконец, нажмите кнопку "OK".

Результат: Данные будут преобразованы в вертикальный столбец.
✅ Преимущества:
- ✔ Работает во всех версиях Excel (2010, 2013, 2016, 2019, 2021, 365)
- ✔ Не требует сложных формул или кодирования.
- ✔ Поддерживает широкий спектр разделителей.
- ✔ Kutools предлагает более 300 инструментов для манипулирования данными, экономя время на других задачах.
❌ Недостатки:
- ✘ Требуется установка Kutools
Разделение значений ячеек на строки вертикально с помощью VBA-кода
Для продвинутых пользователей VBA предоставляет надежное решение для автоматизации вертикального разделения значений ячеек. Следующий VBA-код позволяет вам легко разделить содержимое ячеек на строки с использованием любого пользовательского разделителя.
1. Удерживайте клавиши "ALT" + "F11", чтобы открыть окно "Microsoft Visual Basic for Applications".
2. Нажмите "Вставка" > "Модуль" и вставьте следующий код в окно "Модуль".
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", и значения ячеек будут разделены в список с помощью разделителя, см. скриншот:
✅ Преимущества:
- ✔ Автоматизирует процесс, экономя время
- ✔ Работает во всех версиях Excel
- ✔ Может быть настроен для различных разделителей
❌ Недостатки:
- ✘ Требуется базовые знания программирования на VBA
- ✘ Немного сложно для начинающих
Преобразование значений ячеек вертикально в Excel может быть достигнуто несколькими методами, каждый из которых имеет свои преимущества. Понимая эти методы, вы можете выбрать лучший подход для ваших конкретных потребностей и оптимизировать свою работу в Excel. Будь вы новичок или продвинутый пользователь, эти инструменты и техники помогут вам работать с данными более эффективно. Если вас интересуют дополнительные советы и приемы по Excel, наш сайт предлагает тысячи учебных материалов, которые помогут вам освоить Excel.
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с Kutools для Excel и ощутите новую эффективность. Kutools для Excel предлагает более300 расширенных функций для повышения продуктивности и экономии времени. Щелкните здесь, чтобы получить наиболее нужную вам функцию...
Office Tab добавляет вкладочный интерфейс в Office, делая вашу работу значительно проще
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна, а не в новых окнах.
- Увеличьте свою продуктивность на50% и сократите сотни кликов мышью ежедневно!

