desativação excluir opções em você Microsoft aplicativo Office Excel usando o Visual Basic for Applications, ou VBA, pode proteger os dados em planilhas que não devem ser modificadas. Use o evento " Workbook_SheetBeforeRightClick " para desativar a opção "Excluir " na barra de menu. Em VBA, você também pode proteger a planilha , não permitindo que o usuário a excluir qualquer conteúdo utilizando a tecla "Delete" no seu teclado. Instruções
1
lançar o Microsoft Office Excel, e digite " 1" em "A1 ", "2 " em " A2 ", "3 " em " A3 ", "4" em "A4 " e " 5 " no " A5 . " Clique na guia "Desenvolvedor" , e clique em " Visual Basic " para iniciar o Editor do VB .
2
duplo clique em " EsteLivro " do painel Project Explorer para abrir o módulo de código.
3
Copie e cole o seguinte código para desativar "Delete" na planilha :
Private Sub Workbook_SheetBeforeRightClick (ByVal Sh as Object , ByVal Target As Range, Cancel As Boolean) < br >
Dim cmdBCntrl Como pos CommandBarControl
Dim As Integer
On Error Resume Next
Sh.Protect UserInterfaceOnly : = True
Com Aplicação . . . . CommandBars ( "Cell" )
pos = Controls ( "Excluir ... " ) Índice
Set cmdBCntrl = Controls.Add (Before : = pos, Temporary : = True )
. Controles ( "Excluir ... " ) . Excluir
End With
On Error GoTo 0
End Sub
4
Volte para o Microsoft Excel e tente clicar com o botão direito em qualquer célula. O menu não irá incluir a opção " Excluir " . Pressione a tecla "Delete " no teclado e você receberá uma mensagem informando que a célula está protegida.
