Stockage texte pdf dans une variable (VBA)

Bonjour,

Mon objectif est de récupérer l’intégralité du texte que contiens un PDF pour le stocker dans une variable, variable que j'utiliserais plus tard dans un excel.

j'ai déjà trouvé le code suivant, qui fonctionne pour les fichiers .txt. Mais quand je change le chemin ("C:\xxx\xxx\xx\test.pdf") pour le PDF, le MsgBox ne m'affiche pas le contenue texte du PDF.

Private Sub CommandButton1_Click()
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("C:\xxx\xxx\xx\test.txt", ForReading)
une_variable = f.ReadAll
f.Close
MsgBox une_variable
End Sub

Peut-on adapter ce code (ultra simple) pour les PDF ? Sinon, auraient-ils d'autres solutions ?

Merci pour votre aide.