如何使用新示例选择Visual Basic for Applications (区域)

如何手动选择单元格的示例

若要手动选择列内的所有数据，请选择第一个单元格，然后按 Ctrl+Shift+向下键。

同样，若要手动选择一行以及附加到该行的所有列，请按 Ctrl+Shift+向下键+向右键。 但是，所有数据都必须是连续 (，也就是说，不能将空白行或空列) 。 此外，可以通过执行以下操作来选择连续数据 (数据的当前区域，) 空白行或列：

1. 在"编辑"菜单上，单击"转到"。

2. 在"转到"对话框中，单击"特殊"。

3. 在"转到特殊区域"对话框中，单击" 当前区域"，然后单击"确定
   "。

也可使用简单的代码选择此Visual Basic for Applications范围。

注意 如果您尝试使用宏录制器录制此过程，您不会收到相同的结果。

如何使用代码选择Visual Basic单元格的示例

Microsoft 仅提供演示编程示例，没有明示或默示的担保。 这包括但不限于对特定用途的可商家性或适用性的默示保证。 本文假定你熟悉正在演示的编程语言以及用于创建和调试过程的工具。 Microsoft 支持工程师可以帮助解释特定过程的功能，但他们不会修改这些示例以提供附加功能或构造过程以满足您的特定要求。 下面的Visual Basic示例将展示如何选择不同的范围。

如果您知道此示例中的开始单元格 (，则开始单元格是单元格 C1) ，并且您希望向下选择包含数据但不知道该地址的同一列) 中的最后一个单元格 (，请使用以下代码：

   Sub SelectRangeDown()
      Range("c1", Range("c1").End(xlDown)).Select
   End Sub

注意 SelectRangeDown 宏假定数据是连续的。 否则，如果选择的数据列中有空白单元格，则此宏可能不会选择该列内的所有单元格。

如果数据从单元格 C1 开始，但在该列中不是连续的，请使用 Microsoft Office Excel 2003 和早期版本的 Excel：

   Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c65536").End(xlUp)).Select
   End Sub

由于 Microsoft Office Excel 2007 支持 1，048，576 行，因此在 Excel 2007 中使用以下宏：

 Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c1048576").End(xlUp)).Select
   End Sub

如果要从活动单元格向下和右侧所有列进行选择 (假定所有行和列) 连续数据，请使用以下代码：

   Sub myrangearea()
      Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)).Select
   End Sub

如果你知道此示例代码中 (单元格，则起始单元格为 D1) ，并且想要选择列向下和右侧，请使用以下代码：

   Sub RangeFromStart()
      Range("d1", Range("d1").End(xlDown).End(xlToRight)).Select
   End Sub

若要选择当前区域的所有数据，请使用以下代码：

   Sub CurrentArea()
      Selection.CurrentRegion.Select
   End Sub

本文中包含的示例显示了如何在当前工作簿的活动工作表上选择不同的区域。

若要详细了解如何使用 Visual Basic for Applications (选择范围，并单击以下文章) 查看 Microsoft 知识库中的文章：

291308 如何在 Excel 中通过Visual Basic选择单元格/Excel