Navigationsbereich ausblenden

Moderator: ModerationP

Navigationsbereich ausblenden

Beitragvon Dieterlem » 16. Jan 2018, 10:13

Hallo Access Freunde,

ich blende mit dem folgenden Code den Navigationsbereich und die Ribbons aus;

Code: Alles auswählen
DoCmd.SelectObject acTable, , True
DoCmd.RunCommand acCmdWindowHide
DoCmd.ShowToolbar "Ribbon", acToolbarNo


Doch leider funktioniert es nicht mehr wie zuvor. es wird nun die aktuelle Form ausgeblendet.
Hat jemand einen Tipp woran das liegen könnte?


Gruß
Dieterlem
Access Anfänger
Dieterlem
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 143
Registriert: 04. Mär 2007, 20:15
Wohnort: Pfalz

Re: Navigationsbereich ausblenden

Beitragvon Joss » 16. Jan 2018, 11:38

Hallo Dieterlem,

den Navigationsbereich blendest du am einfachsten in den Optionen aus.

Mit diesem Code
Code: Alles auswählen
DoCmd.RunCommand acCmdWindowHide

blendest du das aktive Fenster aus.

Gruß
Josef
Meine Suchmaschine: www.fireball.de | Access-Wiki: www.dbwiki.de
Joss
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 157
Registriert: 20. Okt 2012, 11:38

Re: Navigationsbereich ausblenden

Beitragvon Dieterlem » 16. Jan 2018, 14:06

Aber mit DoCmd.SelectObject acTable, , True wähle ich doch die Tabellen in der Navigationsleiste. Mit dem Befehl DoCmd.RunCommand acCmdWindowHide sollte dann das aktive Fenster, also die Navigationsleiste ausgeblendet werden.

Code: Alles auswählen
DoCmd.SelectObject acTable, , True
DoCmd.RunCommand acCmdWindowHide


Gruß
Dieterlem
Access Anfänger
Dieterlem
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 143
Registriert: 04. Mär 2007, 20:15
Wohnort: Pfalz

Re: Navigationsbereich ausblenden

Beitragvon Joss » 16. Jan 2018, 14:23

Hallo Dieterlem,

du hast Recht. Ich hatte den Navigationsbereich nicht geöffnet. War mein Fehler.
Aber dein Code funktioniert bei mir. Der Navigationsbereich wird geschlossen. Das Formular bleibt geöffnet.

Das heißt, ich kann dir nur bestätigen, dass dein Code grundsätzlich funktioniert. Ich kann den Fehler aber nicht nachvollziehen.
Und das hilft dir vermutlich nicht weiter.

Gruß
Josef
Meine Suchmaschine: www.fireball.de | Access-Wiki: www.dbwiki.de
Joss
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 157
Registriert: 20. Okt 2012, 11:38

Re: Navigationsbereich ausblenden

Beitragvon Joss » 16. Jan 2018, 14:30

Hallo Dieterlem,

ich habe gerade nochmal getestet.
Der Code funktioniert nur, wenn das Tabellenmenü geöffnet/ausgeklappt ist.
Wenn das Tabellenmenü geschlossen ist, wird mit dem Code das aktuelle Formular geschlossen.

Gruß
Josef
Meine Suchmaschine: www.fireball.de | Access-Wiki: www.dbwiki.de
Joss
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 157
Registriert: 20. Okt 2012, 11:38

Re: Navigationsbereich ausblenden

Beitragvon Dieterlem2 » 16. Jan 2018, 22:46

Danke. Ich werde das mal testen ob ich zuvor das Tabellen Menü öffnen kann.
Dieterlem2
 

Re: Navigationsbereich ausblenden

Beitragvon Bruder Tom » 16. Jan 2018, 23:23

Code: Alles auswählen
DoCmd.NavigateTo "acNavigationCategoryObjectType", "acNavigationGroupTables"
DoCmd.SelectObject acTable, vbNullString, True
DoCmd.RunCommand acCmdWindowHide

Und die Ribbons werden hiermit ausgeblendet.
Code: Alles auswählen
DoCmd.ShowToolbar "Ribbon", acToolbarNo

Eingeblendet wird das Ganze mit
Code: Alles auswählen
DoCmd.SelectObject acTable, , True
DoCmd.ShowToolbar "Ribbon", acToolbarYes

Klappt unter Access 2016 hervorragend.
Viele Grüße
Bruder Tom
Bruder Tom
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 90
Registriert: 05. Jun 2013, 11:45

Re: Navigationsbereich ausblenden

Beitragvon Dieterlem » 17. Jan 2018, 08:02

Danke Bruder Tom
Access Anfänger
Dieterlem
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 143
Registriert: 04. Mär 2007, 20:15
Wohnort: Pfalz

Re: Navigationsbereich ausblenden

Beitragvon Joss » 17. Jan 2018, 13:09

Als Nachtrag noch ein Link zum DBWiki.
http://dbwiki.net/wiki/VBA_Tipp:_Navigationsbereich_aus/einblenden

Gruß
Josef
Meine Suchmaschine: www.fireball.de | Access-Wiki: www.dbwiki.de
Joss
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 157
Registriert: 20. Okt 2012, 11:38


Zurück zu Access Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 9 Gäste