Este fórum está sendo desativado

[AlineAlves27]

Boa Tarde,

Gostaria de saber como faço para bloquear com senha somente uma aba de uma planilha.


Obrigada!

[Feka]

digite o código: sheets("name").protect senha

[AlineAlves27]

não deu muito certo rs

preciso colocar mais alguma coisa?

como não entendo muito de VBA rs não sei se fiz algo errado....

Obrigada!

[Feka]

Tente assim, onde está "name" coloque o nome da planilha que quer bloquear (mantenha a aspa dupla):

sub senha()
sheets("name").protect 123
end sub

[AlineAlves27]

Ainda assim as abas aparecem acessíveis

tentei o código abaixo.

mas não ta funcionando muito bem, pois não tem uma senha pra bloquear.

Sub Acesso()
Dim Senha As String
Senha = InputBox("Digite a Senha para acessar as planilhas", ":: Acesso::")
If Senha = "123" Then
Sheets("Plan2").Visible = -1
Sheets("Plan3").Visible = -1
MsgBox "Acesso concedido!", vbInformation, "Aviso"
Else
Sheets("Plan2").Visible = 2
Sheets("Plan3").Visible = 2
End If
End Sub

[Feka]

A você quer deixa-la oculta?

Então deve usar a propriedade visible, um exemplo:
sub ocult()
sheets("name").visible = xlSheetVeryHidden
end sub

para que ela apareça novamente é só colocar xlSheetVisible no lugar de xlSheetVeryHidden e rodar o código.