X   Site Message
(Message will auto close in 2 seconds)

Welcome to UtterAccess! Please ( Login   or   Register )

Custom Search
   Reply to this topicStart new topic
> Adding The Equals... And Contains... Filters To A Custom Shortcut Menu Using VBA, Access 2010    
post Jan 28 2019, 04:27 PM

Posts: 93
Joined: 21-January 13

Hi guys,

Hoping someone has a reference on this...

I am building a custom shortcut menu using the following type of code:

Sub CreateMyShortcutMenu()
    Dim cmbRightClick As Office.CommandBar

' Create the shortcut menu.
    Set cmbRightClick = CommandBars.Add("MyFilteringMenu", msoBarPopup, False, True)
    With cmbRightClick
        ' Add the Find command.
        .Controls.Add msoControlButton, 141, , , True
        ' Start a new grouping and add the Sort Ascending command.
        .Controls.Add(msoControlButton, 210, , , True).BeginGroup = True
        ' Add the Sort Descending command.
        .Controls.Add msoControlButton, 211, , , True


I found a list of all the ID's here:
Control ID's list from Microsoft

It has almost all the ones I want EXCEPT all of the ones that bring up a text entry box. I've attached an image of where these are in the standard Access menu and the text box it brings up.

Attached File  missing.png ( 21.34K )Number of downloads: 0

Attached File  Textbox.png ( 5.94K )Number of downloads: 1

Does anyone know what the ID's it would be for these? Or is there some reason I can't use those ones???

Go to the top of the page
post Jan 28 2019, 04:35 PM

Posts: 93
Joined: 21-January 13

Sorry, I had searched quite a bit with no luck and then after posting did come across a post that basically solves my problem.

It's here:


Go to the top of the page

Custom Search

RSSSearch   Top   Lo-Fi    23rd October 2019 - 04:51 PM