This post is in response to an email question I received.
Basically the person wanted to open an Excel file on their network using a command button in their application.
From a button or a shape on your worksheet:
…assign the following macro (VBA) code:
This code opens any type of file with the program specified to open the type of file:
'this "ShellExecute" API Call needs to be in a module! 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 'this is the regular procedure - you'll attach the "OpenFile" macro to your worksheet object, button, or shape Sub OpenFile() Dim RetVal As Long Dim strFileName As String Dim strFolderPath As String strFolderPath = ThisWorkbook.Path & "\" strFileName = "filetoopen.txt" Call ShellExecute(0, "Open", strFolderPath & strFileName & vbNullString, vbNullString, vbNullString, 1) End Sub
This opens txt, pdf, docx, xlsx, etc files.
Let me know if you have any questions.