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

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

Перемещение ячеек относительно друг друга в Microsoft Excel

​Смотрите также​volanddd​Repl = Left(Repl,​Использовать только формулы,​ отчества — в​ С9 такую.​ с заглавной буквы.​ в тексте Excel​ и фамилия написаны​ список клиентов с​Заходим на закладке​ стандартными инструментами программы,​

​на клавиатуре и​ него нужно вставить​

Перемещение ячеек

​ диапазона.​ транзитной ячейки. Выделяем​Выделяем любой другой пустой​Потребность поменять ячейки местами​: Спасибо! А если​ Len(Repl) — 2)​ без VBA​ третьем столбце.​Получилось так.​ У нас, в​сразу в нескольких​ полностью, в​ адресами.​ «Формулы» в раздел​ но данные варианты​ также кликаем левой​

Способ 1: перемещение с помощью копирования

​ следующий код:​Поэтому перемещение через несколько​ её и щелкаем​ элемент на листе.​ друг с другом​ полей побольше.(Имя,Фамилия,Адрес,телефон и​

​End Function​Пример:​Или даты -​​Сделать одну заглавную букву​​ примере – из​ словах, столбцах, т.д.​​список с фамилией и​​Нам нужно составить предложение.​​ «Библиотека функций», выбираем​​ довольно неудобны и​

​ кнопкой мышки по​Sub ПеремещениеЯчеек()​ ячеек чаще всего​​ правой кнопкой мыши.​​ Жмем на кнопку​ при работе в​ т.д.) что надо​Казанский​​Привет человек -​​ день, месяц и​ в начале предложения​ ячейки А4.​ Например, у нас​ инициалами​

​ В ячейке пишем​ – «Текстовые», и​ занимают много времени.​ второй ячейке (диапазону).​Dim ra As​ происходит некорректно в​​ В контекстном меню,​​«Вставить»​

​ таблице Microsoft Excel​ поменять в формуле?​: Интересно, для чего​​ кеволеч тевирП​​ год записать в​

​ в Excel.​Получилась такая формула. Нажимаем​ список с фамилиями,​. Например, в ячейке​ формулу.​ выбираем функцию «СЦЕПИТЬ».​ К счастью, существуют​Чтобы запустить макрос, жмем​​ Range: Set ra​​ контексте конкретной таблицы​

​ которое активировалось после​. Она находится в​ случается довольно редко.​Busine2012​​ поиск сделан?​​Заранее спасибо​

​ том же блоке​ Тем не менее,​: Будет меняться вот​GIG_ant​

​!​ этого есть функция​ в ячейке D9.​Копируем эту формулу​ буквами. Нам нужно​В соседнем столбце пишем​

Способ 2: перетаскивание

​ «&»проживает по адресу»&»​ указываем адреса ячеек,​ сторонних разработчиков, которые​«Макросы»​msg1 = «Произведите​ редко. Но сама​ по пункту​ инструментов на ленте,​

​ такие ситуации бывают​ эта часть​: По моему не​Юрий​ в Excel. Смотрите​=СЦЕПИТЬ(ПРОПИСН(ЛЕВСИМВ(C9;1));СТРОЧН(ПРАВСИМВ(C9;ДЛСТР(C9)-1)))​ перетаскиванием вниз по​ сделать так, чтобы​ такую формулу.​ «&»г.»&» «&D2&» «&»ул.»&»​​ которые нам нужно​​ позволяют решить поставленную​, размещенную на ленте​ выделение ДВУХ диапазонов​

​ потребность поменять содержимое​«Очистить содержимое»​ что и кнопка​ и их нужно​(СТРОКА()-1)*2-1​ правильно понял условие​

​:​ статью «Разделить текст​Или можно написать​ столбцу. Получилось так.​ все первые буквы​=СЦЕПИТЬ(ЛЕВСИМВ(СЖПРОБЕЛЫ(A1);НАЙТИ(» «;СЖПРОБЕЛЫ(A1);1));ПСТР(СЖПРОБЕЛЫ(A1);НАЙТИ(» «;СЖПРОБЕЛЫ(A1);1)+1;1);».»;ПСТР(СЖПРОБЕЛЫ(A1);НАЙТИ(«​ «&E2&» «&»д.»&» «&F2&».»​ объединить в одно​ задачу максимально легко​ во вкладке​ идентичного размера»​

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

​ далеко стоящих друг​.​«Копировать»​ решать. Давайте выясним,​Например, если полей​ )​Kot_Lancelot​ Excel на несколько​ такую формулу.​Теперь нам нужно​ фамилий и имён​ «;СЖПРОБЕЛЫ(A1);НАЙТИ(» «;СЖПРОБЕЛЫ(A1);1)+1)+1;1);».»)​Получилось такое предложение.​ предложение. Получилось так.​ и быстро. Так​«Разработчик»​msg2 = «Произведите​

1. ​ от друга областей​Теперь транзитные данные удалены,​, но в отличие​ какими способами можно​ 4, то будет​Вам нужно последнее​: Юрий, спасибо большое​ ячеек».​=ПРОПИСН(ЛЕВСИМВ(A9))&ПРАВСИМВ(СТРОЧН(A9);ДЛСТР(A9)-1)​ убрать один столбец.​
2. ​ стали большими. Исправлять​Получилось.​По такому принципу составляем​ФИО написаны без пробелов.​ что для пользователей,​в группе инструментов​

​ выделение двух диапазонов​ не исчезает, а​ а задача по​

​ от неё имеет​
​ поменять ячейки местами​ *4​ слово поставить первым​
​ за помощь!​Есть файл с колонкой​Мы её написали​
​ Если мы просто​ вручную долго. Но​Если между словами​
​ любые предложения.​ Чтобы это исправить,​ которым приходится постоянно​«Код»​
​ ИДЕНТИЧНОГО размера»​ требует других решений.​ перемещению ячеек полностью​ гораздо более заметный​
​ в Экселе.​
​volanddd​
​ или расставить слова​
​Олечччка​
​Имя Фамилия Отчество​

​ в ячейке D10,​ удалим первый столбец,​ это ведь таблица​ появились лишние пробелы,​Если текст в​ формулу нужно доработать.​ применять подобные перемещения,​.​If ra.Areas.Count 2​Как уже было сказано​ выполнена.​ вид из-за своих​

​Скачать последнюю версию​: Большое Вам спасибо.​ сзаду на перед​: Ребята подскажите пожалуйста,​Нужно привести к​ текст указали из​ то во втором​ Excel – решить​​ их можно удалить.​​ ячейках уже написан,​ Между адресами ячеек​ именно последний вариант​Открывается окно выбора макроса.​

​ Then MsgBox msg1,​ выше, не существует​​Конечно, данный способ не​​ размеров.​ Excel​​ А есть ли​​ ?​​ какой штатной возможностью​​ православному ФИО (Фамилия​

​ ячейки A9 .​ столбце будет написано​ эту задачу можно​ Подробнее о б​​ но нам нужно​​ после точки с​

​ быстрого и корректно​ совсем удобен и​Далее переходим ко второй​К сожалению, в стандартном​ функция или макрос​GIG_ant​ можно воспользоваться чтобы​ Имя Отчество)​ Получилось так.​ «#ССЫЛКА». Поэтому сначала​ с помощью формул.​ этом читайте в​вставить дополнительные слова​ запятой написать​Автор: Максим Тютюшев​ и жмем на​

​ Sub​​ способа в Эксель​ требует множества дополнительных​

​ ячейке, данные которой​ наборе инструментов нет​ который сразу все​: Канечно, там денюжку​ переставить местами определенные​есть​Или можно написать​ копируем значение столбца​ Вот несколько вариантов.​ статье «Как удалить​перед имеющимися, то​» «​Список в Excel​ кнопку​If ra.Areas(1).Count ra.Areas(2).Count​ без копирования в​ действий. Тем не​ нужно переместить на​ такой функции, которая​ в файл в​

Объединить слова из разных ячеек в текст Excel.

Поменять размер букв в тексте Excel.

Excel Поменять местами слова в ячейке

​ макрос именно под​

​: Для Вашей «хотелки»​

​ As Long​: =ПОДСТАВИТЬ (ПСТР (A1;ПОИСК​. Например, у нас​

​ заглавные. В ячейке​

​ Нам нужно написать​

​Ещё один способ​

​Объединить можно не​Первый вариант.​ Excel с поддержкой​ нужных нам операций.​ активировали, так как​ стороны. Зажимаем клавишу​.​

​Выделяем ячейку, которую следует​ ваше задание.Podskazhite pozalujsto​ (последнее слово первым):​

​arr = Split(s,​ (» «;A1)+1;100);» «;»​ есть список, где​

​Нажимаем «ОК», копируем формулу​ В4 пишем формулу.​

​ в первой ячейке​​ добавить текст, числа,​ только слова, но​У нас такой​ макросов (xlsm).​

Как поменять местами буквы в ячейке используя формулы?

​Выделяем две ячейки или​​ по умолчанию они​
​Shift​Выделяем вторую ячейку, в​ переместить. Жмем на​ kak pomenatj jacejki​=ПСТР(A1&», «&A1;ПОИСК(«/»;ПОДСТАВИТЬ(A1;»,»;»/»;2))+2;ДЛСТР(A1))​
​ «,»)​ «&ЛЕВБ (A1;ПОИСК («​
​ фамилия, имя и​
​ вниз по столбцу,​Находим функцию «ПРОПНАЧ()»​
​ Мария, во второй​ ​ символ к тексту​

​ и цифры. Можно​​ список.​

​Урок:​​ два диапазона равных​ отключены.​

Переставить слова местами в ячейке

​на клавиатуре и​​ которую нужно переместить​ кнопку​ E7 i jacejku​Jonson​Repl = «»​ «;A1)))​ отчество (или дата​ удаляем ненужный столбец,​ на закладке Еxcel​ — Иванова. Как​

​ в ячейке, смотрите​составить предложение из данных​Нам нужно написать в​
​Как создать макрос в​ размеров, которые хотим​

​Далее переходим во вкладку​

​ перетаскиваем на то​​ данные. Жмем на​«Копировать»​ E14​

​: Посмотрите может так?​For i =​
​Kot_Lancelot​ рождения, др.) записаны​
​ скопировав сначала значение.​ «Формулы» в разделе​
​ это сделать быстро​
​ в статье «Добавить​ ячеек в Excel​ ячейке D1 ФИО​
​ Excel​ поменять местами. Для​ «Разработчик». Выполняем щелчок​
​ место куда хотим.​
​ кнопку​. Она размещена на​
​A takzhe mne​

​volanddd​​ UBound(arr) To LBound(arr)​: Всем привет!​

​ в одном столбце.​​ Получилось так.​ «Текстовые».​ в большой таблице,​
​ текст в ячейки​.​ одним предложением. Пишем​Как видим, в Excel​ этого кликаем по​

​ по кнопке «Visual​​Как правило, это должна​«Вставить»​

​ ленте во вкладке​​ neobhodimo pomenat mestami​: Как поменять местами​
​ Step -1​Подскажите, пожалуйста, как​Нам нужно, переписать​Все буквы текста Excel​В диалоговом окне «Аргументы​ смотрите в статье​

​ с текстом Excel».​Можно установить формулы​
​ в этой ячейке​

​ существует несколько способов​ первому элементу (диапазону)​ Basic», которая размещена​

​ быть смежная ячейка,​​на ленте.​

​«Главная»​​ 0.80 i 1.14​ ячейки и столбцы(см.пример)?​
​Repl = Repl​

​ можно поменять местами​​ этот список, записав​

Как поменять местами ячейки и столбцы

​ сделать заглавными.​​ функции» пишем адрес​ «Как поменять местами​С помощью формул​

​ в нужных ячейках​​ (D1) формулу. Нажимаем​

​ перемещения ячеек относительно​​ левой кнопкой мыши.​ на ленте в​ так как при​Итак, нужные данные мы​

​в группе настроек​​ (no 0.80 zapisani​ Спасибо​
​ & Trim(arr(i)) &​
​ буквы в ячейке,​ фамилии в одном​Выбираем для формулы​

​ ячейки, из которой​​ столбцы в Excel».​ можно преобразовать список,​ бланка. Например, у​ на ячейку (активной​ друг друга. Это​ Затем зажимаем кнопку​

​ блоке инструментов «Код».​​ переносе таким способом​

​ поменяли местами. Теперь​​«Буфер обмена»​ v 2 raznih​volanddd​ «, «​ чтобы они отобразились​ столбце, имена -​ функцию «ПРОПИСН()». Установили​ будут взяты слова,​

​Рассмотрим,​​ где имя, отчество​ нас есть такой​ сделаем).​ можно сделать и​Ctrl​Выполняется запуск редактора. В​ происходит сдвиг всего​ следует удалить содержимое​.​ jachejkah)​
​: Например, так​Next i​ наоборот (зеркально)?​ во втором, а​ формулу в ячейку​ чтобы написать их​

Функция перемещения слова в строке

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

Function Move_SubString(Ячейка As String, Номер_подстроки As Long, Новое_место As Long, Optional Разделитель As String = » «) ‘Ячейка — текст или ссылка на ячейку с текстом ‘Номер_подстроки — это номер слова в строке, которое перемещаем. ‘Новое_место — куда в строке перемещаем. ‘Разделитель — необязательный аргумент. По умолчанию — пробел. Dim sStr, li As Long, lcnt As Long Dim sNewWord As String, sTmpStr As String sStr = Split(Application.Trim(Ячейка), Разделитель) If Номер_подстроки >= UBound(sStr) + 1 Then Номер_подстроки = UBound(sStr) + 1 For li = LBound(sStr) To UBound(sStr) If li = Номер_подстроки — 1 Then sTmpStr = sStr(li): sStr(li) = «» Next li For li = LBound(sStr) To UBound(sStr) If sStr(li) <> «» Then lcnt = lcnt + 1 If lcnt = Новое_место Then sNewWord = sNewWord & Разделитель & sTmpStr & Разделитель & sStr(li) Else sNewWord = sNewWord & Разделитель & sStr(li) End If End If Next li If Новое_место >= UBound(sStr) + 1 Then sNewWord = sNewWord & Разделитель & sTmpStr Move_SubString = Application.Trim(sNewWord) End Function

Чтобы правильно использовать приведенный код, необходимо сначала ознакомиться со статьей Что такое функция пользователя(UDF)?. Вкратце: скопировать текст кода выше, перейти в редактор VBA( Alt + F11 ) -создать стандартный модуль(Insert —Module) и в него вставить скопированный текст. После чего функцию можно будет вызвать из Диспетчера функций( Ctrl + F3 ), отыскав её в категории Определенные пользователем (User Defined Functions) .
Синтаксис:
=Move_SubString( A2 ;2;5)

Ячейка ( A2 ) — текст или ссылка на ячейку с текстом, в котором необходимо переместить слово.

Номер_подстроки (2) — это номер слова в строке, которое перемещаем. Если для Номер_подстроки указать число заведомо большее, чем кол-во слов в строке(скажем 1000), то будет перемещено последнее слово на позицию, указанную аргументом Новое_место.

Новое_место (5) — номер позиции слова в строке, куда перемещаем.

Разделитель — необязательный аргумент. По умолчанию — пробел. Этим символом будет разделено перемещаемое слово.

С помощью функции можно либо переместить слово с одной позиции в предложении на другую или поменять слова в предложении местами. В файле-примере вы найдете примеры применения обоих вариантов.

Tips_Macro_MoveSubstring.xls (52,0 KiB, 2 925 скачиваний)

Статья помогла? Поделись ссылкой с друзьями!

Excel поменять строки местами

Excel поменять строки местами

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

Сегодня речь пойдёт о замене значений двух строк/столбцов, то есть нам нужно просто поменять местами столбцы или строки в таблице Excel. Что мы для этого обычно делаем:

1. Выделяем строку/столбец, которые будем переносить;
2. Даём команду «Вырезать»;
3. Выделяем место где должны быть строки/столбцы;
4. Даём команду «Вставить».

Также можно просто перетаскивать за рамку выделения нужные нам диапазоны.

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

Для замены необходимо соблюдение двух условий:

1) диапазон ячеек ОБЯЗАТЕЛЬНО должен быть одинаковой величины;

2) ОБЯЗАТЕЛЬНО должны быть выделены два диапазона ячеек.

Dim ra As Range: Set ra = Selection

msg1 = «Нужно выделить ДВА диапазона ячеек одинакового размера!»

msg2 = «Нужно выделить диапазоны ОДИНАКОВОГО размера!»

If ra.Areas.Count <> 2 Then MsgBox msg1, vbCritical, «Ошибка»: Exit Sub

If ra.Areas(1).Count <> ra.Areas(2).Count Then MsgBox msg2, vbCritical, «Ошибка»: Exit Sub

• ra — это область выделения;
• msg1 и msg2 — сообщение о соответствующих ошибках;
• If ra.Areas.Count <> 2 — условие выделения двух диапазонов;
• If ra.Areas(1).Count <> ra — условие выделения одинаковых по длине диапазонов ячеек;
• Application.ScreenUpdating — экране не обновится если не выполнены два условия;
• остальное показывает, что диапазоны будут заменены друг на друга.

Добавим новый модуль к нашей книге. Вкладка «Разработчик», кнопка «Visual basic», далее «Insert» и «Module».

Теперь проверим правильность работы макроса. Выделим с помощью клавиши Ctrl два одинаковых диапазона ячеек (это может быть строка, столбец, просто ячейка). Воспользуемся сочетанием клавиш Alt+F8, чтобы вызвать диалоговое окно «Макросы» или перейдём на вкладку «Разработчик» и нажмём одноимённую кнопку. Появится список макросов, нажимаем кнопку «Выполнить» и наблюдаем результат.

Видим, макрос работает!

Если остались вопросы — посмотрите наше новое видео!

Вас может заинтересовать на урок — Удаление пустых ячеек.

Поменять местами содержимое ячеек в Excel?

есть ли простой способ поменять содержимое двух ячеек в Microsoft Excel?

под easy я имею в виду либо сочетание клавиш, либо пункт меню, без копирования во временные ячейки или написания сценариев VBA или что-то в этом роде. Другими словами, Я ищу способ просто выбрать две ячейки и щелкнуть какой-либо пункт меню или нажать какую-либо комбинацию клавиш, которая будет менять их содержимое. Конечно, должен быть способ сделать это?

иногда нужно поменять местами две соседние ячейки. Мы можем вручную сделать это легко. Посмотрите на следующий скриншот, я хочу поменять местами ячейки A4 и B4, пожалуйста сделайте так:

выберите ячейку, которую вы хотите поменять. В данном примере выберите ячейку A4.

пресс Shift ключ, и положил курсор на правую границу.

затем перетащите курсор на правую границу ячейки B4.

когда появится «工», отпустите кнопку мыши.

и содержимое двух ячеек поменялось местами.

с помощью этого метода, мы также можем поменять два смежные строки или столбцы.

под easy я имею в виду либо сочетание клавиш, либо пункт меню, без копирования во временные ячейки или написание VBA скриптов или что-то в этом роде. Я ищу способ просто выбрать две ячейки и щелкнуть какой-либо пункт меню или нажать комбинацию клавиш, которая будет менять их содержимое.

зачем вводить это ограничение? Создание макроса делает это тривиальным. Насколько я знаю, по-другому и быть не может. Макрос можно назначить кнопке или клавиша.

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

1. выберите правую или нижнюю ячейку
2. пресс Ctrl + x
3. выберите соседнюю ячейку (т. е. непосредственно над или слева)
4. пресс Ctrl + + (том + обычно выше = ключ, так что это переводится как Ctrl + Shift + = )

Примечание Вы можете использовать ту же процедуру, чтобы поменять местами все соседние строки или столбцы.

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

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

выберите первый набор ячеек для замены и нажмите ctrl + x :

выберите ячейки рядом с теми, которые вы хотите поменять местами и нажмите ctrl + + .

вы можете вставить до 25 элементов в буфер обмена, так что они легко поменять местами с помощью ctr + tab или cmd + tab mac

Я читал этот пост, но на самом деле нуждался в макросе для обмена полными диапазонами. Кроме того, мне нужно было поменять цвета. Немного модифицировал первоначально размещенный макрос, это может быть полезно для кого-то.

Как поменять местами ячейки в 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. В редакторе, нажав на кнопку “View Code”, вставляем в появившемся окне код ниже:
   Sub ПеремещениеЯчеек()
   Dim ra As Range: Set ra = Selection
   msg1 = «Произведите выделение ДВУХ диапазонов идентичного размера»
   msg2 = «Произведите выделение двух диапазонов ИДЕНТИЧНОГО размера»
   If ra.Areas.Count <> 2 Then MsgBox msg1, vbCritical, «Проблема»: Exit Sub
   If ra.Areas(1).Count <> ra.Areas(2).Count Then MsgBox msg2, vbCritical, «Проблема»: Exit Sub
   Application.ScreenUpdating = False
   arr2 = ra.Areas(2).Value
   ra.Areas(2).Value = ra.Areas(1).Value
   ra.Areas(1).Value = arr2
   End Sub
4. Закрываем окно редактора, щелкнув привычную кнопку в виде крестика в верхнем правом углу.
5. Зажав клавишу Ctrl на клавиатуре выделяем две ячейки или две области с одинаковым количество элементов, которые планируем поменять местами. Затем нажимаем кнопку “Макросы” (вкладка “Разработчик”, группа “Код”).
6. Появится окно, в котором мы видим ранее созданный макрос. Выбираем его и щелкаем “Выполнить”.
7. В результате работы макрос поменяет местами содержимое выделенных ячеек.

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

Заключение

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