Jak usunąć te same wiersze lub zakresy w wielu arkuszach w programie Excel?
W tym artykule zalecono dwie metody usuwania tych samych wierszy lub zakresów w wielu arkuszach jednocześnie w programie Excel. Wykonaj następujące czynności.
Usuń te same wiersze lub zakresy na wielu arkuszach, grupując wszystkie arkusze
Usuń te same wiersze lub zakresy na wielu arkuszach z kodami VBA
Usuń te same wiersze lub zakresy na wielu arkuszach, grupując wszystkie arkusze
Łatwo jest pogrupować wszystkie arkusze, a następnie usunąć te same wiersze lub zakresy z tych arkuszy w tym samym czasie.
1. Kliknij prawym przyciskiem myszy dowolną kartę arkusza w bieżącym skoroszycie, a następnie kliknij Wybierz wszystkie arkusze z menu po kliknięciu prawym przyciskiem myszy.
2. Teraz wszystkie arkusze są zaznaczone, jeśli usuniesz określone wiersze lub zakresy w arkuszu, te same wiersze lub zakresy w innych arkuszach zostaną usunięte razem.
3. Po usunięciu wierszy lub zakresów ze wszystkich arkuszy, kliknij prawym przyciskiem myszy kartę arkusza, a następnie kliknij Rozgrupuj arkusze z menu po kliknięciu prawym przyciskiem myszy, aby rozgrupować wszystkie arkusze.
Usuń te same wiersze lub zakresy na wielu arkuszach z kodami VBA
Oprócz powyższej metody możesz uruchomić następujące kody VBA, aby usunąć te same wiersze lub zakresy w wielu arkuszach.
Usuń te same wiersze z wielu arkuszy
1. naciśnij inny + F11 klawisze jednocześnie, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. Następnie skopiuj i wklej następujący kod VBA do okna Code.
Kod VBA: Usuń te same wiersze na wielu arkuszach w programie Excel
Sub bleh()
Dim xWs As Worksheet
Set xWs = ActiveSheet
ThisWorkbook.Worksheets.Select
Rows("4:5").Select
Selection.Delete
xWs.Select
End SubNote: W kodzie VBA 4: 5 oznacza, że wiersz 4 i 5 zostaną usunięte z wielu arkuszy w bieżącym skoroszycie. Możesz je zmienić na wymagany wiersz.
3. naciśnij F5 klucz do uruchomienia kodu, określone wiersze są natychmiast usuwane ze wszystkich arkuszy w bieżącym skoroszycie.
Usuń te same zakresy z wielu arkuszy
Aby usunąć te same zakresy w wielu arkuszach, możesz wypróbować poniższy kod VBA.
Kod VBA: Usuń ten sam zakres na wielu arkuszach
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 SubPo skopiowaniu i wklejeniu kodu VBA do modułu naciśnij F5 klucz do uruchomienia kodu oraz w wyskakującym okienku Kutools dla programu Excel wybierz zakres, który chcesz usunąć na wielu arkuszach, a następnie kliknij OK przycisk.
Teraz wartości komórek w tym określonym zakresie są natychmiast usuwane ze wszystkich arkuszy w bieżącym skoroszycie.
Powiązane artykuły:
- Jak usunąć wiersze z brakującymi / pustymi wartościami w niektórych kolumnach w programie Excel?
- Jak usunąć wiersze, jeśli komórka jest większa / mniejsza niż określona wartość w programie Excel?
- Jak usunąć wszystkie wiersze z wyjątkiem pierwszego wiersza nagłówka w programie Excel?
- Jak usunąć wszystkie wiersze poniżej określonego wiersza lub aktywnej komórki w programie Excel?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
