Atualizar Tabelas D...
 
Notifications
Clear all

Atualizar Tabelas Dinâmicas de Planilha Protegida

2 Posts
1 Usuários
0 Reactions
1,488 Visualizações
(@cezaro)
Posts: 23
Eminent Member
Topic starter
 

Bom dia a todos.

Tenho duas tabelas dinâmicas que estão em uma planilha a qual devo proteger, em função de conter várias formulas as quais não quero correr o risco de serem alteradas por outros usuários.

Porém, se protejo a planilha, não é possível atualizar a tabela dinâmica (usando a função Atualizar Tudo, no menu Dados).
Creio que também irei proteger a planilha base de onde os dados das tabelas dinâmicas serão atualizados.

É possível fazer isso?

No caso irei proteger tanto a planilha base, como a planilha a qual contêm as tabelas dinâmicas.

 
Postado : 31/10/2016 6:51 am
(@cezaro)
Posts: 23
Eminent Member
Topic starter
 

Pessoal,

Já encontrei uma solução.

Resolvi meu problema através da Macro abaixo

Sub Exemplo()
    Const CsSenha As String = "SuaSenha"
    
    Dim pt As PivotTable
    ActiveSheet.Unprotect CsSenha
    For Each pt In ActiveSheet.PivotTables
        pt.RefreshTable
    Next pt
    ActiveSheet.Protect CsSenha
End Sub

Obrigado
 
Postado : 31/10/2016 7:22 am