using existing msaccess form within Excel

[ltworf]

I'm using office xp. I have a form in my accessDB that changes the dates in my queries. I would like to access this form via Excel. Does any one have any code they can share with me that would help.

 

[SBendBuckeye]

Dim objAccessApp As Access.Application

Set objAccessApp = GetObject(YourAccessFileNameAndPath)

objAccessApp. etc

objAccessApp.Quit
Set objAccessApp = Nothing

Good LucK!

 

[ltworf]

Thx that helped me on my way. So now I have it opening the AccessDB then a macro runs to open the form. Is there no way to just open the form without having to open the AccessDB.Here si what I have in my script:

Sub controlAccess()
Dim objAccess As Object
Set objAccess = CreateObject("Access.Application&quot

objAccess.OpenCurrentDatabase filepath:= _
"\\WCAB855766\ACCESS\ccos.mdb"
objAccess.Visible = True


'this open the database then runs a macro in access to open the form
myAccess = objAccess.Run("OpenFormInExcel&quot

End Sub