Inhabilitar la opción de borrar contenido en excel
Tengo en mi archivo inhabilitada la función de suprimir la información a través de la tecla suprimir y de cortar a través del icono del menú, pero si me posiciono sobre una celda y presiono el botón derecho del ratón la opción de borrar contenido del menú emergente me permite borrar la información, mi pregunta es: ¿Hay algún código que me inhabilite este opción?
1 Respuesta
Como no comprendí del todo cuáles son los controles que necesitas inhabilitar, te dejo una macro que te servirá para reconocer los nros y nombres y así poder disponer de ellos:
Sub identificaControl()
'x Elsamatilde
'para conocer los nros y nombres de cada opción del menú al clic derecho
Set CtrlClicDerecho = Application.CommandBars("Cell")
For Each ctrl In CtrlClicDerecho.Controls
'muestra el nro y texto de la opción
MsgBox ctrl.ID & " " & ctrl.Caption
Next ctrl
End SubAhora, una vez que ya sepas cuáles son los que necesitas inhabilitar, esta macro te servirá para ello. En mi ejemplo solo lo hice con 2 controles.
Sub inhabilitaControl()
'x Elsamatilde
'inhabilita los controles Cortar y Eliminar
Set CtrlClicDerecho = Application.CommandBars("Cell")
CtrlClicDerecho.FindControl(ID:=2).Enabled = False 'cortar
CtrlClicDerecho.FindControl(ID:=292).Enabled = False 'eliminar
End SubLa segunda macro la debes ejecutar con valores en TRUE al salir del libro, por ej en el evento BeforeClose.
