aprire un file con il programma predefinito

'invece di utilizzare shell uilizzo il metodo shellexecute dell'oggetto shell.application

Dim S As Object
  Set S = CreateObject("Shell.Application")
  S.ShellExecute (nomeFilePDF)