hi all,

can you please correct my codes or any other setting for my Excel program?
I got this error "Complie error, User-defined type not defined", codes below
in Modules:

Public Sub iConn()
Set oaccess = New Access.Application
oaccess.OpenCurrentDatabase (Sheets("Main").Range("A1").Value)
Set db = oaccess.CurrentDb()
End Sub