How to maximize Access window

S

Shirley

the command Docmd.Maximize only maximize the active
window. how can I maximize the Access Database Window in
VBS code?

Thanks a lot!

Shirley
 
P

Phobos

Public Const SW_MAXIMIZE = 3
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow
As Long) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal
lpClassName As Any, _
ByVal lpWindowName As Any) As Long

Dim lhandle as long
lhandle = FindWindow(0&,"MyAccessAppTitle")
Call ShowWindow (lhandle,SW_MAXIMIZE)

P
 
D

Dirk Goldgar

Phobos said:
Public Const SW_MAXIMIZE = 3
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal
nCmdShow As Long) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal
lpClassName As Any, _
ByVal lpWindowName As Any) As Long

Dim lhandle as long
lhandle = FindWindow(0&,"MyAccessAppTitle")
Call ShowWindow (lhandle,SW_MAXIMIZE)
Click to expand...

More recently, there's the simple

RunCommand acCmdAppMaximize
 

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

Access 2003 db window 0
Controlling the Access Window size 1
Set the size of the Access Database Window 6
VBA to maximize the Application Window 3
ON App. Maximize 1
acCmdAppMaximize ignored when opened w/Hyperlink 9
Making a form maximize or minimize 1
Disable/Hide Minimum/Maximum/Close Items On the Access Runtime Application Window 7

Top