Как поменять местами ячейки в Excel

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

Процедура перемещения ячеек

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

Способ 1: Копировать

Это, пожалуй, самый простой способ, который предполагает копирование элементов в другое место с заменой исходных данных. Процедура следующая:

1. Встаем в первую клетку (выбираем ее), которую планируем переместить. На главной вкладке программы нажмите на кнопку «Копировать» (группа инструментов «Буфер обмена»). Вы также можете просто нажать комбинацию клавиш Ctrl + C.
2. Подойдите к любой свободной ячейке листа и нажмите кнопку "Вставлять" в той же вкладке и группе инструментов. Или вы можете снова использовать горячие клавиши – Ctrl + V.
3. Теперь выделим вторую ячейку, с которой хотим поменять местами первую, и также скопируем ее.
4. Встаем в первую камеру и нажимаем кнопку "Вставлять" (или Ctrl + V).
5. Теперь выберите ячейку, в которую было скопировано значение из первой ячейки, и скопируйте ее.
6. Перейдите ко второй ячейке, в которую вы хотите вставить данные, и нажмите соответствующую кнопку на ленте.
7. Выбранные элементы были успешно заменены. Ячейка, в которой временно хранились скопированные данные, больше не нужна. Щелкните по нему правой кнопкой мыши и выберите команду из открывшегося меню "Удалять".
8. В зависимости от того, есть ли рядом с этой ячейкой справа/снизу заполненные элементы или нет, выберите соответствующий вариант удаления и нажмите кнопку OK.
9. Это все, что нужно было сделать для того, чтобы поменять местами ячейки.

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

Способ 2: перетащить

Этот метод также используется для замены ячеек, однако в этом случае ячейки будут сдвинуты. Итак, выполняем следующие действия:

1. Выделяем ячейку, которую планируем переместить на новое место. Наводим курсор мыши на ее границу, и как только он меняет вид на обычный указатель (с 4 стрелками в разные стороны на конце), нажимаем и удерживаем клавишу Shift, переместите ячейку в новое место, зажав левую кнопку мыши.
2. Чаще всего этот метод используется для замены соседних ячеек, поскольку смещение элементов в этом случае не нарушит структуру таблицы.
3. Если мы решим переместить одну ячейку через несколько других, это изменит положение всех остальных элементов.
4. После этого вам придется наводить порядок.

Способ 3: использование макросов

Мы упоминали в начале статьи, что в Excel, увы, нет специального инструмента, позволяющего быстро «переставлять» ячейки местами (за исключением метода, описанного выше, который эффективен только для соседних элементов). Однако это можно сделать с помощью макросов:

1. Для начала необходимо убедиться, что в приложении активирован так называемый «режим разработчика» (по умолчанию выключен). Для этого:
   • перейти в меню "файл" и выберите из списка слева «Параметры».
   • в настройках программы нажмите на подраздел «Настроить ленту», справа поставьте галочку напротив пункта «Разработчик» и нажмите OK.
2. Перейти на вкладку «Разработчик», где нажмите на иконку "Visual Basic" (группа инструментов "код").
3. В редакторе, нажав на кнопку «Просмотреть код», в появившееся окно вставьте приведенный ниже код:

   Sub ПеремещениеЯчеек()

   Dim ra As Range: Установить ra = Выбор

   msg1 = "Произвести выделение ДВУХ диапазонов идентичного размера"

   msg2 = "Произвести выделение двух диапазонов ИДЕНТИЧНОГО размера"

   Если ra.Areas.Count <> 2 Тогда MsgBox msg1, vbCritical, «Проблема»: Exit Sub

   Если ra.Areas(1).Count <> ra.Areas(2).Count Тогда MsgBox msg2, vbCritical, «Проблема»: Exit Sub

   Приложение.ScreenUpdating = False

   arr2 = ra.Области(2).Значение

   ra.Области(2).Значение = ra.Области(1).Значение

   ra.Areas(1).Значение = arr2

   End Sub

4. Закройте окно редактора, нажав обычную кнопку в виде крестика в правом верхнем углу.
5. Удерживая клавишу Ctrl на клавиатуре выделяем две ячейки или две области с одинаковым количеством элементов, которые планируем поменять местами. Затем нажимаем кнопку «Макро» (вкладка «Разработчик»Группа "код").
6. Появится окно, в котором мы видим ранее созданный макрос. Выберите его и нажмите "Бег".
7. В результате работы макрос поменяет местами содержимое выделенных ячеек.

Примечание: при закрытии документа макрос будет удален, поэтому в следующий раз его нужно будет создать заново (при необходимости). Но, если вы ожидаете, что в будущем вам придется часто совершать подобные операции, файл можно сохранить с поддержкой макросов.

Заключение

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