Meerdere veborgen tabbladen te gelijk zichtbaar maken

[wimix69]

Hallo,

Ik gebruik deze macro om een vermorgen tabblad zichtbaar te maken. nu wil ik een extra tablad zicht baar maken dat dan ook zichtbaar blijft. hoe pas ik de macro dan aan?

Sub Rechthoek58_Klikken()
Sheets("Tab2").Visible = Not Sheets("Tab2").Visible
If Sheets("Tab2").Visible Then Application.Goto Sheets("tab2").Range("C27")
End Sub

 

[wimix69]

Hallo,
Marco werkt niet krijg een fout melding. Zie voorbeeld, knop TEST werkt goed.

Knop TEST 2 moet Tab2 in cel C27 open en tab11 open in cel C15. En als Knop TEST 2 weer wordt in gedrukt moet tab2 weer verborgen worden maar tab11 mag dan zichtbaar blijven.

 

[wimix69]

Top werkt perfect