Worksheet_Change在表格之间移动

Question

我有一张工作簿，用于收集送货数据。我有一个Worksheet_Change宏，根据其位置移动活动单元格。

Private Sub Worksheet_Change(ByVal Target As Range)
  If ActiveCell.Column = 4 Then
    ActiveCell.Offset(-1, -1).Select
  ElseIf ActiveCell.Column = 3 Then
    ActiveCell.Offset(0, 1).Select
    Sheet2.Activate
    Call Sheet5.Last_Row_Range
    ThisWorkbook.Save
  End If
End Sub

通过将数字扫描到活动单元格来启动更改。 我现在希望代码在扫描后查看相邻的单元格，并根据该单元格内容，选择另一个工作表。即; if ActiveCell.Offset=x如果ActiveCell.Offset=y选择sheet2，则选择sheet1。

感谢您花时间阅读本文。