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

Как удалить все диапазоны, кроме выбранных в Excel?

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

Удалить все, кроме выбранных диапазонов с кодом VBA

Удалите все, кроме выбранных диапазонов, с помощью Select Range Helper из Kutools for Excel

Удалите все, кроме выбранных диапазонов с помощью Copy Ranges of Kutools for Excel


Удалить все, кроме выбранных диапазонов с кодом VBA

У вас нет прямого способа удалить все невыбранные значения ячеек сразу, но следующий код VBA может вам помочь, пожалуйста, сделайте следующее:

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

документ удалить все, кроме выбранного 1

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

3. В Microsoft Visual Basic для приложений диалоговое окно окна, щелкните Вставить > Модули, затем скопируйте и вставьте приведенный ниже код VBA в Модули окно.

Код VBA: удалить все значения ячеек, кроме выбранных диапазонов

Sub ClearAllExceptSelection()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xCell In ActiveSheet.UsedRange
        If Intersect(xCell, xRg) Is Nothing Then
            xCell.Clear
        End If
    Next
    Application.ScreenUpdating = xUpdate
End Sub

4, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится окно подсказки, напоминающее вам о выборе диапазона ячеек, который вы хотите сохранить; если вы выбрали диапазоны на шаге 1, нажмите OK, если нет, вы можете выбрать нужные ячейки в поле подсказки и ввести запятые для разделения нескольких диапазонов, затем нажать OK кнопку, см. снимок экрана:

документ удалить все, кроме выбранного 2

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

документ удалить все, кроме выбранного 3


Удалите все, кроме выбранных диапазонов, с помощью Select Range Helper из Kutools for Excel

Если вы установили Kutools for Excel, С его Обратный выбор особенность Выбрать помощника по диапазону утилиту, вы можете быстро отменить выбор, а затем сразу удалить перевернутый выбор.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. 

После установки Kutools for Excel, пожалуйста, сделайте следующее :( Скачать бесплатно Kutools for Excel прямо сейчас! )

1. Выберите диапазоны ячеек, которые вы хотите сохранить.

2. Затем нажмите Кутулс > Выберите > Выбрать помощника по диапазону, см. снимок экрана:

3. В Выбрать помощника по диапазону диалоговое окно, отметьте Обратный выбор, см. снимок экрана:

документ удалить все, кроме выбранного 5

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

документ удалить все, кроме выбранного 6

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

документ удалить все, кроме выбранного 7

Скачать бесплатно Kutools for Excel прямо сейчас!


Удалите все, кроме выбранных диапазонов, с помощью Select Range Helper из Kutools for Excel

Еще одна полезность -Копировать диапазоны of Kutools for Excel также может помочь вам завершить эту работу, вам просто нужно скопировать выбранные диапазоны на новый лист, а затем удалить старый лист.

После установки Kutools for Excel, выполните следующие действия :( Скачать бесплатно Kutools for Excel прямо сейчас! )

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

2. Затем нажмите Кутулс > Копировать диапазоны, см. снимок экрана:

3. И в Копировать несколько диапазонов диалоговое окно, отметьте Все вариант под Специальная вставка, проверить Включая высоту строки и Включая ширину столбца если вы хотите сохранить желаемую высоту строки и ширину столбца, см. снимок экрана:

документ удалить все, кроме выбранного 9

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

документ удалить все, кроме выбранного 10

5, Затем нажмите OK, и только выбранные вами диапазоны были вставлены в новый лист, и теперь вы можете удалить исходный лист по мере необходимости.

Скачать бесплатно Kutools for Excel прямо сейчас!


Демо: удалите все, кроме выбранных диапазонов с помощью Kutools for Excel

Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Загрузите и бесплатную пробную версию прямо сейчас!

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

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

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

Описание


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

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations