Boa tarde!!

Veja em:
http://www.myengineeringworld.net/2014/ ... h-vba.html
http://stackoverflow.com/questions/1565 ... -using-vba

Fonte: https://acrobatusers.com/forums/

Private Sub AcrobatFindText()
'IAC objects
Dim gAvDoc As Object

'variables
Dim Resp 'For message box responses
Dim gPDFPath As String
Dim sText As String 'String to search for
Dim sStr As String 'Message string
Dim foundText As Integer 'Holds return value from "FindText" method

'hard coding for a PDF to open, it can be changed when needed.
gPDFPath = "filelocation.pdf"

'Initialize Acrobat by creating App object
Set gApp = CreateObject("AcroExch.App")
gApp.Hide

'Set AVDoc object
Set gAvDoc = CreateObject("AcroExch.AVDoc")

' open the PDF
If gAvDoc.Open(gPDFPath, "") Then
sText = "Date"
'FindText params: StringToSearchFor, caseSensitive (1 or 0), WholeWords (1 or 0), ResetSearchToBeginOfDocument (1 or 0)
foundText = gAvDoc.FindText(sText, 1, 0, 1) 'Returns -1 if found, 0 otherwise

Else
' if failed, show error message
Resp = MsgBox("Cannot open" & gPDFPath, vbOKOnly)
End If
If foundText = -1 Then
'compose a message
sStr = "Found " & sText
Resp = MsgBox(sStr, vbOKOnly)
Else
' if failed, show error message
Resp = MsgBox("Cannot find" & sText, vbOKOnly)
End If
gApp.Show
gAvDoc.BringToFront
End Sub

Att

Eu entrei no http://stackoverflow.com/questions/1565 ... -using-vba
e baixei o excel. Mas ao executar aquela macro do botão "PDF import" e depois executado após achar o pdf deu a msg:
"erro de tempo de execução '429': O componente ActiveX não pode criar objeto". Já busquei as referencias sugeridas no site com sucesso bem como os activeX e não deu certo. Quase!
Me ajude! O que voce sugere?

O erro acima se dá na linha do código:
Set AC_PD = New Acrobat.AcroPDDoc