In Excel kann man ein Command Bar Menü wie folgt Programmieren.
Dieses Menü erscheint dann bei den bekannten Menüs Datei, Bearbeiten,Ansicht… Es wird einfach am Ende angefügt.
Meine Frage: "Kann man in Acces auch ein solches Menü erstellen, welches sich hinter das letzte Menü (z.B. Extras) in der Menüleiste schreibt?
Wenn Ja, wie sieht ein solcher Code aus?
Kann die Menü Reihenfolge zwischen den vorhandenen (Datei, Bearbeiten, Extras…) und dem neuen geändert werden?
Public Sub CreateMenu()
Set ComBar = Application.CommandBars(„Worksheet Menu Bar“).Controls.Add(msoControlPopup, , , , True)
With ComBar
.Caption = „&LP Steuerung“
.BeginGroup = False
End With
If ComBar Is Nothing Then Exit Sub
With ComBar.Controls.Add(msoControlButton, 1, , , True)
.Caption = „&Suchen…“
.OnAction = „mCommandBars.Sucher“
End With
Set ComBarMenu = ComBar.Controls.Add(msoControlPopup, 1, , , True)
With ComBarMenu
.Caption = „&Daten Export“
.Tag = „Menu Daten Export“
.BeginGroup = True
End With
…
End Sub
Damit das Menü auch ja wieder gelöscht wird, wird in Excel beispielsweised follgenden Code Verwendent:
Public Sub RemoveMenu()
On Error Resume Next
Application.CommandBars(„Worksheet Menu Bar“).Controls(„LP Steuerung“).Delete
End Sub
Wie sieht dieser Löschcode in Access aus?
Besten Dank für jeden Hinweis
MFG Sebastian