Как перенести каждую вторую строку в excel

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

Перенести каждую вторую строку в столбец с формулой

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

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

---

Перенести каждую вторую строку в столбец с формулой

Для большинства пользователей Excel использование формулы для решения задачи в Excel — самый простой способ.

1. Выберите ячейку рядом с вашими данными и введите эту формулу. = ЕСЛИ (ЕСТЬ ЧЕТ (СТРОКА (B2)); B2; «») (B2 указывает данные, которые вы хотите получить) в него и нажмите Enter затем перетащите автозаполнение, чтобы заполнить диапазон, в котором вы хотите использовать эту формулу. Теперь в этом столбце собраны данные каждой второй строки.

2. Затем выберите другую ячейку рядом с указанным выше столбцом и введите эту формулу. = ЕСЛИ (ISODD (СТРОКА (B3)); B3; «») (B3 — это данные, которые вы хотите получить) и нажмите Enter затем перетащите автозаполнение, чтобы заполнить диапазон, в котором вы хотите использовать эту формулу. Теперь в этом столбце собраны данные каждой третьей строки.

---

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

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

1. Нажмите F11 + Альт вместе на клавиатуре, чтобы открыть Microsoft Visual Basic для приложений окно.

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

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

Sub MoveRange()
'Updateby20140730A
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. Нажмите Run или F5 на клавиатуре, и появится диалоговое окно, в котором вы можете выбрать диапазон для перемещения. Смотрите скриншот:

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

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

---

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

Помимо формул и VBA, если вы установили Kutools for Excel, вы можете использовать его Диапазон преобразования функция быстрого перемещения каждой второй строки в столбец.

Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас

1. Выберите диапазон, который вы хотите переместить через каждую вторую строку, и нажмите Кутулс > Конвертер диапазонов > Диапазон преобразования. Смотрите скриншот:

2. в Диапазон преобразования диалог, проверьте Один столбец для диапазона in Тип трансформации раздел и проверьте Фиксированная стоимость затем выберите или введите 2 в списке в Строк на запись раздел. Смотрите скриншот:

3. Нажмите Ok чтобы открыть диалоговое окно для выбора одной ячейки для вывода результата, см. снимок экрана:

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

Для получения дополнительной информации о диапазоне преобразования.

---

Относительные статьи:

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

ГЛАВНАЯ

ТРЕНИНГИ

   Быстрый старт
   Расширенный Excel
   Мастер Формул
   Прогнозирование
   Визуализация
   Макросы на VBA

КНИГИ

   Готовые решения
   Мастер Формул
   Скульптор данных

ВИДЕОУРОКИ

ПРИЕМЫ

   Бизнес-анализ
   Выпадающие списки
   Даты и время
   Диаграммы
   Диапазоны
   Дубликаты
   Защита данных
   Интернет, email
   Книги, листы
   Макросы
   Сводные таблицы
   Текст
   Форматирование
   Функции
   Всякое
PLEX

   Коротко
   Подробно
   Версии
   Вопрос-Ответ
   Скачать
   Купить

ПРОЕКТЫ

ОНЛАЙН-КУРСЫ

ФОРУМ

   Excel
   Работа
   PLEX

© Николай Павлов, Planetaexcel, 2006-2022
info@planetaexcel.ru

Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.

Техническая поддержка сайта

ООО «Планета Эксел» ИНН 7735603520 ОГРН 1147746834949

ИП Павлов Николай Владимирович         ИНН 633015842586         ОГРНИП 310633031600071

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

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

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

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

---

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

---

Для большинства пользователей Excel использование формулы для решения проблемы в Excel – самый простой способ.

1. Выберите ячейку рядом с вашими данными и введите в нее эту формулу = IF (ISEVEN (ROW (B2)), B2, “”) (B2 указывает данные, которые вы хотите получить), и нажмите клавишу Enter , затем перетащите автозаполнение, чтобы заполнить диапазон, в котором вы хотите использовать эту формулу. Теперь в этом столбце собраны данные каждой второй строки.

2. Затем выберите другую ячейку рядом с вышеуказанным столбцом и введите эту формулу = IF (ISODD (ROW (B3)), B3, “”) (B3 – это данные, которые вы хотите получить) в него и нажмите клавишу Enter , затем перетащите автозаполнение, чтобы заполнить диапазон, в котором вы хотите использовать эту формулу. Теперь в этом столбце собраны данные каждой третьей строки.

---

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

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

1. Нажмите одновременно клавиши F11 + Alt на клавиатуре, чтобы открыть окно M Microsoft Visual Basic для приложений .

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

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

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

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

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

---

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

Помимо формул и VBA, если вы установили Kutools for Excel , вы можете использовать его Диапазон преобразования для быстрого перемещения каждой второй строки в столбец.

Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас

1. Выберите диапазон, который вы хотите переместить через каждую вторую строку, и нажмите Kutools > Конвертер диапазона > Диапазон преобразования . См. Снимок экрана:

2. В диалоговом окне Диапазон преобразования установите флажок Один столбец для диапазона в разделе Тип преобразования и установите флажок Фиксированное значение , затем выберите или введите 2 в список в разделе Строк на запись . См. Снимок экрана:

3. Нажмите Ok , чтобы открыть диалоговое окно для выбора одной ячейки для вывода результата, см. Снимок экрана:

4. Затем нажмите ОК . Вы можете увидеть результат, как показано ниже:

Для получения дополнительной информации о диапазоне преобразования.

---

Относительные статьи:

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

---

Вторую ячейку в столбце перенести в строку рядом

Elena_MZ Дата: Среда, 05.03.2014, 00:01 | Сообщение № 1 Группа: Пользователи Ранг: Прохожий Сообщений: 6 Репутация: 0 ± Замечаний: 40% ± Excel 2007 Подскажите не могу найти. Как каждую вторую строку перенести в строку рядом с первой? И удалить пустую   Ответить

Pelena Дата: Среда, 05.03.2014, 00:12 | Сообщение № 2 Группа: Админы Ранг: Местный житель Сообщений: 18797 Репутация: 4284 ± Замечаний: ± Excel 2016 & Mac Excel И Вам здравствуйте. Elena_MZ, а почему Вы ни в одной из своих тем не отписались? «Черт возьми, Холмс! Но как??!!» Ю-money 41001765434816   Ответить

Elena_MZ Дата: Среда, 05.03.2014, 00:18 | Сообщение № 3 Группа: Пользователи Ранг: Прохожий Сообщений: 6 Репутация: 0 ± Замечаний: 40% ± Excel 2007 Pelena, Каких тем?   Ответить

Ответить

Elena_MZ Дата: Среда, 05.03.2014, 00:51 | Сообщение № 5 Группа: Пользователи Ранг: Прохожий Сообщений: 6 Репутация: 0 ± Замечаний: 40% ± Excel 2007 Pelena, Я общалась по одной из тем в личной переписке. Это запрещено? Все довольны, вопрос решился.   Ответить

Pelena Дата: Среда, 05.03.2014, 01:06 | Сообщение № 6 Группа: Админы Ранг: Местный житель Сообщений: 18797 Репутация: 4284 ± Замечаний: ± Excel 2016 & Mac Excel Ответ есть в Правилах По теме: вариант в файле К сообщению приложен файл: 9081892.xlsx (10.6 Kb) «Черт возьми, Холмс! Но как??!!» Ю-money 41001765434816   Ответить

Elena_MZ Дата: Среда, 05.03.2014, 15:02 | Сообщение № 7 Группа: Пользователи Ранг: Прохожий Сообщений: 6 Репутация: 0 ± Замечаний: 40% ± Excel 2007 Pelena, Спасибо огромное. Перехожу на ЛС.   Ответить

Convert a column of data into multiple rows of data at a given interval. For instance, every 5 rows of data in the column will appear in its own row after being transposed.

To Transpose in Excel means to convert a range of data from a column to a row and vice versa.

The above example is kind of confusing so let’s look at an example and then I will show you the macro that is required to do this and what you need to edit to make it work for you.

Sections:

Example

Macro

Notes

Example

Here is a column of data:

I want to transpose this into multiple rows so that each row contains only 5 values.

This is the result:

Macro

What you need to change:

interval = 5 this is the number of values that will be placed on each row when you transpose the column. Change the 5 to whatever interval you want.

first_row = 1 this is the first row of the data that you want to move from a column to a row, transpose. If the data starts in row 1, this should be 1, row 2, this should be 2.

first_col = 1 this is the column that contains the data to transpose. If the data is in column A, this should be 1, column B, this should be 2, etc.

dest_start_col = 3 the column where you want the data to be transposed. 1 is for column A, 2 for column B, etc.

dest_start_row = 1 the row in which you want the transposed data to start filling-in.

This macro will give you the result displayed in the Example section above here.

Notes

This is a simple yet powerful macro. Use it on sample data before you use it on real data so that you fully understand how it will behave and what it will do.

Download the sample file attached to this tutorial to test out the macro.

Similar Content on TeachExcel

Subscribe for Weekly Tutorials

BONUS: subscribe now to download our Top Tutorials Ebook!