Questione : Errore - metodo visibile del manuale dell'oggetto venuto a mancare

Nel frammento di codice qui sotto sto provando a nascondere tutti gli strati tranne quello chiamato “jane_sheet„.  Il problema è che il libro di esercizi è stabilizzato per aprirsi con tutti gli strati nascosti tranne la pagina di benvenuto che è definita come questa:
Const WelcomePage = “benvenuto„. il
I pensa che stia ottenendo l'errore perché sta provando a nascondere la pagina di benvenuto in primo luogo ed allora il unhide “jane_sheet„ ed esso non può fare che perché nascondere la pagina di benvenuto in primo luogo non lascerebbe alcuni strati visibili.  Delle idee su come posso cambiare questo?  Grazie! class= > " libero " del

> " del codeSnippet " del class= del

class= " lineNumbers " del

class= del

1: 2: 3: 4: 5: 6:

>Case notpretty LCase (“jane„ " del class= " del id= " codeSnippet858723 del

class= del

Risposta : Errore - metodo visibile del manuale dell'oggetto venuto a mancare

Caso LCase (“jane„)
Strati (“jane_sheet„). Visibile = xlSheetVisible
Per l'ogni WS in ThisWorkbook.Worksheets
Se LCase (WS. Nome) <> LCase (“jane_sheet„) allora
la WS. Visibile = xlSheetVeryHidden
Concluder se
Dopo