Vba 模拟Ctrl+向下箭头键

创建一个表，插入2行数据，然后在表中插入8个空行

ThisWorkbook.ActiveSheet.Cells.Range("A1").Select
Selection.End(xlDown).Select
MsgBox Selection.row

返回第3行

ThisWorkbook.ActiveSheet.Cells.Range("A1").End(xlDown).row

返回第11行

End方法的行为不同，如何使其行为类似于选择版本？

---

编辑：还有一个细节，ClearContents然后插入带有VBA的行

有数据的行是在没有数据的行的上方还是下方？@cheezsteak有数据的行在标题的右上角。我无法再现此错误。@cheezsteak返回的行号是什么？请先尝试清除所有字段的内容，然后在VBA代码中添加字段你可以做上面的比较。