嗨,我是新來的論壇,需要一點幫助,我一直在試圖從一個工作簿複製數據到主工作簿,其中包含表複製數據應該go.I在這裏的另一個excel論壇上發帖,http://www.excelforum.com/excel-programming-vba-macros/977613-copy-data-from-changing-range-in-on-workbook-to-another.html將數據從一個工作簿複製到另一個工作簿與表
但代碼無法正常工作,無論我嘗試什麼,我都無法弄清楚,但有一天我遇到了一個帖子,在答案中給出的代碼是隻是完美的帖子是位於這裏VBA copying data from one workbook to another
這項工作只是完美只有2個小問題,它我不能去工作
- 我不能得到的數據複製到主進入第2行它的代碼認爲那裏有數據,因爲它的表?
- 我不能讓主人以保存並關閉
看到下面的代碼,我希望我把代碼正確和不打破任何論壇規則
感謝所有幫助
Sub SendToMaster()
'this macro goes IN the sender workbook
Dim wsSEND As Worksheet
Dim wbMASTER As Workbook
Dim NextRow As Long, LastRow As Long
Set wsSEND = ThisWorkbook.Sheets("january")
LastRow = wsSEND.Range("A" & Rows.Count).End(xlUp).Row
Set wbMASTER = Workbooks.Open("C:\Documents and Settings\Ian\My Documents\excel\Disk_Inventory_V3_master.xlsm")
With wbMASTER.Sheets("january")
NextRow = .Range("A" & .Rows.Count).End(xlUp).Row + 1
wsSEND.Range("A2:E" & LastRow).Copy
.Range("A" & NextRow).PasteSpecial xlPasteValues
.Range("A" & NextRow).PasteSpecial xlPasteFormats
End With
wsSEND.Range("A2:E200").ClearContents
ThisWorkbook.Save
ThisWorkbook.Close
wbMASTER.Close True
'save and close the master
End Sub
歡迎來到SO。 :)只是要清楚,是你指的是一個「命名錶」,即表。由功能區中的「格式化爲表格」創建? – Manhattan
哎呀對不起,在答覆回答錯誤而不是評論使用我的手機最後nite回覆:(所以回答正確是它是一個命名的表格格式創建,你可以在功能區中看到。表的名稱是相同的頁面名稱1月 – IanMc
好吧我想通過如何讓主工作簿保存和關閉,我仍然無法得到的數據複製過來開始在第2行任何人? – IanMc