ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Built in Commandbars (https://www.excelbanter.com/excel-programming/273180-built-commandbars.html)

Dave Martin

Built in Commandbars
 
I'm looking for a way to add some custom controls to some built-in
commandbars in Excel 2000. This is easy for the Worksheet menubar, but I
can't find the names or index of such built in commandbars as the shortcut
menu that pops up when the user right clicks, say, the y axis on an embedded
chart. Can someone suggest where I can find a list of Excel's Built in
commandbars and how I can intercept the right click event on the axis and
add my own controls to the resulting shortcut menu?

Thanks.



Ron de Bruin

Built in Commandbars
 
http://support.microsoft.com/default...b;en-us;213552
XL2000: List of ID Numbers for Built-In CommandBar Controls

Here you can find them Dave

--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"Dave Martin" wrote in message ...
I'm looking for a way to add some custom controls to some built-in
commandbars in Excel 2000. This is easy for the Worksheet menubar, but I
can't find the names or index of such built in commandbars as the shortcut
menu that pops up when the user right clicks, say, the y axis on an embedded
chart. Can someone suggest where I can find a list of Excel's Built in
commandbars and how I can intercept the right click event on the axis and
add my own controls to the resulting shortcut menu?

Thanks.





Jon Peltier[_3_]

Built in Commandbars
 
Dave -

I found a piece of code to list command bars at

http://www.excel-center.com/mailing/031198h.htm

and I added a column for Type:

'Place the code below into the standard module
Sub FullMenu()
Dim Cbar As CommandBar
Dim i%
Cells(1, 1) = "Name"
Cells(1, 2) = "Local Name"
Cells(1, 3) = "Visible"
Cells(1, 4) = "Type"
i = 2
For Each Cbar In CommandBars
i = i + 1
Cells(i, 1) = Cbar.Name
Cells(i, 2) = Cbar.NameLocal
Cells(i, 3) = Cbar.Visible
Select Case Cbar.Type
Case 0
Cells(i, 4) = "Menu Bar"
Case 1
Cells(i, 4) = "Normal"
Case 2
Cells(i, 4) = "Pop Up"
End Select
Next
Columns("A:D").AutoFit
End Sub

- Jon
-------
Jon Peltier, Microsoft Excel MVP
http://www.geocities.com/jonpeltier/Excel/index.html
_______

Dave Martin wrote:
I'm looking for a way to add some custom controls to some built-in
commandbars in Excel 2000. This is easy for the Worksheet menubar, but I
can't find the names or index of such built in commandbars as the shortcut
menu that pops up when the user right clicks, say, the y axis on an embedded
chart. Can someone suggest where I can find a list of Excel's Built in
commandbars and how I can intercept the right click event on the axis and
add my own controls to the resulting shortcut menu?

Thanks.





All times are GMT +1. The time now is 05:49 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com