I am using the following commands to disable certain options for a specific
workbook. However, if any other workbooks are open, these same options are
also disable for them. How can I disable commands only for a specific
workbook rather than all open workbooks? Thanks.

Application.CommandBars.Item("Data").Controls.Item("Filter").Controls.Item("&Advanced Filter...").Enabled = False
Application.CommandBars.Item("Tools").Controls.Item("&Customize...").Enabled
= False
Application.CommandBars("Toolbar List").Enabled = False


--
Steve C

Hi Steve

Read the Information part (3)
http://www.rondebruin.nl/menuid.htm

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Steve C" <(E-Mail Removed)> wrote in message news:E327109F-4D60-405B-96C9-(E-Mail Removed)...
>I am using the following commands to disable certain options for a specific
> workbook. However, if any other workbooks are open, these same options are
> also disable for them. How can I disable commands only for a specific
> workbook rather than all open workbooks? Thanks.
>
> Application.CommandBars.Item("Data").Controls.Item("Filter").Controls.Item("&Advanced Filter...").Enabled = False
> Application.CommandBars.Item("Tools").Controls.Item("&Customize...").Enabled
> = False
> Application.CommandBars("Toolbar List").Enabled = False
>
>
> --
> Steve C

These are application level settings. Therefore you would need to set them
each time a workbook became active. Instantiate application level events in
this workbook and use the WorkbookActivate and WorkbookDeactivate events to
control the settings

http://www.cpearson.com/excel/appevent.htm

--
Regards,
Tom Ogilvy


"Steve C" wrote:

> I am using the following commands to disable certain options for a specific
> workbook. However, if any other workbooks are open, these same options are
> also disable for them. How can I disable commands only for a specific
> workbook rather than all open workbooks? Thanks.
>
> Application.CommandBars.Item("Data").Controls.Item("Filter").Controls.Item("&Advanced Filter...").Enabled = False
> Application.CommandBars.Item("Tools").Controls.Item("&Customize...").Enabled
> = False
> Application.CommandBars("Toolbar List").Enabled = False
>
>
> --
> Steve C

Thank you both!
--
Steve C


"Tom Ogilvy" wrote:

> These are application level settings. Therefore you would need to set them
> each time a workbook became active. Instantiate application level events in
> this workbook and use the WorkbookActivate and WorkbookDeactivate events to
> control the settings
>
> http://www.cpearson.com/excel/appevent.htm
>
> --
> Regards,
> Tom Ogilvy
>
>
> "Steve C" wrote:
>
> > I am using the following commands to disable certain options for a specific
> > workbook. However, if any other workbooks are open, these same options are
> > also disable for them. How can I disable commands only for a specific
> > workbook rather than all open workbooks? Thanks.
> >
> > Application.CommandBars.Item("Data").Controls.Item("Filter").Controls.Item("&Advanced Filter...").Enabled = False
> > Application.CommandBars.Item("Tools").Controls.Item("&Customize...").Enabled
> > = False
> > Application.CommandBars("Toolbar List").Enabled = False
> >
> >
> > --
> > Steve C