Как переместить каждую вторую строку в столбцы в Excel?

При работе с данными в Excel, особенно с импортированными или неструктурированными наборами данных, вы часто можете обнаружить имена и связанные значения, расположенные вертикально в одном столбце. Чтобы сделать эти данные более читаемыми и удобными для использования, часто необходимо преобразовать их в табличный формат — перемещая каждую вторую строку в столбцы.

• Переместить каждую вторую строку в столбец с помощью формул
• Переместить каждую вторую строку в столбец с помощью Kutools для Excel
• Переместить каждую вторую строку в столбец с помощью VBA

Переместить каждую вторую строку в столбец с помощью формул

Это простой метод, который использует функцию ИНДЕКС Excel для извлечения чередующихся строк и отображения их как столбцов. Если вы хотите преобразовать имена в один столбец, а возрасты — в следующий столбец, примените следующие формулы:

1. В ячейке C2 введите следующую формулу в пустую ячейку, затем перетащите формулу вниз по мере необходимости. Эта формула извлекает значение из каждой второй строки, начиная со строки 2 (имена).

=INDEX($A:$A, (ROW(A1)-1)*2 + 2)

2. В ячейке D2 введите приведенную ниже формулу для извлечения альтернативных данных, перетащите формулу вниз, чтобы заполнить ячейки.

 =INDEX($A:$A, (ROW(A1)-1)*2 + 3)

Переместить каждую вторую строку в столбец с помощью Kutools для Excel

Если вы предпочитаете более удобное решение без формул, Kutools для Excel предлагает функцию, которая позволяет легко транспонировать строки в столбцы.

После установки Kutools для Excel выполните следующие шаги:

1. Нажмите Kutools > Диапазон > Преобразовать диапазон.
   
2. В диалоговом окне «Преобразовать диапазон» установите следующие операции:
   • Выберите диапазон, из которого вы хотите переместить каждую вторую строку.
   • Отметьте Одна колонка в диапазон в разделе Тип преобразования.
   • Затем отметьте Фиксированное значение и выберите или введите 2 в списке в разделе Строки на запись.
   • Наконец, нажмите кнопку OK.
     
3. В следующем всплывающем окне выберите одну ячейку для вывода результата, см. скриншот:
   
4. Нажмите OK, Kutools автоматически переместит каждую вторую строку в отдельные столбцы.
   

Переместить каждую вторую строку в столбец с помощью кода VBA

Если вам часто нужно выполнять эту задачу, макрос VBA может автоматизировать процесс, делая его быстрее и эффективнее.

1. Нажмите клавиши F11 + Alt вместе на клавиатуре, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Затем нажмите Вставить > Модуль, чтобы вставить новое окно модуля. После этого скопируйте следующий код VBA в окно.

VBA: Переместить каждую вторую строку в столбец.

Sub MoveRange()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set InputRng = InputRng.Columns(1)
For i = 1 To InputRng.Rows.Count Step 2
    OutRng.Resize(1, 2).Value = Array(InputRng.Cells(i, 1).Value, InputRng.Cells(i + 1, 1).Value)
    Set OutRng = OutRng.Offset(1, 0)
Next
End Sub

3. Нажмите кнопку Выполнить или клавишу F5 на клавиатуре, и появится диалоговое окно, предлагающее выбрать диапазон для перемещения. См. скриншот:

4. Затем нажмите OK, чтобы показать другое диалоговое окно для выбора ячейки для вывода результата. См. скриншот:

5. Нажмите OK, и вы увидите результат, как показано ниже:

🎯 Заключение:

Каждый метод перемещения каждой второй строки в столбцы в Excel имеет свои преимущества, в зависимости от ваших потребностей:

• Метод с формулами: Лучший выбор для быстрых разовых задач с небольшими наборами данных. Не требует дополнительных инструментов, но может замедлиться при работе с большими диапазонами данных.
• Kutools для Excel: Идеально подходит для пользователей, которые предпочитают простое решение на основе кликов без сложных формул или кодирования. Kutools предоставляет удобный интерфейс для быстрых преобразований.
• Макрос VBA: Лучший выбор для автоматизации и повторяющихся задач, особенно с большими наборами данных. Требует базовых знаний программирования, но обеспечивает максимальную гибкость.

Выберите метод, который соответствует вашим потребностям, будь то работа с небольшим набором данных или необходимость в более масштабируемом решении для больших наборов данных. Если вас интересуют дополнительные советы и хитрости Excel, наш сайт предлагает тысячи учебных материалов, которые помогут вам овладеть Excel.

Связанные статьи:

• Выбрать каждую четную строку в Excel
• Копировать каждую вторую строку