Jak usunąć wiersze na podstawie wartości komórki w programie Excel?
Aby szybko usunąć lub usunąć wiele wierszy na podstawie wartości komórki w programie Excel, może być konieczne wybranie najpierw tych całych wierszy zawierających określoną wartość komórki, a następnie usunięcie ich. Wygląda na to, że nie ma szybkiego sposobu usuwania wierszy na podstawie wartości komórki, ale przy użyciu kodu VBA. Oto kilka szybkich wskazówek, które mogą Ci pomóc.
- Usuń wiersze na podstawie wartości jednej komórki za pomocą funkcji Znajdź i zamień
- Usuń wiersze na podstawie wartości jednej komórki z kodem VBA
- Usuń wiersze na podstawie jednej lub dwóch wartości komórek
- Usuń wiersze na podstawie wielu wartości komórek
Usuń wiersze na podstawie wartości komórki za pomocą funkcji Znajdź i zamień
W programie Excel możesz zastosować potężną funkcję Znajdź i zamień, aby łatwo usunąć wiersze na podstawie określonej wartości komórki. Wykonaj następujące czynności:
1. Wybierz zakres, w którym usuniesz wiersze na podstawie określonej wartości komórki i otwórz okno dialogowe Znajdowanie i zamienianie, naciskając klawisz Ctrl + F klucze jednocześnie.
2. W oknie dialogowym Znajdź i zamień wpisz określoną wartość komórki (w naszym przypadku wpisujemy Soe) do Find what i kliknij przycisk Find All przycisk. Zobacz pierwszy zrzut ekranu poniżej:
3. Wybierz wszystkie wyniki wyszukiwania u dołu okna dialogowego Znajdź i zamień i zamknij to okno dialogowe. (Note: Możesz wybrać jeden z wyników wyszukiwania, a następnie Ctrl + A klawisze, aby wybrać wszystkie znalezione wyniki. Zobacz drugi zrzut ekranu powyżej.)
Następnie możesz zobaczyć, że wybrane są wszystkie komórki zawierające określoną wartość.
4. Śmiało kliknij prawym przyciskiem myszy wybrane komórki i wybierz plik Delete z menu po kliknięciu prawym przyciskiem myszy. A następnie sprawdź Entire row w wyskakującym oknie dialogowym Usuń i kliknij OK przycisk. Teraz zobaczysz, że wszystkie komórki zawierające określoną wartość zostały usunięte. Zobacz zrzuty ekranu poniżej:
A potem całe wiersze zostały już usunięte na podstawie określonej wartości.
Usuń wiersze na podstawie wartości komórki z kodem VBA
Za pomocą następującego kodu VBA możesz szybko usunąć wiersze z określoną wartością komórki, wykonaj następujące czynności:
1, wciśnij Alt + F11 klucze w tym samym czasie, aby otworzyć Microsoft Visual Basic for applications okno,
2. Kliknij Insert > Modulei wprowadź następujący kod do modułu:
VBA: Usuń całe wiersze na podstawie wartości komórki
Sub DeleteRows()
'Updateby20211217
Dim rng As Range
Dim InputRng As Range
Dim DeleteRng As Range
Dim DeleteStr As String
Dim xTitleId As String
Dim xArr
Dim xF As Integer
Dim xWSh As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, rng.Address, Type:=8)
If InputRng Is Nothing Then Exit Sub
DeleteStr = Application.InputBox("Delete Text", xTitleId, Type:=2)
Set xWSh = InputRng.Worksheet
For Each rng In InputRng
If rng.Value = DeleteStr Then
If DeleteRng Is Nothing Then
Set DeleteRng = rng
Else
Set DeleteRng = Application.Union(DeleteRng, rng)
Set DeleteRng = DeleteRng.EntireRow
End If
End If
Next
xArr = Split(DeleteRng.AddressLocal, ",")
DeleteRng.Select
DeleteRng.Delete
For xF = UBound(xArr) To 0 Step -1
Set DeleteRng = xWSh.Range(xArr(xF))
DeleteRng.Delete
Next
End Sub
3. Następnie kliknij przycisk Run przycisk, aby uruchomić kod.
4. W wyskakującym oknie dialogowym wybierz zakres, w którym chcesz usunąć wiersze na podstawie określonej wartości, i kliknij OK przycisk.
5. W innym oknie dialogowym wpisz określoną wartość, na podstawie której chcesz usunąć wiersze, i kliknij OK przycisk. Zobacz zrzut ekranu:
A potem zobaczysz, że całe wiersze zostały już usunięte na podstawie określonej wartości.
Usuń wiersze na podstawie jednej lub dwóch wartości komórek za pomocą Kutools for Excel
Jeśli masz zainstalowany Kutools for Excel, jego Select Specific Cells Funkcja może pomóc szybko usunąć wiersze z określoną wartością. Wykonaj następujące czynności:
Kutools dla programu Excel - Doładuj program Excel za pomocą ponad 300 niezbędnych narzędzi. Ciesz się w pełni funkcjonalnym 30-dniowym DARMOWYM okresem próbnym bez karty kredytowej! Zdobądź To Teraz
1. Wybierz zakres, z którego chcesz usunąć wiersze na podstawie określonej wartości, i kliknij Kutools > Select > Select Specific Cells. Zobacz zrzut ekranu:
2. W otwartym oknie dialogowym Wybierz określone komórki sprawdź Entire row opcję, wybierz Contains od Specific type rozwijaną listę, wprowadź określoną wartość w prawym polu i kliknij Ok przycisk (patrz powyższy zrzut ekranu).
Po zastosowaniu tej funkcji pojawi się okno dialogowe z informacją, ile komórek zostało znalezionych na podstawie określonych kryteriów. Proszę kliknąć OK przycisk, aby go zamknąć.
3. Teraz wybierane są całe wiersze z określoną wartością. Kliknij prawym przyciskiem myszy wybrane wiersze i kliknij Delete z menu po kliknięciu prawym przyciskiem myszy. Zobacz zrzut ekranu poniżej:
Note: Ten Select Specific Cells funkcja obsługuje usuwanie wierszy o jedną lub dwie określone wartości. Aby usunąć wiersze na podstawie dwóch określonych wartości, podaj inną wartość w Specific type sekcja okna dialogowego Wybierz określone komórki, jak pokazano na poniższym zrzucie ekranu:
Kutools dla programu Excel - Doładuj program Excel za pomocą ponad 300 niezbędnych narzędzi. Ciesz się w pełni funkcjonalnym 30-dniowym DARMOWYM okresem próbnym bez karty kredytowej! Zdobądź To Teraz
Usuń wiersze na podstawie wielu wartości komórek za pomocą Kutools for Excel
W niektórych przypadkach może być konieczne usunięcie wierszy opartych na wartościach wielu komórek z innej kolumny / listy w programie Excel. Tutaj przedstawię Kutools for Excel's Select Same & Different Cells funkcja umożliwiająca szybkie i łatwe rozwiązanie.
Kutools dla programu Excel - Doładuj program Excel za pomocą ponad 300 niezbędnych narzędzi. Ciesz się w pełni funkcjonalnym 30-dniowym DARMOWYM okresem próbnym bez karty kredytowej! Zdobądź To Teraz
1. Kliknij Kutools > Select > Select Same & Different Cells aby otworzyć okno dialogowe Wybieranie tych samych i różnych komórek.
2. W otwarciu Select Same & Different Cells w oknie dialogowym, wykonaj następujące czynności (patrz zrzut ekranu):
(1) W Find values in box, wybierz kolumnę, w której znajdziesz określone wartości;
(2) W According to wybierz kolumnę / listę z wieloma wartościami, na podstawie których usuniesz wiersze;
(3) W Based on Sekcja, sprawdź Each row opcja;
(4) W Find Sekcja, sprawdź Same Values opcja;
(5) Sprawdź Select entire rows opcja u dołu okna dialogowego otwierania.
Note: Jeśli dwie określone kolumny zawierają ten sam nagłówek, sprawdź My data has headers opcja.
3, Kliknij Ok przycisk, aby zastosować to narzędzie. Następnie pojawia się okno dialogowe i pokazuje, ile wierszy zostało wybranych. Po prostu kliknij OK przycisk, aby go zamknąć.
A następnie zostały wybrane wszystkie wiersze zawierające wartości z określonej listy.
4. Kliknij Home > Delete > Delete Sheet Rows aby usunąć wszystkie wybrane wiersze.
Demo: usuń wiersze na podstawie jednej lub wielu wartości komórek 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!