Displaying user-created menubar via automation

M

Markus Wallner

Hi!

I want to open an Access database via automation from Excel. Then I want to
display a user-created menubar. How can I achieve that?

I use the following code for opening and displaying the Access window:

Dim AObj As Access.Application 'Access Object
Set AObj = CreateObject("Access.Application")
ShowWindow AObj.hWndAccessApp, SW_MAXIMIZE
SetWindowPos AObj.hWndAccessApp, 0, 0, 0, 100, 0, SWP_HIDEWINDOW

AObj.OpenCurrentDatabase (filename)

ShowWindow AObj.hWndAccessApp, SW_MINIMIZE
SetWindowPos AObj.hWndAccessApp, 0, 0, 0, 100, 0, SWP_SHOWWINDOW
ShowWindow AObj.hWndAccessApp, SW_MAXIMIZE

' -- Code for displaying user-created menubar?

Thanks in advance,
Markus
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Word macro that can call cells out of Excel for a find and replace 0
Ribbon in Access 2007 works incorrect 1
Hide Access Window 5
Custom Menubar 1
Open/Close CurrentDatabase 5
Creating a new instance of Access without a window 0
Maximize/Minimize Buttons Re-Appear 0
please help me ....please help me ... urgent... 4

Top