Deixar guia oculta fora da pesquisa For Each/Sheets(i).Select [RESOLVIDO]
Enviado: 23 Dez 2020 às 09:24
Bom dia,
Gostaria de ajuda com a seguinte questão, sou iniciante no VBA como já disse várias vezes aqui, então, segue a dúvida...
Tenho esse código abaixo que roda tudo certo porém está dando erro quando o método não encontra uma guia oculta que existe na pasta de trabalho (de nome MODELO), queria saber se há possibilidade de acrescentar essa guia oculta na condição para que o erro não aconteça.
For Each aba In ThisWorkbook.Sheets
Sheets(i).Select
If aba.Name <> "TODOS" And aba.Name <> "RECADASTRAMENTO" And aba.Name <> "AS" And aba.Name <> "CO VALIDADE" And aba.Name <> "CNH VALIDADE" And aba.Name <> "AL" Then
Gostaria de ajuda com a seguinte questão, sou iniciante no VBA como já disse várias vezes aqui, então, segue a dúvida...
Tenho esse código abaixo que roda tudo certo porém está dando erro quando o método não encontra uma guia oculta que existe na pasta de trabalho (de nome MODELO), queria saber se há possibilidade de acrescentar essa guia oculta na condição para que o erro não aconteça.
For Each aba In ThisWorkbook.Sheets
Sheets(i).Select
If aba.Name <> "TODOS" And aba.Name <> "RECADASTRAMENTO" And aba.Name <> "AS" And aba.Name <> "CO VALIDADE" And aba.Name <> "CNH VALIDADE" And aba.Name <> "AL" Then