Opening a PDF file within same folder as workbook

[ABabeNChrist]

I have a workbook and a PDF file that are located within the same folder. At the present moment I use this method to open PDF file from this same workbook. Is there a code that I can use to open this same PDF file even though I may move entire folder that holds both workbook and PDF file to another location. Kind of like the word approach with “ThisWorkbook.Path”

Code: Select all

Dim strFile As String
  ' Path and filename of PDF file
  strFile = "C:\Program Files\Folder Name\File Name.pdf"
  ActiveWorkbook.FollowHyperlink strFile

[HansV]

Use

strFile = ThisWorkbook.Path & "\File Name.pdf"

[ABabeNChrist]

Thank you HansV
Worked like a charm