1

我正在使用 Excel 宏，

我遇到ActiveCell.End(xlDown).Select了转到表格最后一行的命令

我目前正在使用此命令来查找总行数

ActiveCell.End(xlDown).Select

y = ActiveCell.Row

但问题是对于大数据，命令会跳过数据，其中下一行的数据发生变化。

可能的问题是什么？

（您可以看到表 1069 和 1070 数据类型是日期，格式相同但代码不确定地跳过[注意：当第二列发生变化时]）

.
.
.
1068 > 20-08-2012 C0 138225 98.91608138 99.25925926
1069 > 20-08-2012 C0 138226 99.71159982 98.95776825
1070 > 21-08-2012 __ 506821 65335U11 0     
1071 > 21-08-2012 C0 100381 0 0
.
.
.
4

1 回答 1

0

我正在删除评论，但您应该始终使用xlUp而不是xlDown避免出现空白问题。

请在目标列中选择一个单元格并运行以下命令：

Sub findTherow()
Dim y As Integer
With Excel.ActiveSheet
            y = .Cells(.Rows.Count, ActiveCell.Column).End(Excel.xlUp).Row
End With
MsgBox ("Look what I found:" & y)
End Sub
于 2012-10-01T19:42:51.837 回答