Como proteger uma Tabela Dinâmica no Excel?
No Excel, como podemos proteger a Tabela Dinâmica para impedir que outros utilizadores arrastem campos ou alterem o esquema? Neste artigo, apresentamos alguns métodos eficazes para proteger a Tabela Dinâmica numa folha de cálculo.
Proteger o Tabela Dinâmica com código VBA
Proteger o Tabela Dinâmica mas permitir acesso ao segmentador
Proteger o Tabela Dinâmica com código VBA
O seguinte código VBA pode ajudá-lo a proteger a Tabela Dinâmica. Siga estes passos:
1. Mantenha premidas as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código na janela do Módulo.
Código VBA: proteger o Tabela Dinâmica
Sub RestrictPivotTable()
'Updateby Extendoffice
Dim xpf As PivotField
Application.ScreenUpdating = False
With ActiveSheet.PivotTables(1)
.EnableDrilldown = False
.EnableFieldList = False
.EnableFieldDialog = False
.PivotCache.EnableRefresh = False
For Each xpf In .PageFields
With pf
.DragToPage = False
.DragToRow = False
.DragToColumn = False
.DragToData = False
.DragToHide = False
End With
Next xpf
End With
Application.ScreenUpdating = False
MsgBox "The pivot table has been protected!", vbInformation, "Kutools for Excel"
End Sub
3. Em seguida, prima a tecla F5 para executar este código. Aparecerá uma caixa de aviso a informar que a Tabela Dinâmica foi protegida. Veja a captura de ecrã:

Notas:
1. Este código desativa diversas funcionalidades de uma Tabela Dinâmica, impedindo os utilizadores de arrastar campos para outras áreas e desativando a Lista de Campos, as Configurações de Campo, a Análise Detalhada (Drilldown) e a atualização dos dados.
2. Se existirem várias Tabelas Dinâmicas na Planilha Ativa, este código aplica-se apenas à última Tabela Dinâmica.
Proteger o Tabela Dinâmica mas permitir acesso ao segmentador
Por vezes, poderá querer proteger a Tabela Dinâmica enquanto mantém o acesso ao segmentador para aplicar filtros. Os passos seguintes podem ajudá-lo.
1. Após inserir o segmentador, clique com o botão direito do rato sobre ele e escolha Tamanho e Propriedades no menu de contexto. Veja a captura de ecrã:

2. No painel Formatar Segmentador, clique em Propriedades para expandir as opções e, em seguida, desmarque a opção Bloqueado. Veja a captura de ecrã:

3. Depois, feche o painel e clique em Revisão > Proteger Folha para proteger esta folha. Veja a captura de ecrã:

4. Na caixa de diálogo Proteger Folha que surge, marque apenas as opções Selecionar Células Não Bloqueadas e Utilizar Tabela Dinâmica e Gráfico Dinâmico na lista Permitir que todos os utilizadores desta folha de cálculo, introduza a palavra-passe e confirme-a. Veja a captura de ecrã:

5. Em seguida, clique no botão OK para fechar as caixas de diálogo. Agora, ao clicar no relatório da Tabela Dinâmica e tentar alterá-lo, não será possível modificá-lo, mas poderá utilizar o segmentador conforme necessário.
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