Como evitar que outras pessoas insiram planilha no Excel?
Suponha que você tenha uma pasta de trabalho que será enviada a outros usuários para exibição ou verificação de seu conteúdo; no entanto, você não deseja que outras pessoas insiram nenhuma nova planilha nesta pasta de trabalho para evitar que ela fique bagunçada. Neste artigo, falarei sobre como evitar que outras pessoas insiram planilhas em uma pasta de trabalho.
Evite que outras pessoas insiram planilha com a função Proteger pasta de trabalho
Impedir que outras pessoas insiram planilha com código VBA
Evite que outras pessoas insiram planilha com a função Proteger pasta de trabalho
O Excel oferece um recurso - Protect Workbook para você, com ele, você pode proteger a estrutura da pasta de trabalho que não será inserida, excluída, renomeada ou fazer outras operações. Faça o seguinte:
1. Clique em Avaliações > Protect Workbook, veja a captura de tela:
2. No Proteja a estrutura e as janelas caixa de diálogo, verifique Estrutura opção e digite sua senha na caixa de texto, clique em OK para mostrar o Confirmar palavra-passe caixa de diálogo e digite novamente sua senha. Veja as capturas de tela:
3. Então clique OK para fechar as caixas de diálogo e, agora, quando você inserir uma nova planilha nesta pasta de trabalho, o recurso inserir planilha não estará disponível.
Observação: com esta função, os seguintes itens cinza também podem ser usados nesta pasta de trabalho.
Impedir que outras pessoas insiram planilha com código VBA
Se você apenas deseja evitar que outras pessoas insiram planilhas, mas também pode fazer outras operações, o método acima tem sua limitação. Aqui, o seguinte código VBA pode lhe fazer um favor.
1. Abra a pasta de trabalho que deseja desativar para inserir planilhas.
2. Em seguida, mantenha pressionado o ALT + F11 chaves, e abre o Janela Microsoft Visual Basic for Applications.
3. No lado esquerdo Projeto VBA painel, clique duas vezes Esta pasta de trabalho para abrir o Móduloe copie e cole o código a seguir.
Código VBA: impede que outros insiram planilha
Private Sub Workbook_NewSheet(ByVal Sh As Object)
'Update 20140623
With Application
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sh.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End With
MsgBox "disable to add sheets"
End Sub
4. Em seguida, salve e feche este código, volte para a pasta de trabalho e, agora, quando você tentar inserir uma nova planilha nela, uma caixa de aviso aparecerá para lembrá-lo de que você não pode inserir planilhas. Veja a imagem:
Artigos relacionados:
Como evitar que os usuários imprimam planilhas?
Como desativar a tecla de ajuda F1 no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!