VB and Ms Access Macro

what kind of app is it?
I think you need to create access object and then just run the macro by name...

the following article may help you

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnoxpta/html/odc_comaddinvb6.asp

Hi ITBG,
all my macros are saved in the accessdatabase.. how do I create access objet in my app to run my macro by name?
Thanks, for your help!

F.

should be something like
Dim appAccess As New Access.Application
but just to run one macro from there it is not the best way to do it
It is mutch better to write vb code insted of using the macro....

Hi Franscico,

Try this. It works

    Dim AcApp As Access.Application
    Set AcApp = New Access.Application
    Dim strPath As String
   
    strPath = App.Path

    AcApp.OpenCurrentDatabase strPath & "\<Enter Database Name Here>.mdb"
   
    'If your Access is an adp project then replace the AcApp.OpenCurrentDatabase with this
    'AcApp.OpenAccessProject strPath & "\<Enter Access Project Name Here>.adp"
    AcApp.Visible = False
   
    AcApp.DoCmd.RunMacro "<Enter MacroName Here>"
    AcApp.DoCmd.Maximize
   
    'don't forget to dispose of the object when you close the form you are calling from, _
    'otherwise repeated calls will end up with loads of instances of MSAccess running on your PC
   
    AcApp.Quit
    Set AcApp = Nothing

Hi bsncs02,
I used the reference to ms access 9.0 library in myb project  and it works fine with your codes. But when I run the same application on a PC that does not have Ms access installed, it gives me an error # 429 "ActiveX component can't create object..." . What can I do to by-pass this?
Thanks a million for your help...

F.

any body can help regarding this issue?
I wii really appreciate...
F.