Il codice pare sia VBA o Visual Basc 6 ... dall'App.Path pare più VB6 ...

Potresti posizionare i files che ti interessano nello stesso percorso dell'applicazione o creare una cartella nel percorso dell'applicazione e posizionarli li ...

Esempio :

> Percorso EXE : C:\MioExe\

> Files in : C:\MioExe\DocumentiPDF\

> Codice :

Public Sub ApriFile (ByRef NomeFilePDF As String)

Shell.Open App.Path & "\DocumentiPDF\" & NomeFilePDF

End Sub

Spero ti sia di aiuto ... Ciauzzz