Excel Segregar acesso a uma planilha específica de uma pasta do Excel

[Roberto Lucena]

Ola, tenho um arquivo em Excel com quatro planilhas, preciso criar uma quinta planilha, mas é necessário que o acesso a essa quinta planilha seja restrito a apenas 4 pessoas das 12 que têm acesso ao arquivo. Existe alguma forma de criar esse nível de acesso restrito. Agradeço por qualquer ajuda que seja possível.

[R0DR1G0_CWB]

Bom dia,

 

Uma forma de restringir o acesso é configurar uma senha de acesso a essa planilha pelo VBA.

Via código, você pode simplesmente ocultar/exibir essas planilhas restritas pelo código:

 

Exemplo:

Sub Oculta()
   Worksheets(2).Visible = xlSheetVeryHidden
   Sheets(2).Protect Password:=”xxxx”, UserInterfaceOnly:=True
End Sub

Sub Mostra()
    Worksheets(2).Visible = xlSheetVisible
    Sheets(2).Protect Password:=”xxxx”, UserInterfaceOnly:=True
End Sub

Porém é muito importante que você crie uma senha também para a edição do VBA.

[Roberto Lucena]

Puxa, Rodrigo, grato pela dica. Sem querer abusar no entanto, ainda não aprendi VBA. você pode me dar a dica para cria a senha para a edição VBA também.

 

[R0DR1G0_CWB]

@Roberto Lucena

 

Veja esse exemplo, que fiz em um formato básico...

Modelo restrição de exibição - Rodrigo.zip

 

Note que ao digitar a senha na caixa de mensagem irá aparecer a senha digitada.

Existe uma forma de converter para o asterisco, porém não me lembro como se faz e estou sem tempo para pesquisar, se quiser vejo isso para você na segunda.

 

Ao clicar no botão a senha atual está como "teste".

 

Para trocar mude para a senha desejada no código:

If xPass = "teste" Then

***Obs.: sempre entre aspas duplas...

 

1º pressione > Alt+F11

 

2º de um duplo clique no nome do arquivo conforme imagem:

 

 

Nessa etapa vai pedir outra senha  que é "testevba".

 

3º duplo clique em módulo1, que irá aparecer o código a direita:

 

[CasaDoHardware]

Para transformar a senha digitada em *** so criando um userform.

[Roberto Lucena]

Note que ao digitar a senha na caixa de mensagem irá aparecer a senha digitada.

Existe uma forma de converter para o asterisco, porém não me lembro como se faz e estou sem tempo para pesquisar, se quiser vejo isso para você na segunda.

 

Se não for muito incômodo, seria de grande ajuda..

 

Grato pela generosidade.

 

 

[R0DR1G0_CWB]

Boa tarde, @Roberto Lucena

 

Segue modelo aproveitando a dica do @CasaDoHardware .

 

Modelo restrição de exibição - Rodrigo.zip

[Roberto Lucena]

Super Grato. Boa semana.