VBA Tipp: Navigationsbereich aus/einblenden

Aus DBWiki
Wechseln zu: Navigation, Suche

Anforderung

Ich möchte den Navigationsbereich (ab Access 2007) ausblenden oder einblenden.


Manuelle Einstellmöglichkeiten:

  • In den Optionen kann eingestellt werden, ob der Navigationsbereich angezeigt werden soll oder nicht.
  • Mit der F11-Taste kann der Navigationsbereich ein- oder ausgeblendet werden.

Lösung

per VBA-Code:


Navigationsbereich ausblenden:

   ' Quelle: http://www.dbwiki.net/
   DoCmd.NavigateTo "acNavigationCategoryObjectType", "acNavigationGroupTables"
   RunCommand acCmdWindowHide

Navigationsbereich einblenden:

   ' Quelle: http://www.dbwiki.net/
   DoCmd.SelectObject acTable, vbNullString, True
   DoCmd.NavigateTo "acNavigationCategoryObjectType"

Navigationsbereich minimieren:

   ' Quelle: http://www.dbwiki.net/
   DoCmd.NavigateTo "acNavigationCategoryObjectType"
   DoCmd.Minimize

Navigationsbereich maximieren:

   ' Quelle: http://www.dbwiki.net/
   DoCmd.NavigateTo "acNavigationCategoryObjectType"
   DoCmd.Maximize

Anwendung

Die obigen Codes können z.B.

  • Beim Öffnen (Form_Open) eines Formulars
  • Beim Laden (Form_Load) eines Formulars
  • Beim Klicken auf eine Schaltfläche (Schaltfläche_Click) ausgeführt werden.

Weblinks