Копирование значений между двумя экземплярами Excel с ошибкой во время выполнения 9

Question

Я новичок в Excel VBA и застрял на том, как копировать и получать доступ к макросам между двумя экземплярами Excel.Два экземпляра Excel требуются для повышения производительности, поскольку они не очень хорошо сочетаются друг с другом при объединении.

Я попробовал следующее, как рекомендовано в сообщении Копировать диапазон между двумя экземплярами Excel .

Когда я добираюсь до линии Set Dst =, я получаю ошибку 9. Я уверен, что путь правильный.

Я пытался сторнировать файлы xlApp, открывать файлы (разные экземпляры) в обратном порядке, проверять расширения и предлагать моему компьютеру взятку.

Sub CopyValues()
    'Test.xlsm is the source file
    'Testd.xlsm is the destination file
    Dim xlApp As Excel.Application
    Dim Src As Range
    Dim Dst As Range
    Dim Vals() As Variant

    Set xlApp = GetObject("C:\Users\Office\Desktop\Test.xlsm").Application

    Set Src = xlApp.Workbooks("Test.xlsm").Worksheets("Sheet1").Range("A1:A9")
    Set Dst = Workbooks("Testd.xlsm").Worksheets("Sheet1").Range("A1:A9")

    Vals = Src
    Dst.Value = Vals
End Sub

Я продолжаюполучая run time error 9 run out of source file.Мне не удалось получить никаких ошибок, но также и никакого результата, если закончился файл назначения.