如何根据另一列中的单元格值选择区域？

在本文中，我将介绍如何根据另一列中的单元格值选择区域。举个例子，如果C列中的单元格显示为“FALSE”，那么A列和B列中对应的单元格将被选中，如下图所示。Excel没有内置功能可以完成此任务，但在这篇文章中，我将向您展示如何使用VBA代码来处理它。

通过VBA代码根据另一列中的单元格值选择区域

通过VBA代码根据另一列中的单元格值选择区域

通过VBA代码根据另一列中的单元格值选择区域

1. 启用要使用的表格，并按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 插入 > 模块，然后将以下代码粘贴到新 模块窗口中。

VBA：根据单元格值选择区域

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. 按下 F5 键运行VBA代码，随后将根据C列中的值选择相应的区域。

注意：在VBA脚本中，Sheet2 是当前工作表名称，C 表示要基于其进行选择的列，而 A 和 2 在 ("A" & xRg.Row).Resize(, 2) 中表示从A列开始选择两列。您可以根据需要更改这些引用。

提示：如果您想快速选择等于特定值的单元格，可以尝试使用 Kutools for Excel 的 选择指定单元格 工具，如下图所示。立即下载并免费试用！