Maximizing Access Window

[Paul H]

Hi, I do know how to maximize a form (or a report, I guess) docmd.maximize, but in this case I want to maximize the entire Access application to full screen and I can seem to find any code to help me. I tried this (which may be for Excel), but it had no effect.

ActiveDocument.ActiveWindow.WindowState = wdWindowStateMaximize

Actually it closed my application when I used it. I guess it got confused.

What I am doing is opening another Access application and closing the current one. I scraped most of this off another site, and it works just fine, except the window opens in a normal state, not a maximized state.

    Dim FilePath As String
    Dim FileName As String
    Dim FilePathName As String
    Static acc As Access.Application
    Dim db As DAO.Database
    Dim strDbName As String
    
    FilePath = Application.CurrentProject.Path
    FileName = "CCS_CSB_Reports_3401.accdb"
    FilePathName = FilePath & "\" & FileName
    
    strDbName = FilePathName
    Set acc = New Access.Application
    acc.Visible = True
    Set db = acc.DBEngine.OpenDatabase(strDbName, False, False)
    acc.OpenCurrentDatabase strDbName
    db.Close
    Set db = Nothing
    Application.Quit

It's a very small thing, but visually it would look much nicer if it just flipped to a new screen. I can live with it as it is. It's become more a matter of curiosity.

[CJ_London]

have you tried

DoCmd.RunCommand acCmdAppMaximize

[Paul H]

Of course not, Splendid One.

Exactly what I needed, thanks.