VBA Pdf Excel avec ShellExecute ne colle pas à Excel

J'ai essayé d'get VBA dans Excel pour copyr un PDF vers Excel.

J'ai essayé différentes choses, que je list ci-dessous si quelqu'un veut essayer une fortune:

• J'ai également essayé le code ici , qui indique pour activer la reference, mais cela ne semble fonctionner que si vous avez installé Acrobat pro.

• Utilisez Shell et ShellExecute: J'ai essayé le code ici , mais j'ai continué à get une erreur lorsque le pdf s'ouvrait en disant qu'il ne pouvait pas find le file. J'ai essayé d'utiliser ShellExecute à la suite de commentaires ici et de code ici , mais je ne pouvais pas pouvoir le faire fonctionner.

  • en utilisant des cases à cocher avec userform
  • Comment adapter cette fonction VBA aux feuilles de Google
  • Mettre à jour dynamicment les arrays générés par openpyxl lors du sorting des colonnes
  • Lire et écrire des données sur excel sheet en utilisant Python
  • si condition avec "et" combiner "plusieurs ou" dans Vba Excel

Enfin, en utilisant ShellExecute, j'ai trouvé un code ici qui me permet d'ouvrir le file pdf sans erreur

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpOperation As Ssortingng, ByVal lpFile As Ssortingng, _ ByVal lpParameters As Ssortingng, ByVal lpDirectory As Ssortingng, ByVal nShowCmd As Long) As Long Sub EVN() Filename = "C:\test.pdf" ShellExecute 0, "Open", Filename, "", "", vbNormalNoFocus End Sub 

Le problème consiste à copyr le contenu une fois que j'ai ouvert le file. J'ai essayé d'append ce qui suit après l'ouverture du file:

 ' select all using ctrl a SendKeys "^a", True ' wait 2 secs Application.Wait Now + TimeValue("00:00:2") ' copy all using ctrl c SendKeys "^c" ' wait 2 secs Application.Wait Now + TimeValue("00:00:2") ' activate this wokbook Windows("PdfToExcel.xlsb").Activate Range("a2").Select ActiveSheet.Paste 

Mais je reçois un message d'erreur quand il arrive à Range ("a2"). Sélectionnez l'expression Erreur d'exécution 1004: erreur définie par l'application ou définie par l'object.

Existe-t-il un moyen de copyr avec succès le contenu du file pdf une fois ouvert pour le coller dans Excel?

• Graphique en python en utilisant numpy
• Multer ne stocke pas un grand file excel dans le disque
• Comment écrire dans un file .xlsx avec 2 feuilles de calcul prédéfinies en utilisant C #?
• Ajouter un élément à une table dans Access 2013 DB à l'aide de excel VBA qui est une table liée à la list des points de partage
• Fichier bmp vide lors de l'export de ChartObject à partir de la feuille excel dans VB.net