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