Galera,
Estou tentando acessar uma outra planilha com o nome JANEIRO-2016 onde a aba chamada DESENV está oculta e protegida. Ao clicar no botão na planilha com o nome FEVEREIRO-2016 da um erro ao tentar selecionar a aba da planilha JANEIRO-2016.
Sub teste()
'
Dim xl As New Excel.Application
Dim xlw As Excel.Workbook
'
' *** SELECIONA A ABA DESENV DA PLANILHA FEVEREIRO-2016 TORNA ELA VISÍVEL E DESPROTEGE ***
Sheets("Desenv").Visible = True
Sheets("Desenv").Select
Call Desproteger
'
Range("H3:M6000").Select
Selection.ClearContents
Range("H2").Select
'
' *** ABRE A PLANILHA JANEIRO-2016 QUE NESTE MOMENTO ESTA COM A ABA DESENV OCULTA E PROTEGIDA***
Set xlw = xl.Workbooks.Open(ThisWorkbook.Path & "\JANEIRO-2016.xlsm")
' *** COMO A ABA DESENV ESTÁ OCULTA E PROTEGIDA O COMANDO ABAIXO DA ERRO "método select da classe worksheet falhou"
xlw.Sheets("Desenv").Select
Existe uma forma de reexibir e desproteger a aba da planilha JANEIRO-2016???