Add divider lines and sub-menu to right-click menu

I am using some great code that I found on the net and have modified a bit, to create my own right-click menu.

I would like to add some divider lines to the menu and also some sub-menus.

How would I be able to go about this with this code?

Please Login or Register  to view this content.

Thanks!

Originally Posted by JosephP

you've gotta use the BeginGroup property of the control to add a dividing line before it and specify the control type as msocontrolpopup to be able to add controls to it as a submenu

Thanks Joseph for helping out!
Well doing searches hasn't helped so far, so I tried a couple of things.

First I tried to insert the .BeginGroup right inside the vArr statement. That gave an error.

The last thing I tried was cutting up the array line like this:

Please Login or Register  to view this content.

Unfortunately this resulted in me losing the top half of the menu and being left with no separator, just the bottom half of the menu.

Originally Posted by JosephP

here's a basic example with arrays for the faceids, control types, groupings and parent items

Please Login or Register  to view this content.

Thanks very much Joseph this has been a huge help to me!
I have been messing around with different values to see how things work.

For now I will stick with just one level for the menu and later I'll possibly add a sub-level.
I have a couple of questions.

All of my menu items have code linked to them that executes when they are clicked.
There is one menu item that acts differently however.
The first menu item will execute when I simply hover the mouse over it!

Can you explain why this happens?

Also, my first menu item is showing an arrow, which usually would display a sub-level item.
But I don't have a sub-level item.
Can you check my code and tell me why the arrow is showing for this sub-level?

Please Login or Register  to view this content.

Originally Posted by JosephP

you need to change the first item in vType from msoControlPopup to msoControlButton ;-)

Thanks Joseph. I had tried that before but it didn't work, probably because I had more than one mistake in the code. Now it works.

I am coming along nicely now. I just have a couple of problems that still need fixing.

When I hover my mouse over Copy/Paste (which opens the sub-menus) and then I move the mouse over Del/Ins I get an error 400 message.
If I do the reverse I also get the error 400 message.

And I also get the error 400 message sometimes when I simply hover my mouse over either of these two menu items (Copy/Paste or Del/Ins).

I have put in an errortrap at the bottom of my code but it is not helping me find out the problem. I just get error 400.

I am posting my current test code below:

Please Login or Register  to view this content.