使用VBA滚动到Excel中最后一行文本

有人能告诉我怎样才能使我的电子表格从VBA移动最后一行文本。

目前我使用下面的代码:

Range("p65536").End(xlUp).Select 

这工作,但也移动到一个特定的列。 我想这样做,但保持当前列在屏幕上。

感谢迈克尔

试试这个代码:

ActiveSheet.Cells(ActiveSheet.Rows.Count, Selection.Column).End(xlUp).Select