Mendip Data Systems

Database applications for businesses and schools


Public Function MaximizeNavigationPane()


On Error GoTo ErrHandler


   DoCmd.NavigateTo "acNavigationCategoryObjectType"




   Exit Function



   MsgBox "Error " & Err.Number & " in MaximizeNavigationPane routine : " & Err.Description, vbOKOnly + vbCritical

   Resume Exit_ErrHandler


End Function

Code Samples for Businesses, Schools & Personal Use

Updated 11/05/2018    


Sometimes the navigation pane can become so small it cannot be expanded


Here are three possible solutions:


1. Use VBA



Fix Shrunken Navigation Pane



2. Toggle the F11 button



3. Modify the search bar

   Right click to get the navigation options and untick (or tick) show the search bar.


   With thanks to Utter Access forum member louverrill  


Click the image to view a larger version ...

Return to Code Samples Page