A macro para proteger planilhas na pasta de trabalho perto

Às vezes, você precisa enviar o seu Excel pasta de trabalho para o mundo com planilhas específicas protegida. Se você achar que você está protegendo constantemente e folhas desproteger antes de distribuir suas pastas de trabalho, a macro aqui pode ajudá-lo.

Como as obras de macro

O código é acionado pelo evento BeforeClose do livro. Ao tentar fechar o livro, este evento é acionado, a execução do código dentro. A macro protege automaticamente a folha especificado com a senha fornecida e, em seguida, guarda o livro:

Video: Excel | Proteger e desproteger células, planilha e pasta de trabalho

Private Sub Workbook_BeforeClose (Cancel As Boolean) `Passo 1: proteger a folha com um passwordSheets ("Sheet1") .Proteja Password: ="VERMELHO"`Passo 2: salvar a workbookActiveWorkbook.SaveEnd Sub

Na Etapa 1, você está explicitamente especificando quais folha para proteger - Sheet1, neste caso. Você também fornecer o argumento de senha, senha: =”RED”, que define a senha necessária para remover a proteção.

Este argumento de senha é opcional. Se você omiti-lo, a folha ainda estará protegido, mas você não vai precisar de uma senha para desproteger-lo.

senhas do Excel são case-sensitive, então você vai querer prestar atenção para a senha exata e capitalização que você está usando.

Passo 2 diz Excel para guardar o livro. Se você não salvar a pasta de trabalho, a proteção patrimonial você apenas aplicada não estará em vigor na próxima vez que o livro é aberto.

Como usar o macro

Para implementar essa macro, você precisa copiar e colá-lo na janela de código de evento do Workbook_BeforeClose. Colocar a macro aqui permite que ele seja executado cada vez que você tentar fechar a pasta de trabalho:

1. Ativar o Editor do Visual Basic pressionando Alt + F11.

   Video: EXCEL 2007 - Como Inserir Senha nos seus Arquivos e Proteger as suas Planilhas de alterações

2. Na janela do projecto, encontrar o seu nome do projeto / pasta de trabalho e clique no sinal de mais ao lado dele para ver todas as folhas.

3. Clique ThisWorkbook.

4. Na lista drop-down do evento, selecione o evento BeforeClose.

5. Digite ou cole o código no módulo recém-criado, modificando o nome da folha (se necessário) e a senha.

   
   Digite o seu código no evento de pasta de trabalho BeforeClose.

Note que você pode proteger folhas adicionais, adicionando declarações de adição antes da instrução Activeworkbook.Save.