UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

6luishao6


Hola a todos, tengo una duda, quisiera deshabilitar estas opciones que tienen las hojas de Excel al darle clip derecho sale estas opciones:
 
Insertar
Eliminar
Cambiar nombre
Mover o copiar
Ver código
Color de etiqueta
Proteger hoja
Ocultar.
 
Ojo, no quiero hacer la protección de libro; vi esto en un archivo de Excel sin la necesidad de proteger el libro, pero lo malo es que dicho archivo está protegido por vba.
 
Creo que esa opción lo hace una macro.
 

Gracias.

servando


Buen día a tod@s.

Una posible solución podría ser utilizando un evento del libro "Workbook_Open()"

Private Sub Workbook_Open()
    DesactivarMenu
End Sub

para deshabilitar el menú con el que llamamos al procedimiento DesactivarMenu()

Sub DesactivarMenu()  
    CommandBars("Ply").Enabled = False
End Sub

para habilitar el menú utilizamos el evento de libro "Workbook_BeforeClose(Cancel As Boolean)"

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   ActivarMenu
End Sub

con el que llamamos al procedimiento de habilitar menú "AxtivarMenu" para tenerlo dispuesto en el resto de las hojas que utilicemos

Sub ActivarMenu()
    CommandBars("Ply").Enabled = True
End Sub

Adjunto hoja con lo descrito.

Un saludo desde Vitoria, Servando
Archivos
DeshabilitarMenú.xls
No tienes los permisos para descargar los archivos.
(52 KB)

6luishao6


Gracias, servando muchas gracias era exactamente lo que buscaba...

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.