Hi !
I am running excel macro from access , everything goes almoust fine but after the excel macro has runned there goes an Run-time error 440 Automation error in Access VBA an it stop marked red bellow , wha goes wrong ?
Private Sub Command35_Click()
Dim XLApp As Object
' Open the XLS fle, make it visible, get control and run a macro called muotoilu
Set XLApp = CreateObject("Excel.Application")
With XLApp
.Application.Visible = True
.UserControl = True
.Workbooks.Open "thy2.xls" "After opening excel macro it make some settings and save and close the excel file"
.Application.Run "muotoilu"
XLApp.Close
End With
End Sub
Br Timo