Use

Application.CommandBars("Worksheet Menu Bar").Controls("Tools").Enabled = False



--
Regards Ron de Bruin
http://www.rondebruin.nl



"Arturo" wrote in message ...
Yes
2003 SP1

"Ron de Bruin" wrote:

Do you use a English version ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"Arturo" wrote in message ...
Private Sub Workbook_Open()
CommandBars("Worksheet Menu Bar").Controls("Tools").Enabled = False
End Sub

Object variable or With Block not set
Run-time error '91'

Perplexed why this line works fine in an old project but not here. Correct
object library is checked - looking into KB...

Thanks,
Arturo