Vba：如何选择包含数据的所有单元格

您可以在 VBA 中使用以下方法来选择工作表中包含数据的所有单元格：

方法一：选择有数据的单元格网格

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

这个特定的宏将选择一个单元格网格，其中的数据从当前活动工作表的单元格A1开始。

方法 2：选择包含数据的单个单元格

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

这个特定的宏将选择包含Sheet1数据的所有单个单元格。

以下示例展示了如何在 Excel 中名为Sheet1 的工作表中实际使用每种方法：

示例 1：选择包含数据的单元格网格

假设我们要选择包含Sheet1中数据的单元格网格。

我们可以创建以下宏来执行此操作：

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

当我们运行这个宏时，我们可以看到包含Sheet1中数据的整个单元格网格已被选中：

请注意，此方法使用CurrentRegion属性来选择空单元格包围的单元格范围。

您可以在此处找到CurrentRegion属性的完整文档。

示例 2：选择包含数据的单个单元格

假设我们只想选择Sheet1中包含数据的所有单个单元格。

我们可以创建以下宏来执行此操作：

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

当我们运行这个宏时，我们可以看到Sheet1中包含数据的每个单独单元格都被选中：

其他资源

以下教程说明如何在 VBA 中执行其他常见任务：

VBA：如何设置另一个工作表中单元格的值
VBA：如何选择活动单元格中的范围
VBA：如何根据单元格值删除行