我试图弄清楚如何使用 VBA 在 Excel 版本 2003、2007、2010 中执行以下操作(希望它们都相同): 搜索列 A 中的最后一个单元格,其中包含一个恒定值。从上面的搜索中选择 A2:I2 中包含最后一个常量数据值的行的所有数据。
例如,如果 A 列中具有常量数据的最后一行是 A13,那么我想选择 A2:I2 到 A13:I13。
编辑
现在'lastRow' 将在 A 列中找到最后使用的单元格,即使上面有空白。这假设方程式在您的评论建议的其他列中。
Sub SelectRange()
lastRow = Cells(Rows.Count, "A").End(xlUp).Row
Range("A2:I" & lastRow).Select
End Sub
有关如何在不同版本的 excel 中查找最后一个单元格的信息,请参阅这篇文章。
假设您确实必须评估 A 列中的单元格的公式与常量,您可以使用 HasFormula 方法,如下所示:
Sub SelectRange()
lastRow = Cells(Rows.Count, "A").End(xlUp).Row
Do While Range("A" & lastRow).HasFormula <> False
lastRow = Cells(lastRow - 1, "A").End(xlUp).Row
Loop
Range("A2:I" & lastRow).Select
End Sub