Ribbon-Toolbar und Access 2016

[cyberchris]

Guten Morgen,

u. a. aus optischen Gründen habe ich in einer Access-Anwendung das Menü ausgeblendet.

Seit der Access Version 2016 ist leider die Ribbon-Leiste sichtbar, die ich nicht wegbekomme.
(Vorher war es Access 2010)

Mit dieser Funktion kann man die Ribbon-Leiste ausblenden:
DoCmd.ShowToolbar "Ribbon", acToolbarNo

Leider funktioniert das bei mir aber nur wenn ich die Datenbank mit der "Shift" Taste öffne.
Ansonsten bewirkt das Ausführen der Funktion über ein VBA-Code im Startformular leider nichts. D. h. wenn ich ohne Shift-Taste die DB starte.

Im Anhang habe ich mal die Datenbankeinstellungen hinzugefügt.
Muss man hier irgendetwas beachten?

Vielen Dank
Christoph

[MaggieMay]

Hallo Christoph,

was ist das für eine Menüleiste die da zum Einsatz kommt?
Warum erstellst du keinen benutzerdefinierten Ribbon?

Kannst du mal einen Screenshot zeigen, wie das mit der eingeblendeten Ribbon-Leiste aussieht? Was ist darin enthalten?

[cyberchris]

Guten Morgen,

Im Menü "PMDB" ist nichts enthalten. Das wurde mal eingebaut damit unter Office 2003 kein Menü angezeigt wird - kann sein dass das mittlerweile überflüssig ist.

Anbei auch der Kopf mit Ribbon und Ribbon_erweitert.

VG Christoph

[datekk]

Ich denke, die Leiste mit Datei / Menü usw. lässt sich nicht abschalten. Höchstens, wenn Du das Access Hauptfenster komplett ausblendest.


http://www.donkarl.com?FAQ1.11

[cyberchris]

Ok. schade.

Und warum funktioniert dies wenn ich die DB mit "Shift" starte?
Hier wird der Befehl "DoCmd.ShowToolbar "Ribbon", acToolbarNo" ausgeführt.

VG Christoph

[datekk]

Kannst Du davon mal ein Screenshot schicken wie das aussieht, wenn du Shift drückst?

[dedidado]

Hallo, vermutlich wird sie nur an irgendeiner Stelle im Startformular wieder aktiviert.
Am besten du startest die Anwendung über das Autoexec Makro und führst den Befehl nach dem Öffnen des Startformulars aus.
Ich hab es so gelöst:

Code [Auswählen] Erweitern

        Application.CommandBars("Ribbon").Visible = False
        DoCmd.ShowToolbar "Ribbon", acToolbarNo
        DoCmd.SelectObject acTable, , True
        RunCommand acCmdWindowHide

Die ersten beiden Zeilen bewirken quasi das gleiche. In der dritten setzt er den Focus auf die Navigationsleiste und blendet diese dann aus. Vielleicht hilft dir das weiter.
Gruß Dieter

[cyberchris]

Hallo zusammen,

also wenn ich Shift beim Starten drücke und das Startformular manuell öffne und der Befehl DoCmd.ShowToolbar "Ribbon", acToolbarNo damit aufgerufen wird, sieht die Leiste oben wie im Anhang aus.

Ohne Shift-Taste wird das gleiche Startformular ja automatisch geöffnet. Und im Normalbetrieb habe ich die Shift-Funktion deaktiviert, damit niemand in den Hintergrund kommt.

VG Christoph

[dedidado]

ich könnte mir vorstellen, dass die Menüleiste "PMDB" die Ribbon-Leiste aktiviert, auch wenn sie angeblich leer ist. Nimm mal die Menüleiste in den Optionen raus.

[DF6GL]

Hallo,


schreib eine Public Funktion in einem Standardmodul:


Option Compare Database
Option Explicit

Code [Auswählen] Erweitern


Public Function fktHideRibbon()
DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Function

Im Autoexec-Makro rufst Du die Funktion mit "Ausführen Code" auf.

[cyberchris]

Guten Abend zusammen,

PMDB habe ich rausgenommen - keine Veränderung.
Mit dem Makro klappt das auch nicht.

Trotzdem danke
Gruß Christoph

[dedidado]

probier mal folgendes:
das Startformular "Hauptmenu" aus den Optionen rausnehmen
im autoexec Makro die Funktion Programmstart mit "Ausführen Code" aufrufen
die Funktion Programmstart in einem Standardmodul einfügen:

Code [Auswählen] Erweitern

Public Function Programmstart()
DoCmd.OpenForm "Hauptmenu"
DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Function

[cyberchris]

Hallo,

ging leider auch nicht.
Musste den Code im Makro aber mit "Programmstart()" aufrufen.
Ohne " hat er die Funktion nicht gefunden.

Ich habe auch mal OpenForm und Ribbon ausblenden umgedreht, dass Ribbon ausblenden zuerst ausgeführt wird. Hat aber auch nichts gebracht.

VG Christoph