Przejdź do głównej zawartości

Jak ukryć wiersze na podstawie wartości komórki w programie Excel?

Przypuśćmy, że masz zakres danych i chcesz ukryć wiersze na podstawie wartości kolumny, na przykład, jeśli wartość komórki w kolumnie jest mniejsza niż 3000, a następnie ukryj wiersz komórki, jak pokazano na zrzucie ekranu.


W programie Excel możesz użyć funkcji Filtruj, aby filtrować i ukrywać wiersze na podstawie wartości komórki.

1. Wybierz dane, które chcesz odfiltrować, i kliknij Dane > FILTRY. Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 2

2. Następnie kliknij strzałkę w dół, aby wyświetlić rozwijaną listę filtrów i kliknij Filtry liczbowe (lub filtry tekstowe) > Lepszy niż (możesz wybrać inne potrzebne kryterium z podmenu). Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 3

3. W wyświetlonym oknie dialogowym wpisz kryterium w polu tekstowym obok jest większe niż. Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 4

4. kliknij OK. Teraz wyświetlane są tylko dane większe niż 3000, a wiersze, których dane są mniejsze niż 3000, są ukryte.

doc ukrywa wiersze na podstawie wartości 5


Ponadto, jeśli interesuje Cię kod VBA, tutaj mogę wprowadzić kod VBA, aby ukryć wiersze na podstawie wartości komórki.

1. naciśnij Alt + F11 klucze do włączenia Microsoft Visual Basic for Applications okno.

2. Następnie kliknij wstawka > Moduł aby otworzyć nowy Moduł i wklej do niego poniższy kod VBA.

VBA: Ukryj wiersze na podstawie wartości komórki.

Sub HideRow()
'Updateby20150618
Dim Rng As Range
Dim WorkRng As Range
Dim xNumber As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xNumber = Application.InputBox("Number", xTitleId, "", Type:=1)
For Each Rng In WorkRng
    Rng.EntireRow.Hidden = Rng.Value < xNumber
Next
End Sub

3. Następnie naciśnij F5 , aby uruchomić VBA, a następnie wybierz zakres danych, w którym chcesz ukryć wiersze w wyświetlanym oknie dialogowym (z wyłączeniem nagłówków). Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 6

4. kliknij OKi wpisz numer kryterium w drugim oknie dialogowym. Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 7

5. kliknij OK. Teraz wiersze, których dane są mniejsze niż 3000, są ukryte.

Wskazówka: Jeśli chcesz ukryć wiersze większe niż 3000, po prostu zmień Rng.EntireRow.Hidden = Rng.Value <xNumber do Rng.EntireRow.Hidden = Rng.Value> xNumberlub jeśli chcesz ukryć wiersze, których dane są równe 3000, zmień na Rng.CałyRow.Ukryty = Rng.Wartość = xNumer.


Szybko zaznacz komórki na podstawie kryteriów w programie Excel

Z Kutools dla Excela Wybierz określone komórki, możesz raz wybrać komórki na podstawie jednego lub dwóch kryteriów. 
doc wybierz określone komórki
 
Kutools dla programu Excel: z ponad 300 poręcznymi dodatkami do Excela, możesz wypróbować bez ograniczeń w 30 dniach.

Jeśli nie lubisz włączać funkcji Filtruj, ani do VBA, tutaj przedstawiam ci przydatne narzędzie - Wybierz określone komórki of Kutools dla programu Excel aby szybko zaznaczyć całe wiersze na podstawie wartości komórki, możesz je ukryć.

Kutools dla programu Excel, ponad 300 przydatne funkcje, ułatwiają pracę. 

Po bezpłatna instalacja Kutools dla programu Excel, wykonaj poniższe czynności:

Wskazówka. Jeśli chcesz skorzystać z bezpłatnej wersji próbnej funkcji Wyodrębnij tekst, przejdź do bezpłatnego wypróbuj Kutools for Excel najpierw, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.

1. Wybierz zakres danych i kliknij Kutools > Wybierz > Wybierz określone komórki. Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 14

2. w Wybierz określone komórki okno dialogowe, sprawdź Cały rząd dla Typ wyboru , a następnie wybierz kryterium, którego potrzebujesz Określony typ listy, a następnie wpisz liczbę lub tekst w polu tekstowym. Zobacz zrzut ekranu:

doc ukrywa wiersze na podstawie wartości 9

3. kliknij Ok > OK aby zamknąć okna dialogowe. Teraz zaznaczone są wiersze, których dane są mniejsze niż 3000, i wystarczy kliknąć prawym przyciskiem myszy nagłówek wiersza, aby wyświetlić menu kontekstowe, i kliknąć Ukryj. Zobacz zrzut ekranu:
doc ukrywa wiersze na podstawie wartości 10

Teraz wiersze, których dane są mniejsze niż 3000, są ukryte.

doc ukrywa wiersze na podstawie wartości 11

Wskazówka:

1. Jeśli chcesz ukryć wiersze zawierające określoną wartość, możesz wybrać zawiera i wpisz określoną wartość w polu tekstowym.

doc ukrywa wiersze na podstawie wartości 12

2. Jeśli chcesz ukryć wiersze zawierające wartość większą niż, ale mniejszą niż wartości, możesz wybrać Lepszy niż i Mniej niż, następnie wpisz wartości w dwóch polach i zaznacz oraz.

doc ukrywa wiersze na podstawie wartości 13

Z Kutools dla Excela Wybierz określone komórki narzędzie, możesz zidentyfikować lokalizację określonych komórek, wybrać całe wiersze lub kolumny na podstawie wartości komórki i tak dalej. Kliknij tutaj, aby dowiedzieć się więcej o tym narzędziu.

Kutools dla programu Excel: ponad 300 funkcji, które musisz mieć w programie Excel, 30-dniowy bezpłatny okres próbny stąd.

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

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...

Opis


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!
Comments (17)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Yes, "Entire Row" is selected.
This comment was minimized by the moderator on the site
All rows remain selected without using Kutools. As soon as I use Kutools and select header row, all other rows but the header row de-select.
This comment was minimized by the moderator on the site
Are you sure check the Entire row option in the dialog? If you check cell option, the selected cells will be unselected when you right click at one row.
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-select-specific-cell-1.png
This comment was minimized by the moderator on the site
Hi - I'm using a newer Lenovo PC with Windows 10 Professional and Microsoft 365 Apps for business. Excel Version 2210 (Build 15726.20202 Click-to-Run).
This comment was minimized by the moderator on the site
I have tried the operation in the same version with you, there is no any problem. Could you try to manually select several rows (without using Kutools for Excel), then right click at one row header, see all rows are remained selecting?
This comment was minimized by the moderator on the site
I have done exactly what you've demonstrated. However, when I right-click on the row header, all other rows become de-selected and only that one row remains selected to be hidden or deleted. No matter what I do, the other rows do not stay selected when right-clicking on the header. I'm at a loss to know what to do now.
This comment was minimized by the moderator on the site
I am so sorry for that. Could you tell me what Excel version and system you use?
This comment was minimized by the moderator on the site
Hello,

That is exactly what I've been doing, however, it only hides the row on which I have clicked the row header. All other selected rows remain unhidden, and are deselected at the same time. I will try it again following your gif exactly. Thanks for your reply.
This comment was minimized by the moderator on the site
I'm using Kutools to select entire rows based on a value, and it does select all the rows with that value. However, when I right-click on the row header and click on "Hide" in the menu, only that row is hidden and the rest that were selected become de-selected. It appears I still have to hide each row one at a time. What am I doing wrong?
This comment was minimized by the moderator on the site
Hi, Rochelley, I think there may be some wrong when you right-click at the row header. After the rows which match your condition are selecetd after applying the feature, right click at one row header of them, note that other rows are kept selected, then choose hide from the context menu. Please see the gif:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-hide-selected-row.gif
This comment was minimized by the moderator on the site
Hello,

I have a drop down with multiple reponses. I am trying to hide certain rows dependant on the response, can someone please assist?

Dropdown options are "CDI", "AR", "Legal", "Multiple" and "Other".

If response is CDI then hide rows 42-100

If response is AR then hide rows 19-41 and rows 66-100

If response is Legal then hide rows 19-66 and rows 88-100

If response is multiple then don't hide anything

If response is Other then hide rows 19-88



Can someone please asssist?
This comment was minimized by the moderator on the site
Hi I need some help with my work sheet. I have to build a dynamic questionnaire and I need to have a code that allow me to hide/ Unhide automatically some rows base on a cell information. Example:

if c6 is "internally" then show me row 7 but hide 8 to 107
if c6 is "Externally" then hide all the rows from 7 to 107


if c7 is "yes" then show me row 8 but hide 9 to 107
if c7 is "No" then show me row 8 but hide 9 to 107
if c8 is "Critical" then show me row 9 but hide 10 to 107

if c8 is "Important" show me row 9 but hide 10 to 107
if c8 is "Ordinary" show me row 9 but hide 10 to 107
if c8 is "Other" then show me row 9 but hide 10 to 107

if c9 is "Critical" then show me row 10 but hide 11 to 107
if c9 is "Important" then show me row 10 but hide 11 to 107
if c9 is "Ordinary" then show me row 10 but hide 11 to 107
if c9 is "Other" then show me row 10 but hide 11 to 107

etc.

can somebody help me?
This comment was minimized by the moderator on the site
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Row = 1 Then

If Target.Value = "YES" Then
Worksheets(2).Activate
Worksheets(2).Application.Columns("A:Z").Select
Worksheets(2).Application.Selection.EntireColumn.Hidden = True
Worksheets(2).Application.Columns("AA:AZ").Select
Worksheets(2).Application.Selection.EntireColumn.Hidden = False
ElseIf Target.Value = "NO" Then
Worksheets(2).Activate
Worksheets(2).Application.Columns("AA:AZ").Select
Worksheets(2).Application.Selection.EntireColumn.Hidden = True
Worksheets(2).Application.Columns("A:Z").Select
Worksheets(2).Application.Selection.EntireColumn.Hidden = False
Else
Worksheets(2).Activate
Worksheets(2).Application.Columns("A:Z").Select
Worksheets(2).Application.Selection.EntireColumn.Hidden = False
Worksheets(2).Application.Columns("AA:AZ").Select
Worksheets(2).Application.Selection.EntireColumn.Hidden = False
End If

End If
End Sub
This comment was minimized by the moderator on the site
I got same error
This comment was minimized by the moderator on the site
Sorry I do not know either.
This comment was minimized by the moderator on the site
I don't know either Sunny
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations