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

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

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

Uwagi: 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. Jest to pełna funkcja bez ograniczeń 30 dni, pobierz i wypróbuj teraz bezpłatną wersję próbną.