Открытие .pdf с VBA

У меня есть код ниже, кажется, не открывается PDF, пожалуйста, помогите. Я очень хорошо владею VBA, но не с vba-ориентированным кодом с adobe.

Option Explicit Option Compare Text Sub SeperatePDFFile() Dim selectpdf As String Dim caption As String Dim filter As String Dim gApp As Acrobat.AcroApp Dim gPDDoc As Acrobat.AcroPDDoc Set gApp = CreateObject("AcroExch.App") Set gPDDoc = CreateObject("AcroExch.PDDoc") caption = "Please Select an input file must extension .pdf" selectpdf = Application.GetOpenFilename(filter, , caption) gPDDoc.Open (selectpdf) End Sub 

Если вам нужно только открыть PDF-файл, есть ли какие-либо причины для автоматизации Acrobat, а спасибо, просто используя ShellExecute (который открыл почти любой файл, который был зарегистрирован в окнах)?

 Option Explicit Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Sub Test() If LaunchFile("C:\temp\somefile.pdf") > 32 Then ' it worked, the file's open Else ' failed for some reason End If End Sub Function LaunchFile(sFileName As String) As Long ' Requires the full path to the file to be launched LaunchFile = ShellExecute(0&, vbNullString, sFileName, vbNullString, vbNullString, vbNormalFocus) End Function 
  • преобразование файла excel в pdf с возвратным файлом phpexcel
  • Использовать VBA для копирования и вставки PDF-текста в excel и извлечения Item Item, Date Date и Case size из текста?
  • Различные выходные DOC, Excel и PDF в Jasper?
  • VBA Печать в PDF и сохранение с автоматическим именем файла
  • Как создать readonly viewer для Word, Excel и PDF-документов?
  • Открыть встроенную PDF-версию на определенную страницу
  • Объекты отображаются в виде черных ящиков при печати PDF из Excel
  • Предварительный просмотр Excel, Word, PDF в веб-браузере
  • Использование Microsoft.Office.Interop.Excel без фактического наличия Excel?
  • Как выровнять сохранение файла PDF с правильным активным листом?
  • Печать выбранных рабочих листов в файлах excel в pdf в python
  • Давайте будем гением компьютера.