Suche | Statistiken | Benutzerliste | Access-FAQ | Datenschutz         +++++ Access-Entwickler-Konferenz AEK - Nürnberg 28./29.9. - Hannover 12./13.10. +++++ Foren
donkarl Forum
donkarl Forum ->  Themen -> Access -> Diskussion ansehen

Du bist als Gast eingelogt. ( Anmelden | Registrieren )
  • Access Stammtisch München am 09.05.2019 (Do)
  • StefanWirrer07.05.19 13:50
  • Problem bei ausführen der Runtime meiner Datenbank
  • DomiDi05.05.19 09:28
       └ RE: Problem bei ausführen der Runtime meiner Dat... Marzer07.05.19 11:28
  • Access Stammtisch München am 11.04.2019 (Do)
  • StefanWirrer09.04.19 14:01
  • Access Kontektmenüs
  • sks30.03.19 09:23
       └ RE: Access Kontektmenüs sks30.03.19 09:34
       └ RE: Access Kontektmenüs Karl Donaubauer31.03.19 21:52
          └ RE: Access Kontektmenüs sks01.04.19 18:44
  • Tabelle wird dupliziert!
  • lohfra21.03.19 17:29
       └ RE: Tabelle wird dupliziert! PeterDoering26.03.19 13:53
  • Hat jmd. Erfahrung mit Unterschriften Pads?
  • StefanWirrer18.03.19 10:17
  • Access Stammtisch München am 14.03.2019 (Do)
  • StefanWirrer14.03.19 07:54
  • Funktion ASC
  • Marzer13.03.19 09:42
       └ RE: Funktion ASC Marzer13.03.19 16:04
  • Laufzeitfehler 70 beim Löschen von csv Datei
  • Greiff08.03.19 15:31
       └ workaround: Laufzeitfehler 70 beim Löschen von c... Greiff08.03.19 16:14
  • nur ein Datensatz wird aktualisiert
  • Dreho5227.02.19 14:53
       └ RE: nur ein Datensatz wird aktualisiert Karl Donaubauer27.02.19 18:15
          └ RE: nur ein Datensatz wird aktualisiert Dreho5227.02.19 18:49
             └ RE: nur ein Datensatz wird aktualisiert Karl Donaubauer28.02.19 19:23
  • Neues Verzeichnis anlagen
  • Dreho5224.02.19 12:36
       └ RE: Neues Verzeichnis anlagen Karl Donaubauer25.02.19 09:11
       └ RE: Neues Verzeichnis anlagen sks26.02.19 09:23
  • Dokumentenpfad
  • Dreho5223.02.19 12:03
       └ RE: Dokumentenpfad PeterDoering23.02.19 23:27
  • update aus csv Datei
  • Greiff18.02.19 13:44
       └ RE: update aus csv Datei PeterDoering18.02.19 14:11
          └ RE: update aus csv Datei Greiff18.02.19 14:25
             └ RE: update aus csv Datei Greiff18.02.19 14:27
             └ RE: update aus csv Datei PeterDoering22.02.19 11:50
                └ RE: update aus csv Datei Greiff23.02.19 01:17
  • Public String in FormularTitel einfügen
  • Dreho5217.02.19 12:53
       └ RE: Public String in FormularTitel einfügen Marzer18.02.19 05:46
          └ RE: Public String in FormularTitel einfügen PeterDoering18.02.19 14:09
             └ RE: Public String in FormularTitel einfügen Marzer19.02.19 08:24
                └ RE: Public String in FormularTitel einfügen PeterDoering22.02.19 15:40
  • Wenn Wert = 1 im UFO dann Bericht Druck
  • Reiti201919.02.19 13:30
       └ RE: Wenn Wert = 1 im UFO dann Bericht Druck Marzer20.02.19 09:07
          └ RE: Wenn Wert = 1 im UFO dann Bericht Druck Reiti201920.02.19 17:40
             └ RE: Wenn Wert = 1 im UFO dann Bericht Druck Marzer22.02.19 09:49
    sks
    Gesendet: 30.03.19 09:23
    Betreff: Access Kontektmenüs


    Regular

    Beiträge: 69
    2525

    Hallo,

    nachdem das bislang von mir verwendete Kontexmenü-Addin von ABISS nicht mehr funktioniert, habe ich etwas recherchiert. Offensichtlich gibt es nichts mehr, mit dem sich Kontextmenüs (weitgehend) problemfrei erzeugen/anpassen lassen.

    Access 2003 zeigt mir auf meinem System keine Menüzeile mehr an, so dass auch die (umständliche) Bearbeitung mit der alten Version nicht mehr möglich ist. 

    Bleibt noch die Bearbeitung mittels VBA. Aber auch das funktioniert bei mir nur bedingt. Die (mit der unten stehenden Funktion) erstellten PopUp-Menüs werden nur temporär erstellt, d.h. sie sind nur so lange verfügbar, wie die Instanz läuft. Nach dem Neustart der Anwendung sind die Menüs zwar noch da, aber leer! Die ständige (temporäre) Neuanlage ist keine Option (zu lahm, Resourcenfressend). 
        
    Frage : welche Möglichkeiten gibt es, ein Kontextmenü einmal dauerhaft zu erzeugen ?
      
    Public Function CreateShortcutMenuCopyPaste()
    On Error Resume Next
    'braucht MSO.dll
    Dim MenuName As String
    Dim CB As Object
    Dim CBB As Object
       
    MenuName = "ShortcutMenuCopyPaste"
    On Error Resume Next
        Application.CommandBars(MenuName).Delete
    On Error GoTo 0
       
     Set CB = Application.CommandBars.Add(MenuName, msoBarPopup, False, False)
     Set CBB = CB.Controls.Add(msoControlButton, 19, , , True)
     Set CBB = CB.Controls.Add(msoControlButton, 22, , , True)
     Set CB = Nothing
     Set CBB = Nothing
       
    End Function



    Edited by sks 30.03.19 08:23
    Top of the page Bottom of the page


    Seite: < 1 2 3 4 5 6 7 8 ... >
    Suche in diesem Forum
    Druckfreundliche Version
    (Alle Cookies von dieser Seite löschen.)