<div>
hi Ben,<br />
<br />
here are a couple articles by Dale Fye that should be helpful:<br />
<br />
Understanding and using CommandBars (ShortCut menus), Part 1<br />
<a href="https://www.experts-exchange.com/articles/11333/Understanding-and-using-CommandBars-ShortCut-menus-Part-1.html" rel="ugc">https://www.experts-exchange.com/articles/11333/Understanding-and-using-CommandBars-ShortCut-menus-Part-1.html</a><br />
<br />
Understanding and using CommandBars, Part II (Creating your own) <br />
<a href="https://www.experts-exchange.com/Microsoft/Development/MS_Access/A_12904-Understanding-and-using-CommandBars-Part-II-Creating-your-own.html" rel="ugc">https://www.experts-exchange.com/Microsoft/Development/MS_Access/A_12904-Understanding-and-using-CommandBars-Part-II-Creating-your-own.html</a><br />
<br />
have an awesome day,<br />
crystal
</div>


<div>
Let's keep this simple. &nbsp;Just get Dale's Right Click Shortcut Tool.<br />
I helped him beta test this for more that a year. I use if frequently.<br />
No code to write. Completely blows away the original Microsoft Custom Command Bar tool (which is deprecated).<br />
<br />
<b><a href="http://dev-soln.com/index.php/shortcuttool" rel="ugc">http://dev-soln.com/index.php/shortcuttool</a> </b><br />
<br />
Just do it and thank me later.
</div>


<div>
@Crystal,<br />
(from that link)<br />

<blockquote>
<br />
In Access versions prior to 2007 there was a convenient method for creating shortcut menus, but that method was eliminated in Access 2007. 
</blockquote>
This link seems to refer to A2007, while I'm basically looking for the &quot;Convenient method&quot; that was avail in 2003..Since I've never use it, would like some hints how to get started..<br />
<br />
@Joe,<br />
If you say that is simpler than the Access build in tool, I will try that..<br />
<br />
Thanks,<br />
Ben
</div>


<div>
well ... maybe I am misunderstanding what you are looking for<br />
<br />
&quot;FYI- I'm designing this in Access 2003, but users will have A2007+ runtime in their pc.&quot;<br />
A2003? &nbsp;But the image is A2007, right?<br />
You can still create custom right click menus in A2003 ... and even if you convert an MDB to ACCDB (including RT) ... those custom right click menus will still be there in A2007. BUT ... within the A2007 environment itself, there is no tool to modify those menus (only via code). Hence ... enter Dale's shortcut tool.<br />
<br />
??
</div>


<div>
@Joe,<br />

<blockquote>
A2003? &nbsp;But the image is A2007, right?
</blockquote>
No, guess you have already forgotten how Access 2003 looked like-:)<br />
<br />
Anyway what I'm looking is for simply introduction in short of how you start creating menu bars in 2003 <b>the easiest manner</b> (at least for now..).<br />
<br />
I never used this before, however now since we upgraded our Office to 2016 (all besides Access), everything started to get slow in my app..and I was told to use runtime as a fix, but there comes the problem that runtime does not have right click menus avail..<br />
<br />
Detailed above what was already tried and failed..<br />
<br />
Thanks,<br />
Ben
</div>


<div>
Wow ... I guess so, lol.<br />
OK ... so if you are in A2003 ... Dale's tool cannot be used.<br />
So ... in A2003 ... (it's been AWHILE) ... and I do not have an A2003 system so I cannot do screenshots (sadly), but you s/b be able to right click (no pun) over a blank area of a menu bar (I think) ... and select Customize. &nbsp;Then to get to the Right Click menus ... you have to select Shortcuts in the list. &nbsp;This I think opens up a separate floating bar of existing right click menus ... and from here ... you can customize existing menus or create a new one from scratch. Sorry, I am REALLY guessing here. &nbsp;I used to do this ALL the time - every app. But now I use Dale's tool in A2010/2013/2016 ACCDBs.<br />
<br />
Crystal ... do you still have A2003 somewhere ??<br />
<br />
BEN ... try Googling 'create custom right click menus in Access 2003' ... there is a load of hits. &nbsp;Try to find one with screenshots using the Customize Dialog.
</div>


<div>
Joe, not too accessible, but I dug up some code ...<br />
<br />
hi Ben,<br />
<br />
I really like the way the custom toolbars used to work ... I used them a lot. &nbsp;The good news is that when the database is converted to 2007, they convert as well, if I recall right (I don't think this code run in 2007 though). &nbsp;However, I will tell you it is a good idea to develop in the same version as your users. Access 2007 uses the ribbon, not toolbars.<br />
<br />
&nbsp;this is for Excel, but Access would be similar ... I'll keep my eye open for an old database with custom menubars too 
<pre><code class="code-10 nolinks" id="code-20-42417111-1"><span>Sub RemoveMenubar(psToolBarName As String)</span>
<span>'strive4peace</span>
<span>    On Error Resume Next</span>
<span>    Application.CommandBars(psToolBarName).Delete</span>
<span>    On Error GoTo 0</span>
<span>End Sub</span>
<span></span>
<span>'===========================================</span>
<span>Sub CreateMenubar()</span>
<span>'strive4peace</span>
<span></span>
<span>   Dim i As Integer _</span>
<span>      , sToolBarName As String</span>
<span></span>
<span>   Dim asMacroName As Variant _</span>
<span>      , asCaptions As Variant _</span>
<span>      , asTooltips As Variant</span>
<span></span>
<span>   sToolBarName = &quot;MyToolBarName&quot;</span>
<span>   </span>
<span>   'remove toolbar if it is already there</span>
<span>   Call RemoveMenubar(sToolBarName)</span>
<span>   </span>
<span>   asMacroName = Array(&quot;FirstMacro&quot;, &quot;SecondMacro&quot;)</span>
<span>   asCaptions = Array(&quot;First Caption&quot;, &quot;Second Caption&quot;)</span>
<span>   asTooltips = Array(&quot;First Tip&quot;, &quot;Second Tip&quot;)</span>
<span>      </span>
<span>   With Application.CommandBars.Add</span>
<span>      .Name = sToolBarName</span>
<span>      .Left = 100</span>
<span>      .Top = 100</span>
<span>      .Protection = msoBarNoProtection 'msoBarNoProtection=0</span>
<span>      .Visible = True</span>
<span>      .Position = msoBarFloating 'msoBarFloating=4</span>
<span>      </span>
<span>      For i = LBound(asMacroName) To UBound(asMacroName)</span>
<span>         With .Controls.Add(Type:=msoControlButton) 'msoControlButton=1</span>
<span>            .OnAction = &quot;'&quot; &amp; ThisWorkbook.Name &amp; &quot;'!&quot; &amp; asMacroName(i)</span>
<span>            .Caption = asCaptions = (i)</span>
<span>            .Style = msoButtonIconAndCaption 'msoButtonIconAndCaption=3</span>
<span>            .FaceId = 72 + i</span>
<span>            .TooltipText = asTooltips(i)</span>
<span>         End With</span>
<span>      Next i</span>
<span>   End With</span>
<span>End Sub</span>
</code></pre>
 I can't test this right now ... so hope if it doesn't work quite right, you can fix it ~<br />
<br />
have an awesome day,<br />
crystal
</div>


<div>
Crystal ... not looking for code.<br />
Looking for screen shots of the original Customize Dialog ... which seem to be in the link above.
</div>


<div>
Hi experts,<br />
<br />

<blockquote>
not looking for code.
</blockquote>
Right, my main point is to use the simplest (fastest) way to accomplish it, will deal with enhancements later..<br />
<br />

<blockquote>
... which seem to be in the link above.
</blockquote>
Which link contained screenshots of A2003?<br />
<br />
Thanks,<br />
Ben
</div>


<div>
wow ... that is ODD. &nbsp;No link. &nbsp;Not sure what happened.<br />
let me see if I can find it again ...
</div>


<div>
Hi Joe,<br />
<br />
See attached how I have tried (custom 2), any idea why doesn't it show up as an option to select (see 2nd attachment drop down)?<br />
<br />
Thanks,<br />
Ben<br />
<a href="https://filedb.experts-exchange.com/incoming/2017/12_w52/1216963/Untitled.png" target="_blank" class="file-inline" title="1 (17 KB)"><svg xmlns="http://www.w3.org/2000/svg" viewBox="0 0 512 512"><path d="M67.508 468.467c-58.005-58.013-58.016-151.92 0-209.943l225.011-225.04c44.643-44.645 117.279-44.645 161.92 0 44.743 44.749 44.753 117.186 0 161.944l-189.465 189.49c-31.41 31.413-82.518 31.412-113.926.001-31.479-31.482-31.49-82.453 0-113.944L311.51 110.491c4.687-4.687 12.286-4.687 16.972 0l16.967 16.971c4.685 4.686 4.685 12.283 0 16.969L184.983 304.917c-12.724 12.724-12.73 33.328 0 46.058 12.696 12.697 33.356 12.699 46.054-.001l189.465-189.489c25.987-25.989 25.994-68.06.001-94.056-25.931-25.934-68.119-25.932-94.049 0l-225.01 225.039c-39.249 39.252-39.258 102.795-.001 142.057 39.285 39.29 102.885 39.287 142.162-.028A739446.174 739446.174 0 0 1 439.497 238.49c4.686-4.687 12.282-4.684 16.969.004l16.967 16.971c4.685 4.686 4.689 12.279.004 16.965a755654.128 755654.128 0 0 0-195.881 195.996c-58.034 58.092-152.004 58.093-210.048.041z"/></svg>Untitled.png</a><br />
<a href="https://filedb.experts-exchange.com/incoming/2017/12_w52/1216964/Untitled.png" target="_blank" class="file-inline" title="2 (21 KB)"><svg xmlns="http://www.w3.org/2000/svg" viewBox="0 0 512 512"><path d="M67.508 468.467c-58.005-58.013-58.016-151.92 0-209.943l225.011-225.04c44.643-44.645 117.279-44.645 161.92 0 44.743 44.749 44.753 117.186 0 161.944l-189.465 189.49c-31.41 31.413-82.518 31.412-113.926.001-31.479-31.482-31.49-82.453 0-113.944L311.51 110.491c4.687-4.687 12.286-4.687 16.972 0l16.967 16.971c4.685 4.686 4.685 12.283 0 16.969L184.983 304.917c-12.724 12.724-12.73 33.328 0 46.058 12.696 12.697 33.356 12.699 46.054-.001l189.465-189.489c25.987-25.989 25.994-68.06.001-94.056-25.931-25.934-68.119-25.932-94.049 0l-225.01 225.039c-39.249 39.252-39.258 102.795-.001 142.057 39.285 39.29 102.885 39.287 142.162-.028A739446.174 739446.174 0 0 1 439.497 238.49c4.686-4.687 12.282-4.684 16.969.004l16.967 16.971c4.685 4.686 4.689 12.279.004 16.965a755654.128 755654.128 0 0 0-195.881 195.996c-58.034 58.092-152.004 58.093-210.048.041z"/></svg>Untitled.png</a>
</div>


Untitled.png

<div>
See attached how custom 2 looks like.<br />
This is what I want should appear when user right clicks anywhere in the form.<br />
<br />
Thanks,<br />
Ben<br />
<a href="https://filedb.experts-exchange.com/incoming/2017/12_w52/1216965/Untitled.png" target="_blank" class="file-inline" title="1 (48 KB)"><svg xmlns="http://www.w3.org/2000/svg" viewBox="0 0 512 512"><path d="M67.508 468.467c-58.005-58.013-58.016-151.92 0-209.943l225.011-225.04c44.643-44.645 117.279-44.645 161.92 0 44.743 44.749 44.753 117.186 0 161.944l-189.465 189.49c-31.41 31.413-82.518 31.412-113.926.001-31.479-31.482-31.49-82.453 0-113.944L311.51 110.491c4.687-4.687 12.286-4.687 16.972 0l16.967 16.971c4.685 4.686 4.685 12.283 0 16.969L184.983 304.917c-12.724 12.724-12.73 33.328 0 46.058 12.696 12.697 33.356 12.699 46.054-.001l189.465-189.489c25.987-25.989 25.994-68.06.001-94.056-25.931-25.934-68.119-25.932-94.049 0l-225.01 225.039c-39.249 39.252-39.258 102.795-.001 142.057 39.285 39.29 102.885 39.287 142.162-.028A739446.174 739446.174 0 0 1 439.497 238.49c4.686-4.687 12.282-4.684 16.969.004l16.967 16.971c4.685 4.686 4.689 12.279.004 16.965a755654.128 755654.128 0 0 0-195.881 195.996c-58.034 58.092-152.004 58.093-210.048.041z"/></svg>Untitled.png</a>
</div>


<div>
Great, this is the piece I was missing all the way along.<br />
Thank you!
</div>


<div>
You're welcome.<br />
Keep in mind if you move to ACCDB format. you will want to get Dale's tool, which is MUCH easier to use ... basically the old tool on steroids and a lot more !
</div>


<div>
<div class="content wysiwyg-content">
Hi Experts,<br />
<br />
I'm trying to create a custom menu bar to have this avail when users right click on any place in a form.<br />
See attached what currently comes up.<br />
My question is how do I add something to this list?<br />
Or at least, is there any way I can add stuff to the Custom 1 menu bar displayed there?<br />
Tried doing by customize but didnt see Custom 1 displayed there..<br />
<br />
FYI- I'm designing this in Access 2003, but users will have A2007+ runtime in their pc.<br />
<a href="https://filedb.experts-exchange.com/incoming/2017/12_w52/1216546/Untitled.png" target="_blank" class="file-inline" title="1 (120 KB)"><svg xmlns="http://www.w3.org/2000/svg" viewBox="0 0 512 512"><path d="M67.508 468.467c-58.005-58.013-58.016-151.92 0-209.943l225.011-225.04c44.643-44.645 117.279-44.645 161.92 0 44.743 44.749 44.753 117.186 0 161.944l-189.465 189.49c-31.41 31.413-82.518 31.412-113.926.001-31.479-31.482-31.49-82.453 0-113.944L311.51 110.491c4.687-4.687 12.286-4.687 16.972 0l16.967 16.971c4.685 4.686 4.685 12.283 0 16.969L184.983 304.917c-12.724 12.724-12.73 33.328 0 46.058 12.696 12.697 33.356 12.699 46.054-.001l189.465-189.489c25.987-25.989 25.994-68.06.001-94.056-25.931-25.934-68.119-25.932-94.049 0l-225.01 225.039c-39.249 39.252-39.258 102.795-.001 142.057 39.285 39.29 102.885 39.287 142.162-.028A739446.174 739446.174 0 0 1 439.497 238.49c4.686-4.687 12.282-4.684 16.969.004l16.967 16.971c4.685 4.686 4.689 12.279.004 16.965a755654.128 755654.128 0 0 0-195.881 195.996c-58.034 58.092-152.004 58.093-210.048.041z"/></svg>Untitled.png</a>
</div>
</div>


Hi Experts,

I'm trying to create a custom menu bar to have this avail when users right click on any place in a form.
See attached what currently comes up.
My question is how do I add something to this list?
Or at least, is there any way I can add stuff to the Custom 1 menu bar displayed there?
Tried doing by customize but didnt see Custom 1 displayed there..

FYI- I'm designing this in Access 2003, but users will have A2007+ runtime in their pc.

How do I create a custom menu bar?

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.