[VBA ] 關於worksheets複製貼上的問題

看板Visual_Basic作者boral (完備性)時間13年前 (2012/03/19 00:37)推噓0(0推 0噓 1→)

留言1則, 1人參與討論串1/1

Sub 開啟檔案() Dim folder_name As String Dim file_name As String Dim report_time As Date report_time = Workbooks("test1").Worksheets("Sheet1").Range("A1").Value folder_name = Format(report_time, "yyyymm") file_name = Format(report_time, "yyyymmdd") Workbooks.Open Filename:="C:\Users\Administrator\Desktop\VBA\" & folder_name & "\國內02A" & file_name & ".xls" Workbooks("國內02A" & file_name).Worksheets("國內02A" & file_name).Cells.Copy Workbooks("test1").Worksheets("Sheet2").Paste Workbooks("國內02A" & file_name).Close End Sub 上面是我寫的VBA code(Excel 2007) 不過在 Workbooks("test1").Worksheets("Sheet2").Paste 會發生錯誤,產生class worksheet的Paste方法錯誤我上網去查很多網站都是這樣教的是否是因為在2007上所以會產生此類錯誤? 再麻煩大大解答一下了感謝!! -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.24.122.72

→

bulldog

03/19 15:22, , 1^F

03/19 15:22, 1^F

‣ 返回看板[ Visual_Basic ] 程設

‣ 更多 boral 的文章

文章代碼(AID): #1FPWzA3F (Visual_Basic)