Modifying ribbon tabs?

[Shinning]

Hello,

I have the following HTML code in Custom UI editor:

<customUI ******="Sheet1.Ribbon******" xmlns="http://schemas.microsoft.com/office/2006/01/customui">
	<ribbon>
		<tabs>
			<tab idMso="TabHome" getVisible="Sheet1.GetVisible"  />
			<tab idMso="TabReview" getVisible="Sheet1.GetVisible" />
			<tab idMso="TabInsert" getVisible="Sheet1.GetVisible" />
			<tab idMso="Formulas" getVisible="Sheet1.GetVisible" />
		</tabs>
	</ribbon>
</customUI>

***********Mr. Excel.com: Why is my HTML code not showing?

In my Excel spreadsheet I have the following code in Sheet1:

Option Explicit

Dim Rib As IRibbonUI
Public myId As String

'Callback for customUI.******
Sub Ribbon******(ribbon As IRibbonUI)
    Set Rib = ribbon
    Rib.Invalidate   ' Invalidates Rib object
End Sub

Sub GetVisible(control As IRibbonControl, ByRef visible)
visible = False
End Sub

I think the above runs as follows:

As the spreadsheet is opened, the Home, review and insert tabs are hidden by setting Visible to false.
However, the formulas tab is still visible???

Can someone point out as to what I am doing wrong ?

Al I want to do is hide all the tabs except one tab which is my custom one.


Thanks all
Rn

 

[Shinning]

anyone?