Opening an Excel Doc

[Avslavedriver]

Hello,

I'm using Access 97 and i'm trying to open an Excel Document inside a module using VBA code. Any suggestions

Thanks

 

[WillR]

I have only been able to test this in XL2K

Private Sub cmdExcel_Click()
'WillR - opens a Spreadsheet & inserts 1 in A1 of Sheet1
Dim xlApp As Excel.Application
Dim xlWB As Excel.Workbook
Set xlApp = New Excel.Application
With xlApp
    .Visible = True
Set xlWB = .Workbooks.Open("S:\Personal\XL\Test.xls", , False)
    With xlWB.Sheets("Sheet1")
        With .Range("A1")
        .Value = 1
        End With
    End With
End With
End Sub

Requires you to set a reference to the relevant Excel Object library in the Access VBE. Hope it helps

 

[Avslavedriver]

The code looks great, but Excel.Application is giving me an Error in my Dim statement. I can't figure out why

Thanks

 

[Philem]

Hullo! Did you remember to set a reference as Will suggested? When you are in the module edit screen, click Tools->References, and you should see a list of references. Make sure MS Excel (your version) is checked.

HTH

P