通过更改该行中的单元格将一行从一个表移动到另一个表

Question

我有一张订单表，其中包含一列订单状态。将订单标记为“完成”后，我想将订单（表中的行）移动到另一张纸上的另一张表中。

我一直在努力获取事件触发器。

我可以显示相对于工作表的更改行。我试图获取相对于表的行号，以便移动确切的行。我为订单状态列创建了一个命名范围，以便可以将“目标”设置为该范围。

Private Sub Worksheet_Change(ByVal Target As Range)

Dim statuscolumn As Range
Set statuscolumn = Range("OrderStatusInCXTable")

If Target = "Completed" Then MsgBox Target.row

End Sub

当我将一个表行从一个表移动到另一个表时，我不在乎该行的位置。它可能在表1中排在第5位，在表2中排在第1位。我只想将它从表1转移到另一张纸上的表2。

我想将表1中的行复制并粘贴到表2中，然后从表1中删除行。

我当时正在考虑使用Worksheet_change来查看订单（表1中的行）何时被标记为已完成。当它被标记为完成时，Worksheet_change将注意到该事件，找到特定的行，从表1复制到表2，最后从表1中删除它。