Application.CommandBars Help

[gti_jobert]

Hello,

I have the following code;

Please Login or Register  to view this content.

The code above seems to work fine, it removes all command bars from the excel application.....but when I activate other sheets a grey box (toolbar box - when I right-click it promts 'customize') appears at the top of my excel sheets that covers the top of the vertical scroll bar and can look untidy - why does this appear after selecting other sheets, and how do I get rid of it?

TIA

[Jim Thomlinson]

Does that code hide the command bars? I see bar.eneabled = True which enables
the bar, but nothing to hide the bar... (bar.visible = false). Not to mention
how do you get the original bars back at the end with this code since you do
not store the bar indecies or names anywhere???
--
HTH...

Jim Thomlinson


"gti_jobert" wrote:

>
> Hello,
>
> I have the following code;
>
>
> Code:
> --------------------
>
> Private Sub Workbook_Open()
> Sheets("Menu").Activate
> Range("C7").Select
>
> If Application.UserName = "xxxxxx" Then
> ActiveWindow.DisplayWorkbookTabs = False
> For Each bar In Application.CommandBars
> bar.Enabled = True
> Next
> With Application
> .DisplayFormulaBar = False
> End With
> End If
> End Sub
>
> --------------------
>
>
> The code above seems to work fine, it removes all command bars from the
> excel application.....but when I activate other sheets a grey box
> (toolbar box - when I right-click it promts 'customize') appears at the
> top of my excel sheets that covers the top of the vertical scroll bar
> and can look untidy - why does this appear after selecting other
> sheets, and how do I get rid of it?
>
> TIA
>
>
> --
> gti_jobert
> ------------------------------------------------------------------------
> gti_jobert's Profile: http://www.excelforum.com/member.php...o&userid=30634
> View this thread: http://www.excelforum.com/showthread...hreadid=551810
>
>