PDF File not opening in VBA program

[vodkasoda]

Hi all, I hope somebody can spot the problem here ... I have recently rebuilt my PC after a myriad of problems and I have just about got everything working the way it was, except for this single bit of this single program !!!

I haven't edited anything & this was working before my rebuild ...

Newsletter is defined as LONG, MyNews as STRING

Option Explicit

Public Declare Function ShellExecute _
    Lib "shell32.dll" _
    Alias "ShellExecuteA" ( _
    ByVal hwnd As Long, _
    ByVal lpOperation As String, _
    ByVal lpFile As String, _
    ByVal lpParameters As String, _
    ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) _
    As Long
    
Sub Open_NewsLetter()

NewsLetter = ShellExecute(0, "OPEN", MyNews, "", "", 0) 

End Sub

Rather than opening the PDF file, as it used to do, NewsLetter gets set to 42 !!!

Any help appreciated ...

 

[vodkasoda]

I have no idea why, but this has started working normally again ... bizarre !!!

 

[VoG]

This may seem bizarre also but why not

Workbooks.open(filename)