PDF встроенные изображения работают на рабочем столе, но не на планшете

Question

Я создал макрос, который добавит страницу из шаблона и вставит изображение, типы файлов, поддерживаемые офисом, а также вставит PDF-файлы. Когда я использую этот макрос на рабочем столе, изображения будут вставлены, а также PDF-файлы будут вставлены в мой документ и покажут изображение.

Когда я использую макрос на Surface Pro, изображениябудет отображаться, но объекты OLE (PDF) будут отображать только значок, а не само изображение. Я приложу код внизу, но, к сожалению, я не знаю, что делать. Я пытался вставить PDF как изображение, но это не поддерживаемая функция в Office (удалено 2010/2013, я считаю).

Я также пытался добавить в OLEtypeAllows = acOLEEmbedded внутри оператора с. Я хотел бы не вставлять ссылки в документ, поскольку документы будут перемещены, и я бы предпочел отправить один файл, а не несколько.

Код

Set oleobj = ActiveSheet.OLEObjects.Add(Filename:=txtFileName, Link:=False, DisplayAsIcon:=False)

   With oleobj
       'These are commented out as it's stuff I've tried unsuccessfully
       'OLEtypeallows = acOLEEmbedded
       'Action = acOLECreateEmbed
       oleobj.Top = rng.Top
       oleobj.Left = rng.Left
       'inserts the image to the correct location
       If oleobj.Width > oleobj.Height Then
           oleobj.Width = 545
           oleobj.Left = (570 - oleobj.Width) / 2
           oleobj.Top = oleobj.Top + 2
           'Centers the image
       Else
           oleobj.Height = 625
           oleobj.Left = (550 - oleobj.Width) / 2
           oleobj.Top = oleobj.Top + 2
       End If
   End With