在两张Excel VBA表格中更新数据

是否可以更新两张图纸上的数据，即图纸1和图纸2数据在两张图纸中的行和列相同

我使用这个更新代码

Private Sub cmdUpdate_Click()
    Cells(currentrow - 1, 1).Resize(1, 4).Value = Array(TB1.Text,startdate.Text, enddate.Text, ComboB.Text)
    End Sub

---

只需将要更新的工作表添加到单元格（）之前：

Sheets（“Sheet1”）。单元格（当前行-1，1）。调整大小（1，4）。值

，然后只需复制/粘贴并更改为“Sheet2”：

---

如果我理解正确，假设您希望在“Sheet1”和“Sheet2”上运行此操作，相同的单元格。只需在

单元格（）之前添加要更新的工作表：
工作表（“Sheet1”）。单元格（当前行-1，1）。调整大小（1，4）。值
，然后只需复制/粘贴并更改为“Sheet2”。@Muhammad Khurrum Butt同意Bruce Wayne的说法。我刚刚测试过它是否正常工作
Private Sub cmdUpdate_Click()
    Sheets("Sheet1").Cells(currentrow - 1, 1).Resize(1, 4).Value = Array(TB1.Text,startdate.Text, enddate.Text, ComboB.Text)
    Sheets("Sheet2").Cells(currentrow - 1, 1).Resize(1, 4).Value = Array(TB1.Text,startdate.Text, enddate.Text, ComboB.Text)
End Sub