error file not found despite it's existed

hello
I have this code to opens specific page in specific file when write in cell A1 it gives me error the file not found I 'm sure about the file is existed in my directory

Const cAdobeReaderExe As String = "C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\Acrobat.exe"

Public Sub Open_PDF_At_Page()

    Dim PDFfile As String
    Dim AdobeCommand As String
    
    PDFfile = "C:\Users\alhagag\Desktop\files\asd1.pdf"
    
    'AdobeCommand = " /a ""page=2=Open Actions"" "
        AdobeCommand = " /a ""page=" & ActiveSheet.Range("A1").Value & "=Open Actions"" "

    
    Shell cAdobeReaderExe & AdobeCommand & Chr(34) & PDFfile & Chr(34), vbNormal

End Sub

any suggestion to solve this problem I truly appreciate

I think your Adobe path needs to be in quotes because it has embedded spaces. Try this:

Const cAdobeReaderExe As String = """C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\Acrobat.exe"""

The file that is not being found is your Acrobat.exe file. If it were the PDF file, the message would be coming farther downstream from the application. Where did you get that path? When I do the same thing with my version of Acrobat it works.

I'll show you mine if you show me yours.


acrobat.JPG