VBA中列为-1的偏移量

我试图在选择列=-1时找到问题的解决方案 首先选择单元格A1，然后应用此代码

 Sub exc()
ActiveCell.Offset(-1, 0).Select
If .Offset(-1, 0).Row < 1 Then
ActiveCell.Offset(1, 0).Select
End If
End Sub

但问题并没有解决

---

谢谢您的帮助。

在进行偏移之前，您需要进行测试：

Sub exc()
IF Activecell.Row > 1 then
     ActiveCell.Offset(-1, 0).Select
Else
    ActiveCell.Offset(1, 0).Select
End If
End Sub