excel 试图将范围从一个工作簿发送到另一个工作簿,但无法成功

mlnl4t2r  于 2022-11-18  发布在  其他
关注(0)|答案(1)|浏览(155)

我的代码很简单,但不知道我失败了。请帮助我。它给我错误9。

Sub SendInfoToDifferentWorkBook()
Dim LastRowA As Integer
Dim SKU As Range

LastRowA = Cells(Rows.Count, "A").End(xlUp).Row
Set SKU = Range(Cells(2, "A"), Cells(LastRowA, "A"))

Workbooks("Origin WB".xlsm").Worksheets("Sheet3").SKU.Copy Workbooks("Destiny WB.xlsx").Worksheets("Sheet1").Range("A1")

End Sub

工作簿名称中的空格与此有关吗?

htrmnn0y

htrmnn0y1#

在你的第一个工作簿()你得到了3倍“,它可以从这里来。关于第二个工作簿(“命运WB.xlsx”)你可以尝试设置“以同样的方式。希望它帮助你

相关问题