VBA选择最后一列和最后一行

Question

我正在尝试在我的数据字段中选择最右边的单元格。我有一个20x20的数据网格，需要找到最后一列，找到有数据的最后一行。我在第二行代码中使用活动单元格函数时遇到问题。

 Sub Add

      Range("A2").End(xlToRight).Select
      Range("A2").End(xlDown).Select

 End Sub

Answer 1

Sub Add
    ActiveCell.SpecialCells(xlCellTypeLastCell).Select
End Sub

Answer 2

如果您想修复当前代码：

Sub Add
  Range("A2").End(xlToRight).End(xlDown).Select
End Sub

但如果有任何空白单元格跨越或向下，它将失败（停止）。

请参阅由Head of Catering链接的页面，了解更好的方法。