DONT remove the commandbars.
most users will hate you for it.
ELSE
store the protection property of the commandbar (it's a long)
set protection to 0
THEN set the ENABLED property to false
then set the protection property back to stored value.
BUT I REPEAT
(IF YOU DONT PUT IT BACK EXACTLY THE WAY THE WERE!)
and that means under ALL circumstances.. including
errors/stateloss etc..
and do it for all views :)
... some people will get in touch with you...
and they wont be happy :)
keepITcool
< email : keepitcool chello nl (with @ and .)
< homepage:
http://members.chello.nl/keepitcool
"?B?QW5keQ==?=" wrote:
Hi,
I have a sheet and I want to hide any existing commandbars on openning
the sheet.
I'm using the code below, but it errors with -2147467259 (8004005) -
Automation Error Unspecified Error
Dim cmdbar As CommandBar
For Each cmdbar In Application.CommandBars
If cmdbar.Visible Then
cmdbar.Visible = False '<- errors on this line
End If
Next
Does anyone have any ideas?
NB We're in a mixed Excel'97 & Excel'02 environment
Also, presumably I should be saving the state/name of each visible
commandbar and then setting them back to visible on exiting
(workbook.deactivate?
Are there any neat ways of achieving this?
Many thanks for any help.
Andy