Justin:
There are various ways you could do it. If you want to manipulate the
contents of the workbook from within Access you'd use automation so that you
can return a reference to the workbook in your Access application. If you
just want to open the Excel file, however, you can use the VBA Shell function
(check it out in Help). Or you can call the Widows API ShellExecute
function. I find this last copes with many 'associated' file types which the
Shell function doesn't handle well. Put the following module in your
application:
''''module starts''''
Option Compare Database
Option Explicit
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 nshowcm As Long)
Sub ShellToFile(strPath As String, ByVal lngHwnd As Long)
Dim lngRetVal As Long
lngRetVal = ShellExecute(lngHwnd, "open", strPath, _
vbNullString, CurDir, 1)
If lngRetVal < 32 Then
MsgBox "Unable to open file " & strPath, vbInformation, "Warning"
End If
End Sub
''''module ends''''
You can then call it in the button's Click event procedure with:
Dim strPath As String
strPath = < get the path to the Excel file from somewhere>
ShellToFile strPath, hwnd
Ken Sheridan
Stafford, England
