Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

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

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

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

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


Скопируйте и вставьте несколько диапазонов одновременно:

Обычно Excel не поддерживает множественную копию, но если у вас есть Kutools for Excel, С его Копировать диапазоны вы можете быстро скопировать несколько выбранных диапазонов и вставить их в любое другое место по мере необходимости.

doc удалить все, кроме выбранных 11


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


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

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

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

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

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

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

Sub ClearAllExceptSelection()
'updateby Extendoffice 20151113
    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 чтобы запустить этот код, и появится окно подсказки, чтобы напомнить вам о выборе диапазона ячеек, который вы хотите сохранить, если вы выбрали диапазоны в step1, нажмите OK, если нет, вы можете выбрать ячейки, которые вы хотите в поле приглашения, и ввести запятые для разделения нескольких диапазонов, затем нажмите OK , см. снимок экрана:

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

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

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


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

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

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

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

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

2, Затем нажмите Kutools > Выбрать > Выбрать Range Helper, см. снимок экрана:

doc удалить все, кроме выбранных 4

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

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

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

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

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

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

Скачать Kutools для Excel сейчас!


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

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

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

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

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

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

doc удалить все, кроме выбранных 8

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

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

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

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

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

Скачать Kutools для Excel сейчас!


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

Kutools for Excel: с более чем 200 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни. Скачать и бесплатно пробную версию!


Kutools для Excel - лучший инструмент для повышения производительности в офисе Повысьте производительность на 80%

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

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

  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.