我的代碼很簡單，但不知道我失敗了。請幫我。它給了我錯誤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
作業簿名稱中的空格是否與它有關？
uj5u.com熱心網友回復：
在您的第一個 Workbooks() 中，您獲得了 3 次“，它可能來自這里。關于第二個 Workbooks("Destiny WB.xlsx") 您可以嘗試以相同的方式設定“。希望對你有幫助
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/528566.html
標籤：擅长vba
上一篇：excel-提取給定陣列的值