如何在 Excel 中选择所有包含数据的单元格？

当数据位于不连续的单元格中时，您如何选择并复制这些数据？逐一手动选择所有包含数据的不连续单元格会浪费大量时间，尤其是当数据几乎是随机分布的时候。以下巧妙的方法将帮助您快速选择选定区域中的所有包含数据的单元格。

使用“定位条件”命令选择所有不含公式的含数据单元格

如果没有通过公式计算的数据，“定位条件”命令可以帮助您轻松选择选定区域中的所有含数据单元格。

步骤 1：选择要操作的区域，然后按 F5 键打开“ 定位”对话框。

步骤 2：点击“特殊”按钮进入“定位条件”对话框。然后勾选“常量”选项，见截图：

步骤 3：点击“确定”，然后您会看到所有含有内容但不包括公式单元格的单元格都被选中了。

注意：此方法无法选择含有公式的单元格。

通过单击 Kutools for Excel 选择所有包含数据（包括公式）的单元格

如果您想以更少的步骤选择包含值和公式的单元格，这里我可以向您介绍一种简单的方法——Kutools for Excel，利用其“选择非空单元格”功能，只需几次点击即可选择数据单元格。

安装 Kutools for Excel 后，请按照以下步骤操作：（ 立即免费下载 Kutools for Excel ）

步骤 1：选择只想选择数据单元格的区域。

步骤 2：点击 Kutools > 选择 > 选择非空单元格，然后所有含数据的单元格都会被一次性选中，见截图：

立即免费下载 Kutools for Excel

使用 VBA 代码选择所有包含数据（包括公式）的单元格

如果您的单元格中填充了公式，可以使用以下 VBA 代码选择选定区域中所有含数据的单元格。请按照以下步骤操作：

步骤 1：在 Excel 中按住 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

步骤 2：点击 插入 > 模块，并将以下宏粘贴到模块窗口中。

VBA 代码：选择所有包含数据（包括公式）的单元格

Sub SelectNotBlackRange()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim OutRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Value <> "" Then
        If OutRng Is Nothing Then
            Set OutRng = Rng
        Else
            Set OutRng = Union(OutRng, Rng)
        End If
    End If
Next
If Not OutRng Is Nothing Then
    OutRng.Select
End If
End Sub

步骤 3：然后按 F5 键运行此代码，会弹出一个提示框，告诉您选择一个想要选择数据单元格的区域。

步骤 4：选择区域后，点击“确定”，该区域中包括公式在内的所有数据单元格都已被选中。

相关文章：

选择不相邻的单元格或区域

从选定区域中取消选择单元格

反向选择选定区域