Bom dia pasedo

Por enquanto não obtêm resposta, verifique se este tópico pode te ajudar:

viewtopic.php?f=10&t=4199

[]s

E mais facil fazer isso com um formularios.

Como no exemplo que postei no seu outro topico sobre proteção de abas individuais.

Basta criar um formulario para digitar a senha em uma textbox.

Eu nao gosto de usar api, o ideal como disse MPrudencio, é usar userform para fazer o que quer.

De qq forma veja o anexo se esta funcionando ai pra voce o codigo que voce postou.

Estou quase la, consegui fazer funcionar em partes , o problema agora é que se eu fechar a pasta de trabalho com a planilha 2 oculta a hora que vou abri-la da erro, mas se eu salvar a pasta de trabalho com a planilha 2 aberta aí não da o erro . quando eu abro a planilha pede a senha para acessar a planilha 2 (senha 123) ai da acesso a planilha 2 , depois quando clico na aba 1 oculta a planilha 2 ai é o seguinte para não dar o erro eu tenho novamente que abrir a planilha 2 e salvar com ela em aberto se estiver oculta ela da erro segue em anexo para estudo se for possivel.Desde de já agradeço

Estou quase la, consegui fazer funcionar em partes , o problema agora é que se eu fechar a pasta de trabalho com a planilha 2 oculta a hora que vou abri-la da erro, mas se eu salvar a pasta de trabalho com a planilha 2 aberta aí não da o erro . quando eu abro a planilha pede a senha para acessar a planilha 2 (senha 123) ai da acesso a planilha 2 , depois quando clico na aba 1 oculta a planilha 2 ai é o seguinte para não dar o erro eu tenho novamente que abrir a planilha 2 e salvar com ela em aberto se estiver oculta ela da erro segue em anexo para estudo se for possivel.Desde de já agradeço

consegui resolver o problema é só trocar estas duas linhas

Sheets("Plan2").Select
ActiveWindow.SelectedSheets.Visible = False
por esta

Sheets("Plan2").Visible = False