Excel宏按钮在顶部向上移动页面错误

Question

在 Excel 中，我有一个按钮，可将所选单元格标记在页面上相对于您最初所在的单元格向上移动 20 位。它工作正常，直到它到达顶部然后出现错误。

我知道这很可能是因为它超出了范围，所以我尝试使用 if else 语句来解决它 - 我想是因为我不是 100% 熟悉我找不到的函数名称正确的措辞说:
如果单元格超出范围，则等于 0,0 或类似的值。

这就是我到目前为止所拥有的；唯一起作用的是语句的 else 部分:

Sub moveUp20()
    '
    ' Move Up 20 Macro
    '

    '
    If ActiveCell.Offset(-20, 0) <= Range(0, 0) Then
    ActiveCell.Select = Range(0, 0)
    Else
    ActiveCell.Offset(-20, 0).Select
    End If
End Sub

这可能很简单，因为我不熟悉 excel 宏编程术语/语义，所以我将不胜感激!谢谢! :)

Answer 1

Sub moveUp20()

If ActiveCell.Row > 20 Then 'if you are on row 21 or below

    ActiveCell.Offset(-20).Select

Else ' select row 1 of the current column you are on

    Cells(1, ActiveCell.Column).Select

End If

End Sub