Привет, я новичок в форуме и нуждаюсь в небольшой помощи, я пытаюсь скопировать данные из одной книги в основную книгу, в которой содержатся таблицы, в которых скопированные данные должны идти. у меня есть сообщение на другом форуме 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
oops извините за ошибку в ответе с ответом, а не с комментариями, используемым моим сотовым телефоном. Последний ответ для ответа :(так что правильно ответить. Да, это именованная таблица, созданная по формату, и вы можете видеть в ленте. то же, что и название страницы январь – IanMc
ok Я понял, как получить основную книгу, чтобы сохранить и закрыть, я до сих пор не могу получить данные, скопированные для начала в строке 2, кто-нибудь? – IanMc