problem registerkarten verstecken

ich habe ein problem. und zwar verstecke ich in einer arbeitsmappe meine registerkarten mit dem befehl:
Worksheets("Test").Visible = xlVeryHidden

und stelle sie wieder her mit:
Worksheets("Test").Visible = True

das problem ist nur, wenn die registerkarten ausgeblendet sind und ich mit einer schaltfläche auf das tabelleblatt "test" wechseln möchte, funktionerts nicht.

ich hoffe mir kann jemand helfen.