Как быстро поменять местами содержимое двух ячеек в Excel?
Когда мы обрабатываем рабочий лист, нам может потребоваться иногда поменять местами содержимое двух ячеек. Обычно большинство из нас просто знает, как «вырезать, вставить и скопировать» для замены содержимого, но это требует времени. Мы поговорим о том, как быстро поменять местами содержимое ячеек в Excel.
Вручную поменяйте местами содержимое двух соседних ячеек
Поменять местами содержимое двух несмежных ячеек с кодом VBA
Легко поменять местами содержимое двух случайных ячеек всего за несколько кликов
Вручную поменяйте местами содержимое двух соседних ячеек
Иногда необходимо поменять местами две соседние ячейки. Мы легко можем сделать это вручную. Посмотрите на следующий снимок экрана, я хочу поменять местами ячейки A4 и B4, сделайте следующее:
1. Выберите ячейку, которую хотите поменять местами. В этом примере выберите ячейку A4.
2, нажмите Shift и поместите курсор на правую границу.
3. Затем перетащите курсор к правой границе ячейки B4.
4. Когда отображается «工», Отпустите мышь.
5. И два содержимого ячеек поменялись местами. Смотрите скриншот:
С помощью этого метода мы также можем поменять местами две соседние строки или столбцы.
Быстро поменять местами содержимое двух ячеек или диапазонов в Excel:
Kutools for Excel's Диапазоны обмена Утилита поможет вам легко поменять местами сразу две указанные ячейки или диапазоны в Excel, как показано ниже.
Скачайте и попробуйте прямо сейчас! (30-дневный бесплатный пробный период)
Поменять местами содержимое двух несмежных ячеек с кодом 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. Затем нажмите нажмите кнопку, чтобы запустить код, затем отобразится диалоговое окно, в котором вы можете выбрать две ячейки, между которыми вы хотите переключиться. Смотрите скриншоты:
4. Нажмите Ok во всплывающем диалоговом окне две выбранные ячейки меняются местами. Смотрите скриншоты:
Ноты: Этот код VBA не может поменять местами форматирование двух ячеек.
Легко поменять местами содержимое двух случайных ячеек всего за несколько кликов
Доступно Kutools for Excel's Диапазоны обмена Утилита, мы не только можем поменять местами две соседние ячейки, строки или столбцы, но также можем легко переключать две несмежные ячейки, строки или столбцы.
Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.
1. Нажмите Кутулс > Диапазон > Диапазоны обмена, см. снимок экрана:
2. в Диапазоны обмена диалоговое окно, вам необходимо:
- (1) щелкните первый в Диапазон обмена 1 поле, чтобы выбрать ячейки, которые вы хотите поменять местами.
- (2) щелкните второй кнопка из Диапазон обмена 2 поле, чтобы выбрать ячейки, которыми вы будете менять местами.
Советы: Вы можете выбрать два диапазона перед применением функции, после чего вы увидите, что выбранные два диапазона отображаются отдельно в полях Swap Range 1 и Swap Range 2. - (3) Щелкните значок OK .
Затем сразу же меняются местами две выбранные ячейки или диапазоны. Смотрите скриншоты:
Если вы хотите получить бесплатную (30-дневную) пробную версию этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.
Демо: поменяйте местами два случайных содержимого ячеек с помощью Kutools for Excel
Связанная статья:
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!