Копирование данных из одной рабочей книги в другую, когда открыты обе

Question

Я пытаюсь скопировать данные из одной открытой рабочей книги в другую открытую рабочую книгу. Я продолжаю получать сообщение об ошибке 1004: по сути, я не могу найти мою книгу. У меня есть такая интуиция, что, поскольку я использую программное обеспечение GXL pull на одной из рабочих книг (сервер электронных таблиц), это усложняет мою возможность извлечения данных. Похоже, что отладчик говорит, что это строка кода Set x = Workbook.open. Вот пример моего кода,

Sub CopyPasteData()
'
'CopyPasteData Macro
'

Dim x As Workbook
Dim y As Workbook

Set x = Workbooks.open("C:\\Client\C$\Users\ffffllll01\Desktop\North MC Macro Test.xlsm")
Set y = Workbooks.open("C:\\Users\ffffllll01\Desktop\Test Booklet for MC% Data Copy.xlsm")

x.Sheets("North MFG MC% Masonry).Range("W16:W21").Copy

y.Sheets("Sheet1").Range("A1").PasteSpecial

'
End Sub

Answer 1

3 вещи с первого взгляда:

1. Мне не нравится "%" в имени файла.

2. Вам не хватает заключительных кавычек в строке 12, должно быть:

   x.Sheets ("Северная MFG MC% Masonry"). Диапазон ("W16: W21"). Копия

3. Я думаю, вы должны ввести некоторые аргументы для PasteSpecial в строке 14.

Надеюсь, это было полезно. Привет