Импорт PDF в Excel

У меня есть этот код, но я хочу скопировать и вставить PDF файл в точном формате, чтобы преуспеть не в одной строке или столбце, я имею в виду, если у меня есть таблица с двумя столбцами и 16 строк в формате PDF, я хочу вставить ее в точном формат для Excel с использованием vba. приведенный ниже код не работает должным образом, он выбирает, но не вставляет данные, чтобы преуспеть, и я не могу вставить его в точном формате в формате PDF, чтобы преуспеть.

любезно помогите мне с этим

Пожалуйста, обратитесь к файлу PDF с помощью этого кода. Я хочу вставить точный формат в Excel.

enter image description here

Sub Shell_Copy_Paste()

   Dim o As Variant
   Dim wkSheet As Worksheet

   Set wkSheet = ActiveSheet

   o = Shell("C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe C:\Users\saurabh.ad.sharma\Desktop\red.pdf", vbNormalFocus)

   Application.Wait (Now + TimeSerial(0, 0, 2)) 'Wait for Acrobat to load

   SendKeys "^a"   'Select All
   SendKeys "^c"   'Copy
   SendKeys "%{F4}"    'Close shell application

   wkSheet.Range("B5").Select
   SendKeys "^v"   'Paste

End Sub
0
источник поделиться

Посмотрите другие вопросы по меткам или Задайте вопрос