Przejdź do głównej zawartości

Jak wybrać zakres na podstawie wartości komórki w innej kolumnie w programie Excel?

W tym artykule omówię, jak wybierać zakresy na podstawie wartości komórki w innej kolumnie. Weźmy przykład, jeśli komórki wyświetlają FALSE w kolumnie C, względne komórki w kolumnie A i kolumnie B zostaną wybrane, jak pokazano poniżej. Nie ma wbudowanej funkcji, która mogłaby pomóc ci rozwiązać to zadanie, ale w tym artykule poradzę sobie z tym za pomocą kodu VBA.
wybierz dokument w innej kolumnie 1

Wybierz zakres na podstawie wartości komórki w innej kolumnie według kodu VBA


strzałka niebieski prawy bąbelek Wybierz zakres na podstawie wartości komórki w innej kolumnie według kodu VBA

Wybierz zakres na podstawie wartości komórki w innej kolumnie według kodu VBA

1. Włącz arkusz, którego chcesz użyć i naciśnij Alt + F11 klawisze, aby włączyć Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > Moduł, a następnie wklej poniższy kod do nowego Moduł okno.

VBA: Wybierz zakres na podstawie wartości komórki

Sub SelectByCellValue()
'UpdatebyExtendoffice20161128
    Dim lastrow As Long
    Dim xRg As Range, yRg As Range
    'change Sheet1 to suit
    With ThisWorkbook.Worksheets("Sheet2")
        lastrow = .Cells(.Rows.Count, "C").End(xlUp).Row
        Application.ScreenUpdating = False
        For Each xRg In .Range("C1:C" & lastrow)
            If UCase(xRg.Text) = "FALSE" Then
                If yRg Is Nothing Then
                    Set yRg = .Range("A" & xRg.Row).Resize(, 2)
                Else
                    Set yRg = Union(yRg, .Range("A" & xRg.Row).Resize(, 2))
                End If
            End If
        Next xRg
        Application.ScreenUpdating = True
    End With

    If Not yRg Is Nothing Then yRg.Select
End Sub

wybierz dokument w innej kolumnie 2

3. naciśnij F5 klucz do uruchomienia VBA, a następnie zakresy zostały wybrane na podstawie wartości w kolumnie C.

Note: w skrypcie VBA Sheet2 to nazwa aktywnego arkusza, C wskazuje kolumnę, na podstawie której chcesz wybrać, plik A i 2 in ("A" & xRg.Row). Zmień rozmiar (, 2) wskazuje, że należy wybrać dwie kolumny z kolumny A. W razie potrzeby można zmienić odniesienia.

Wskazówka Jeśli chcesz szybko wybrać komórki, które są równe określonej wartości, spróbuj użyć Kutools dla Excela Wybierz określone komórki narzędzie, jak pokazano na poniższym zrzucie ekranu. Pełna funkcjonalność bez ograniczeń w 30 dni, pobierz i wypróbuj teraz bezpłatną wersję próbną.

doc wybierz określone komórki

Najlepsze narzędzia biurowe

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

karta kte 201905


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 (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations