I have a database in which the user clicks on a button and it opens a Word document. How would I program Access to open an Excel File instead?

Thanks,
Jason

Hi Jason,

If the file already exists:

'Call OpenExcelFile("C:\Book1.xls")

Sub OpenExcelFile(strPathToFile As String)
    Dim objXL As Object

    On Error Resume Next

    Set objXL = GetObject(, "Excel.Application")
    Set objXL = GetObject(strPathToFile)

    objXL.Application.Visible = True
    objXL.Parent.Windows(1).Visible = True

End Sub

HTH,

Bob