Note: The other languages of the website are Google-translated. Back to English

Как быстро поменять местами содержимое двух ячеек в Excel?

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

Вручную поменяйте местами содержимое двух соседних ячеек
Поменять местами содержимое двух несмежных ячеек с кодом VBA
Легко поменять местами содержимое двух случайных ячеек всего за несколько кликов


Вручную поменяйте местами содержимое двух соседних ячеек

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

документ-своп-ячейки1

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

2, нажмите Shift и поместите курсор на правую границу.

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

4. Когда отображается «», Отпустите мышь.

5. И два содержимого ячеек поменялись местами. Смотрите скриншот:

документ-своп-ячейки2

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

Быстро поменять местами содержимое двух ячеек или диапазонов в Excel:

Kutools for Excel's Диапазоны обмена Утилита поможет вам легко поменять местами сразу две указанные ячейки или диапазоны в Excel, как показано ниже.
Скачайте и попробуйте прямо сейчас! (30-дневная бесплатная трасса)

поменять местами ячейки1


Поменять местами содержимое двух несмежных ячеек с кодом VBA

Когда две ячейки не находятся рядом, описанный выше метод работать не будет. Мы можем поменять их местами с кодом VBA.

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

2. Нажмите разработчик>Визуальный Бейсик, Новый Microsoft Visual Basic для приложений появится окно, щелкните Вставить>Модули, и введите следующий код в Модули:

Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

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

диапазоны подкачки документов1

4. Нажмите Ok во всплывающем диалоговом окне две выбранные ячейки меняются местами. Смотрите скриншоты:

диапазоны подкачки документов1

Ноты: Этот код VBA не может поменять местами форматирование двух ячеек.


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

Работы С Нами Kutools for Excel's Диапазоны обмена Утилита, мы не только можем поменять местами две соседние ячейки, строки или столбцы, но также можем легко переключать две несмежные ячейки, строки или столбцы.

Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.

1. Нажмите Кутулс > Диапазон > Диапазоны обмена, см. снимок экрана:

2. в Диапазоны обмена диалоговое окно, вам необходимо:

  • (1) щелкните первый документ-заменить-диапазон-имена-7 в Диапазон обмена 1 поле, чтобы выбрать ячейки, которые вы хотите поменять местами.
  • (2) щелкните второй документ-заменить-диапазон-имена-7 кнопка из Диапазон обмена 2 поле, чтобы выбрать ячейки, которыми вы будете менять местами.
    Советы: Вы можете выбрать два диапазона перед применением функции, после чего вы увидите, что выбранные два диапазона отображаются отдельно в полях Swap Range 1 и Swap Range 2.
  • (3) Щелкните значок OK кнопку.

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

диапазоны подкачки документов1

  Если вы хотите получить бесплатную пробную версию (30-день) этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.


Демо: поменяйте местами два случайных содержимого ячеек с помощью Kutools for Excel


Связанная статья:


Лучшие инструменты для работы в офисе

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (11)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Вы могли бы просто вырезать (несмежную) ячейку A в незанятую ячейку, вставить требуемую ячейку B в это место, а затем поместить A в ячейку B, которая ранее была занята, не так ли?
Этот комментарий был сведен к минимуму модератором на сайте
Да, вы могли бы, но зачем идти таким окольным путем, когда вы можете сделать это гораздо быстрее. Спасибо ExtendOffice за вашу хорошую работу.
Этот комментарий был сведен к минимуму модератором на сайте
Это не так просто, как вы предложили, когда в ячейках есть формула. И это также помогает вставлять несколько ячеек в любом нужном месте.
Этот комментарий был сведен к минимуму модератором на сайте
Спасибо за информацию!!!
Этот комментарий был сведен к минимуму модератором на сайте
Спасибо !! у меня отлично работает..
Этот комментарий был сведен к минимуму модератором на сайте
Спасибо !! у меня отлично работает..
Этот комментарий был сведен к минимуму модератором на сайте
Первый вариант у меня хорошо работает, спасибо за ваши усилия... :-)
Этот комментарий был сведен к минимуму модератором на сайте
Классный трюк, который сэкономил мне много времени. Благодарю вас!
Этот комментарий был сведен к минимуму модератором на сайте
Koje njesra... na kraju cu ipak raditi copy paste... Umesto da su ubacili swap opciju na padajucem menju....
Этот комментарий был сведен к минимуму модератором на сайте
это не работает для меня. я не знаю почему
Этот комментарий был сведен к минимуму модератором на сайте
Legyenszíves Megírni melyik az a müszak gomb.
Кёсонем Юдв Адам
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL