Application VisualBasic Script

Sub GetHelp()
    Path = ThisWorkbook.Path
    Application.Help Path & "\USER.HLP"
End Sub