VBA没有select我的数据中的最后一行
我觉得我失去了一些东西。 我有一个ID,名称,状态作为标题的表。 表头在B2开始,数据从B3开始。表是dynamic的,由另一个工作簿的vba代码生成。 有时可能会过滤数据,但表中没有空白。
有时用户会在名称列(C)中select某个人。 点击button应该把它们放到最后的logging。
我知道有很多方法可以做到这一点,但我似乎无法得到任何工作,我不明白为什么。
这里是我目前的代码,但我已经尝试UsedRange,CurrentRegion,表名,整个作品。
Sub MoveToLastRow() Dim LastRow As Long LastRow = ActiveSheet.Cells(Rows.Count, "C").End(x1Up).Row End Sub
我点击button或尝试select一个名字的代码,它什么都不做。
谢谢您的意见。 〜唐
加:
Application.GoTo Range("C" & LastRow)
在代码的最后,使光标移动到该单元格。
您可以使用以下简单的VBA代码片段来select包含列“C”中的数据的最后一个单元格:
Sub MoveToLastRow() ActiveSheet.Range("C" & Rows.Count).End(xlUp).Select End Sub
注意 :您的原始代码包含语法错误,因此不起作用:End( x1Up ).Row应该写成End( xlUp ).Row。 以下是执行相同操作的正确代码片段(即,select列“C”中的数据的最后一个单元格)
Sub MoveToLastRow() Dim LastRow As Long LastRow = ActiveSheet.Cells(Rows.Count, "C").End(xlUp).Row ActiveSheet.Range("C" & LastRow).Select End Sub
希望这可能有帮助。
在你的代码中改变.End(x1Up)
为.End(xlUp)
如果你在代码的顶部使用Option Explicit
,它会告诉你VBA认为它是一个variables。