Я считаю, что это должно быть очень просто для кого-то, чтобы помочь мне с этим.
У меня две рабочие тетради. Одним из них является рабочая книга, которую мы используем в качестве трекера, так как она уже имеет условное форматирование и т. Д. Настройка, я буду называть это «файл 1»
Каждую неделю мы получаем по электронной почте очередную рабочую книгу с самыми последними и самыми лучшими данными «файл 2».
Все, что я хочу сделать, это скопировать последний и самый лучший «файл 2» в нашу рабочую книгу или «файл 1».
Это то, что я пробовал, но оно не работает:
Sub CopyNewData()
Dim x As Workbook
Dim y As Workbook
'## Open both workbooks first:
Set x = Workbooks.Open("H:\GTF COP June 25 2018.xlsx")
Set y = Workbooks.Open("H:\CSA Spreadsheets\PW1100 Inventory at CSA_Revised.xlsm")
'Now, transfer values from x to y:
x.Sheets("NEOCOP").Range("A1:AH20000").Value = y.Sheets("NEOCOP").Range("A1:AH20000")
'Close x:
x.Close
End Sub