Hide database window in Access 2010

[Kevin Johnston]

I can't find the equivalent way of hiding the database window in Access 2010 as in Access 97 (Tools, Options). How do I accomplish this in 2010? (I'm not so worried about security - just want the opening form to stand out without the background clutter.)

Thank you!

[ajetrumpet]

does that little 'A' in the upper left hand corner of the interface replace the ribbon in 07? if it does, I suspect that the access options are in that menu just like 07. In 07, go to options > current database > show navigation pane.

[DaveT]

Can use this such as:

DisplayNavPane True
or
DisplayNavPane False

Public Sub DisplayNavPane(IsVisible As Boolean)
'7/29/2009 DLT
    Dim strTableName As String
    
    On Error GoTo DisplayNavPaneError
    'strTableName = "local_Parameters" 'could use a tablename, or a module acModule, etc
                                    'but it runs OK using mSysObjects
                                    
    strTableName = DLookup("Name", "mSysObjects", "[Type] = 1 AND [Flags] = 0")
    
    DoCmd.SelectObject acTable, strTableName, True
    If IsVisible = False Then
        DoCmd.RunCommand acCmdWindowHide
    End If
    Exit Sub
DisplayNavPaneError:
    If Err.Number = 2544 Then
        'Get the name of the first table in the mSysObjects table
        strTableName = DLookup("Name", "mSysObjects", "[Type] = 1 AND [Flags] = 0")
        Resume
    Else
        MsgBox "Error encountered in DisplayNavPane subroutine!"
    End If
End Sub

[Kevin Johnston]

ajetrumpet and DaveT,

I believe you both answered my question correctly. I see now that Database Window and Navigation Pane are somewhat equivalents in the different versions.

However, I owe both of you an apology - I asked the wrong question. Actually my problem is not with hiding the Navigation Pane, but with hiding the ribbon bar. I find I can almost do that through File, Options, Customize Ribbon. Maybe that will be sufficient - will play around it with it a bit more.

In Microsoft Help for Access, under "Customize the Ribbon", they mention creating a USysRibbons table with XML code in it. Not sure I want to get that deep into it, but may if necessary. If you or someone else knows a simpler way of hiding almost everything on the screen besides the opening form, I'd appreciate it.

Thanks.

[DaveT]

Ctrl+F1 toggles ribbon. Also:

DisplayRibbon True
or
DisplayRibbon False

Public Sub DisplayRibbon(yShowIT)
'8/2/09 DLT
On Error Resume Next
    
    If Application.Version >= 12 Then
        If yShowIT Then
            DoCmd.ShowToolbar "Ribbon", acToolbarYes
            
            Else
            DoCmd.ShowToolbar "Ribbon", acToolbarNo
        End If
        
    End If
    
End Sub

[Kevin Johnston]

Dave,

Perfectamente! This did the job great!

Thanks.

Kevin J.