大家好,无论如何都要在excel中获取下一个空行,然后允许将数据输入到该行中?我在互联网上看了一下,发现没有这样的东西。我提出的一个想法是添加一行evertime并输入该行,但我只是想知道是否有更简单的方法来解决这个问题。任何帮助是极大的赞赏。感谢
答案 0 :(得分:2)
查看Excel中的UsedRange属性。
答案 1 :(得分:1)
关于.usedrange要注意的一件事是它可以选择一个带有ghost数据的行(数据可能已被删除,但它留下了一些遗留数据 - 例如格式)。在这里,这将留下需要删除的空白行。
如果您的数据中有任何列不能为空,那么它非常简单 - 只需使用
即可range("a1").end(xldown).row
方法。如果您正在寻找下一个可用的空行(可以填充任何列/空),您可以使用find函数来获取它。喜欢的东西;
Sub UnusedRow()
Dim lStartRow As Long
Dim lUnusedRow As Long
lStartRow = 3 'starting row no in case you have blank rows at the top
lUnusedRow = lStartRow - 1
Application.ScreenUpdating = False
On Error Resume Next
Do While lStartRow = lUnusedRow + 1
lUnusedRow = lStartRow
lStartRow = Cells.Find("*", Cells(lUnusedRow, 1), , , xlByRows, xlNext).Row + 1
Loop
On Error GoTo 0
Application.ScreenUpdating = True
End Sub
这样做的好处是它选择真正的下一个空行(即使在找到的行之后存在更多数据的地方)。