Lien vers fichier .pdf

Bonjour à toutes et à tous,

Est-il possible d'adapter le code suivant qui me permet d'ouvrir un document word afin d'ouvrir un fichier PDF ?

Set wrdApp = CreateObject('Word.Application')
On Error GoTo line1
Set wrdDoc = wrdApp.Documents.Open('C:\\mon_fichier.doc')
wrdApp.Visible = True
Exit Sub
line1:
MsgBox 'Le fichier 'Manuel technique Maintenance bactério' est introuvable !', vbOKOnly + vbExclamation, 'Attention'
MsgBox 'Veuillez placer le fichier dans le répertoire 'C:\\mon_fichier'', vbOKOnly + vbExclamation, 'Attention'

Je vous remercie beaucoup pour votre aide.

Bonne journée

Sophie