Options for replacing toolbars in XL 2007

[XP]

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.

 

[Ron de Bruin]

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

 

[XP]

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]

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

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

 

[XP]

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]

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

 

[XP]

Okay, yes, I installed your code and it runs perfectly. No "Add-Ins" tab
created, but the menu appears in the popup; nice approach.

If you don't mind, I'll adapt to my purposes...

I wonder what the hangup is on the "PivotChart" menu...?

Thanks again.

 

[Ron de Bruin]

I wonder what the hangup is on the "PivotChart" menu...?

There are more problems in 2007 <g>

Thanks for testing
I will report this to MS

 

[va]

At ToolbarToggle, we have created an add-in for Word, Excel and PowerPoint
that brings back the original Office 2003 menus and toolbars into Office 2007
for less than $20.

Besides being able to customize and add unlimited toolbars and menu items,
ToolbarToggle allows the old style floating and docking anywhere. Through a
key press, you can turn the Ribbon on or off, turn the commandbars and menus
on or off as well REPLACE the Ribbon entirely. ToolbarToggle even accepts
shortcut keys (Alt+F, Alt+E, etc..).

Please try the demo let us know if you feel this helps solve your problems.

You can download ToolbarToggle from:
http://www.toolbartoggle.com