Ошибка 462: Powerpoint VBA - ссылка на несколько презентаций

Question

Я пытаюсь создать новые презентации на основе существующих слайдов из нескольких других точек питания. в основном у меня есть шаблон, а затем я зацикливаюсь и вставляю правильные слайды из других презентаций. Однако мой код иногда работает, а иногда нет.

Обычно ошибка 462, и я считаю, что это относится к неквалифицированным ссылкам (у меня будет 2-3 открытых пункта одновременно)? Ниже приведен фрагмент кода раздела, в котором код не выполняется во втором цикле (строка ошибки выделена жирным шрифтом), когда я пытаюсь установить презентацию. Любая помощь приветствуется. спасибо!

For k = LBound(crncy) To UBound(crncy)
For m = LBound(profile) To UBound(profile)

If (mandateTitles((profile(m)), (crncy(k))) <> "") Then

Set oPres = PowerPointApp.Presentations.Open(templateAddress(i), msoFalse)
Set perfPres = PowerPointApp.Presentations.Open((performanceSlideDeck(i)), 
msoFalse)

For j = 1 To perfPres.Slides.count Step 1


      oPres.Slides.InsertFromFile (perfPres.path & "\" & perfPres.name), 14, j, j

      '''''insert portfolio slides''''''''

      sFileName = findPreso((contentSlidesFolder & "\"), (profile(m)), (crncy(k)), (lang(i)))
       **Set contentPres = PowerPointApp.Presentations.Open((sFileName), msoFalse)**

...
next j
next m
next k