Как разделить значения ячеек вертикально в 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% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек