Como desabilitar as funções cortar, copiar e colar no Excel?

Suponha que você tenha uma pasta de trabalho com dados importantes que você precisa proteger de serem cortados, copiados e colados. Como conseguir isso? Este artigo fornece um método VBA para você desabilitar as funções cortar, copiar e colar ao mesmo tempo em uma pasta de trabalho do Excel.

Desative as funções cortar, copiar e colar com o código VBA

Desative as funções cortar, copiar e colar com o código VBA

Faça o seguinte para desativar as funções cortar, copiar e colar em uma pasta de trabalho do Excel.

1. Na pasta de trabalho, você precisa desativar as funções de cortar, copiar e colar, pressione o outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, por favor clique duas vezes Esta pasta de trabalho no lado esquerdo Projeto painel e, em seguida, copie e cole o código VBA abaixo no Esta Pasta de Trabalho (Código) janela. Veja a imagem:

Código VBA: desative as funções cortar, copiar e colar ao mesmo tempo no Excel

Private Sub Workbook_Activate()
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub

Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.CutCopyMode = False
End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
Application.CutCopyMode = False
End Sub

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Application.CutCopyMode = False
End Sub

3. Em seguida, pressione o outro + Q chaves para sair do Microsoft Visual Basic para Aplicações janela.

Agora você não pode cortar ou copiar dados desta pasta de trabalho, enquanto isso, os dados que você copiou de outras planilhas ou pastas de trabalho não podem ser colados nesta pasta de trabalho.

Note: A função arrastar e soltar também é desabilitada após a execução do código VBA acima.

Desbloqueie o Excel Magic com Kutools AI

• Execução Inteligente: execute operações em células, analise dados e crie gráficos, tudo orientado por comandos simples.
• Fórmulas personalizadas: gere fórmulas personalizadas para agilizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmula: Entenda fórmulas complexas com facilidade.
• Tradução do texto: Quebre as barreiras linguísticas nas suas planilhas.

Aprimore seus recursos do Excel com ferramentas baseadas em IA. Faça o download e experimente eficiência como nunca antes!

Artigos relacionados:

• Como desativar o clique com o botão direito na guia da planilha no Excel?
• Como desativar o menu do botão direito na planilha especificada ou na pasta de trabalho inteira do Excel?
• Como prevenir ou desabilitar o modo de edição clicando duas vezes na célula no Excel?