Como impedir que os utilizadores imprimam uma folha de cálculo?
No nosso trabalho diário, poderá haver informações importantes na folha de cálculo. Para proteger a confidencialidade dos dados internos, o departamento não permite a sua impressão. A seguir, explico como impedir que os utilizadores imprimam uma folha de cálculo.
Impedir que os utilizadores imprimam uma folha de cálculo específica com VBA
Impedir que os utilizadores imprimam toda a pasta de trabalho com VBA
Impedir que os utilizadores imprimam uma folha de cálculo específica com VBA
Pode aplicar o seguinte código VBA para proteger a sua folha de cálculo específica contra impressão.
1. Ative a folha de cálculo em que pretende desativar a função de impressão.
2. Mantenha premidas as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
3. Em seguida, no Explorador de Projetos à esquerda, clique duas vezes em EsteLivro para abrir o módulo e cole nele o seguinte código:
Código VBA: impedir que os utilizadores imprimam uma folha de cálculo específica
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140625
Dim WsName As String
WsName = "Sheet1"
For Each xWs In Application.ActiveWorkbook.Windows(1).SelectedSheets
If xWs.Name = WsName Then
MsgBox ("You can not print this worksheet")
Cancel = True
End If
Next
End Sub
Nota: No código acima, a Folha1 é a folha de cálculo ativa que não pode ser impressa.
4. Depois, guarde e feche este código e, ao tentar imprimir esta folha de cálculo específica, receberá o seguinte aviso.
Nota: Com este código, apenas a folha de cálculo específica fica impedida de ser impressa; as restantes podem ser impressas normalmente.
Impedir que os utilizadores imprimam toda a pasta de trabalho com VBA
Se precisar de impedir que os utilizadores imprimam toda a pasta de trabalho, há também um código que poderá ser útil.
1. Abra o livro que não quer que outros imprimam.
2. Mantenha premidas as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
3. Em seguida, no Explorador de Projetosà esquerda, clique duas vezes em EsteLivropara abrir o módulo e cole nele o seguinte código:
Código VBA: impedir que os utilizadores imprimam uma folha de cálculo específica
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub
4. Depois de guardar e fechar este código, regresse à pasta de trabalho. Ao tentar imprimir uma folha ou a pasta inteira, estas não poderão ser impressas e receberá o seguinte aviso:
Artigos relacionados:
Como imprimir várias pastas de trabalho no Excel?
Como definir o intervalo de impressão no Excel?
Como imprimir rapidamente a página atual no Excel?
Como imprimir uma coluna longa numa única página no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos