none
Kontextmenü für Access 2013 SP1 Runtime - Liste der ID's

    Frage

  • Verwende Access von Office 2013 Prof und
    will für Access 2013 SP1 Runtime ein Kontextmenü erstellen.
    Dieses wird mit VBA-Code programmiert.
    Dazu brauche ich eine Liste der ID's mit den Befehlen:
    (Type, ID, Befehl/Beschreibung)
    Beispiel:
    Type:=msoControlButton, ID:=640     ' Auswahlbasierter Filter
    Type:=msoControlButton, ID:=3017    ' Auswahlausschließender Filter

    Donnerstag, 20. August 2015 07:36

Alle Antworten

  • Ich habe keine Liste im Internet gefunden, jedoch wie folgt erstellt:

    Public Sub Liste_Menuepunkte()

    Dim i As Integer
    Dim m1 As Office.CommandBar

        On Error Resume Next
        Set m1 = CommandBars.Add("Kontextmenue_Temp", 5)
        For i = 0 To 32767
            m1.Controls.Add 1, i
        Next
        Open "C:\Temp\Liste-Menuepunkte.txt" For Append As #1
        For i = 0 To 32767
            Print #1, m1.Controls(i).ID, m1.Controls(i).Caption
        Next
        Close #1
        Application.CommandBars("Kontextmenue_Temp").Delete
    End Sub

    Donnerstag, 27. August 2015 08:47