Проблемы с таблицей позиционирования в Excel после вставки в PPT

Question

Revised ...

Я могу скопировать и вставить встроенную таблицу из Excel в PPT, однако у меня возникают проблемы с позиционированием таблицы.Приведенный ниже код вставляет таблицу, но затем генерируется «Ошибка времени выполнения Selection.ShapeRange: Invalid Request.»

У меня ограниченный опыт, и я потратил последние несколько недель на попыткичтобы понять это, но не знаю, куда идти отсюда.

 'Copy Range from Excel
 Range("B4:E11").Copy

 'Paste Embeded File into Excel
     PPAPP.ActivePresentation.Application.CommandBars.ExecuteMso "PasteExcelTableSourceFormatting"
     PPAPP.ActivePresentation.Application.CommandBars.ReleaseFocus
    End With

'Position Table in Excel 
   With PPAPP.ActiveWindow.Selection.ShapeRange(1)
      .Name = "SummaryTable"
      .Left = 1.08 * 72
       .Top = 1.9 * 72
      .LockAspectRatio = msoFalse
      .Height = 5.11 * 72
      .Width = 11.8 * 72
        End With