Disable Tools, Protect, Protect Workbook

[Paul Moles]

Within a macro I am using

..CommandBars("Tools").Controls("Protection").Enabled = False

However this disables the entire Tools, Protection menu item.

I only want to disable Tools, Protection, Protect Workbook,

This because the workbook is password protected by macro when it is closed
and a user, users password protecting the workbook mid session is causing
problems.

Users need access to Tools Protection Unprotect Sheet during session.

Many Thanks

Paul Moles

 

[Ron de Bruin]

Try this Paul

Application.CommandBars("Worksheet Menu Bar").FindControl _
(ID:=894, Recursive:=True).Enabled = False


More info you can find here
http://www.rondebruin.com/menuid.htm