Как удалить одни и те же строки или диапазоны на нескольких листах в Excel?
В этой статье рекомендуются два метода одновременного удаления одинаковых строк или диапазонов на нескольких листах в Excel. Пожалуйста, сделайте следующее.
Удаление одинаковых строк или диапазонов на нескольких листах с группировкой всех листов
Удалить одинаковые строки или диапазоны на нескольких листах с кодами VBA
Удаление одинаковых строк или диапазонов на нескольких листах с группировкой всех листов
Все листы легко сгруппировать, а затем одновременно удалить те же строки или диапазоны из этих листов.
1. Щелкните правой кнопкой мыши вкладку любого листа в текущей книге, затем щелкните Выбрать все листы из контекстного меню.
2. Теперь все листы выбраны. Если вы удаляете определенные строки или диапазоны на листе, те же строки или диапазоны на других листах удаляются вместе.
3. После удаления строк или диапазонов на всех листах щелкните правой кнопкой мыши вкладку листа и затем нажмите Разгруппировать листы из контекстного меню, чтобы разгруппировать все листы.
Удалить одинаковые строки или диапазоны на нескольких листах с кодами VBA
Помимо вышеуказанного метода, вы можете запустить следующие коды VBA для удаления одних и тех же строк или диапазонов на нескольких листах.
Удалить одинаковые строки на нескольких листах
1. Нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули. Затем скопируйте и вставьте следующий код VBA в окно кода.
Код VBA: удаление одинаковых строк на нескольких листах в Excel
Sub bleh()
Dim xWs As Worksheet
Set xWs = ActiveSheet
ThisWorkbook.Worksheets.Select
Rows("4:5").Select
Selection.Delete
xWs.Select
End Sub
Внимание: В коде VBA 4: 5 означает, что строки 4 и 5 будут удалены на нескольких листах в текущей книге. Вы можете изменить их на нужную строку.
3. Нажмите F5 ключ для запуска кода, то указанные строки немедленно удаляются со всех листов в текущей книге.
Удалить одинаковые диапазоны на нескольких листах
Чтобы удалить одни и те же диапазоны на нескольких листах, вы можете попробовать приведенный ниже код VBA.
Код VBA: удалить один и тот же диапазон на нескольких листах
Private Sub CommandButton2_Click()
Dim xRg As Range
Dim xTxt As String
Dim xWs As Worksheet
On Error Resume Next
Set xWs = ActiveSheet
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the range you want to delete across multiple sheets:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
xRg.ClearContents
ThisWorkbook.Worksheets.Select
ActiveWindow.SelectedSheets.FillAcrossSheets xRg, xlFillWithContents
xWs.Select
End Sub
После копирования и вставки кода VBA в модуль нажмите F5 ключ для запуска кода, и во всплывающем окне Kutools for Excel в диалоговом окне выберите диапазон, который вы хотите удалить на нескольких листах, а затем щелкните значок OK .
Теперь значения ячеек в этом конкретном диапазоне немедленно удаляются со всех листов в текущей книге.
Статьи по теме:
- Как удалить строки с отсутствующими / пустыми значениями в определенных столбцах в Excel?
- Как удалить строки, если ячейка больше / меньше определенного значения в Excel?
- Как удалить все строки, кроме первой строки заголовка в Excel?
- Как удалить все строки ниже определенной строки или активной ячейки в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!