I know this is a very old thread, but it still comes up a the top of Google. The simplest syntax is:
Dim DestPath As String DestPath = "C:\Testing\MyFile.docx" CreateObject("Shell.Application").Open (DestPath)