Deshabilitar Personalizar

Hola Adriano,

Para las versiones Excel 97 y 2000 podrias usar una de las siguientes
opciones:

1) Application.CommandBars("Toolbar list").Enabled = False
pero el problema esta en que el usuario sigue teniendo la posibilidad (si es
que la conoce o se le ocurre) de hacer doble-clic sobre el area gris donde
se encuentran las barras de menus y herramientas para abrir el dilogo
Personalizar :-((

2) Esta opcion desabilita tambien la posibilidad de hacer doble-clic, pero
lo hace para todo, es decir no se podra usar doble-clic en ninguna parte de
la aplicacion :-(( (eso hasta que hagas: Application.OnDoubleClick = "" ).
Coloca este codigo en un modulo estandar - no de hoja, libro o formulario.

'--Inicio Codigo--
Sub DeshabilitarPersonalizacion()
Application.CommandBars("Toolbar list").Enabled = False
Application.OnDoubleClick = "PasoDeTi"
End Sub

Sub PasoDeTi()
End Sub
'--Fin Codigo--

Para Excel 2002 o superior creo que bastaria con:

Application.CommandBars.DisableCustomize = True

Saludos,
KL


"Adriano D'Ambra" wrote in message
news:

Hola a todos, tanto tiempo.
Volví por estos pagos.

Les cuento, quiero deshabilitar botones de las barras de herramientas. Lo
hice tomando las pautas de KL y anduvo todo ok. Pero me di cuenta que
ahora tengo que deshabilitar la opción Personalizar que se accede desde el
menú Contextual al hacer botón derecho sobre las barras de herramientas,
porque sino nada impide que el usuario cree una nueva barra y tire en ella
los botones que yo deshabilité.
Lo que sí pude hacer es hacer que las barras existentes no puedan ser
Customizadas.
Pero cómo impido con las nuevas???

Estoy accediendo justamente a

Application.CommandBars("Built-in
Menus").Controls(9).Controls(797).Enabled = False

y nada!
Y se supone que está accediendo a esa opción de menú.

Alguna pista???

Saludos.
Adriano