我试图将名为reg的一张表中的值复制到同一工作簿中另一张表(称为staff)的表中。
我收到运行时错误' 424'当我执行以下内容时:
staff.Range("TableNewEmplInput").Value = Reg.Range("TableNewEmplData").Value
有人可以向我解释为什么会出现这种错误吗?
答案 0 :(得分:0)
我能够通过从上面任务的左侧删除Range
,按照您上面的方式执行.Value
副本:
Dim Staff As Worksheet, Reg As Worksheet '<~ assume these are named and defined
'...
Set Staff = ThisWorkbook.Worksheets("staff")
Set Reg = ThisWorkbook.Worksheets("Reg")
staff.Range("TableNewEmplInput") = Reg.Range("TableNewEmplData").Value
话虽如此,我建议调整此工作表的设计,以便更容易区分命名范围......