Here it is

If I use this two testers the problem is only this menu that create the add-in tab
"PivotChart Menu

If I check for it no add-ins tab will be created

Do you see the same results ?

Note : From Jon Peltier in a older thread
It appears in those popups that relate to the worksheet
(such as Cell, Row, Column, etc.) but not in those relating to shapes or
charts, and that is where these enhanced popups are most needed.


Sub AddPopup()
Dim cb As CommandBar
Dim ctl As CommandBarButton
Dim I As Integer
For Each cb In Application.CommandBars
If cb.Type = msoBarTypePopup And cb.BuiltIn And cb.Name < "PivotChart Menu" Then
I = I + 1
cb.Reset
Set ctl = cb.Controls.Add(Type:=msoControlButton)
ctl.Caption = "MyMenu " & cb.Name
ctl.FaceId = 80
ctl.Visible = True
Debug.Print cb.Name
End If
Next
MsgBox I
End Sub

Sub ResetPopup()
Dim cb As CommandBar
Dim ctl As CommandBarButton
Dim I As Integer
For Each cb In Application.CommandBars
If cb.Type = msoBarTypePopup And cb.BuiltIn Then
I = I + 1
cb.Reset
End If
Next
MsgBox I
End Sub



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"XP" wrote in message ...
Hi Ron,

I'm sorry, I don't see your reply about the "Add-Ins"; but I did find that
if I only modify two or three specifically named popup menus, then the
"Add-ins" tab does not appear...



"Ron de Bruin" wrote:

About your other thread
"Hide or delete "Add-Ins" in ribbon"

Do you get the same results as me in the test macro

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"XP" wrote in message ...
Hi Ron,

YES!! I like!!!

Thanks so much; your site is extremely helpful!!! Thanks for all the time
you have put into this!!!

"Ron de Bruin" wrote:

Hi Xp

Maybe you like this (easy)
http://www.rondebruin.nl/qat.htm

If you have more time read this page to create your own tab on the ribbon
http://www.rondebruin.nl/ribbon.htm


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"XP" wrote in message ...
In the past I have used custom toolbars (lots of them) because then users
could use the tools on the custom toolbars in any workbook they are currently
in.

In XL 2007, as I understand it, one cannot create a new toolbar. What should
I look at to replace this functionality? Add a tab to the Ribbon? If so, will
changes to the Ribbon stay with the application or are they workbook
specific? Are there other options/suggestions?

Thanks much in advance for your assistance/guidance.