Meerdere tabbladen zichtbaar maken

[Snulk]

Het lijkt me heel eenvoudig, maar krijg het niet voor elkaar.
Ik heb meerdere tabbladen verborgen en nu wil ik ze in één keer zichtbaar maken.
Ik kan er steeds maar 1 tegelijk zichtbaar maken..

Is hier een oplossing voor?

Dank,

Jos

 

[VenA]

Dat kan met een eenvoudige macro.

om alle bladen zichtbaar te maken

Sub VenA()
For Each sh In Sheets
    sh.Visible = True
Next sh
End Sub

Om een aantal bladen zichtbaar te maken

Sub VenA1()
For Each sh In Sheets(Array("Sheet1", "Sheet3"))
    sh.Visible = True
Next sh
End Sub

 

[roeljongman]

Ik gebruik hiervoor vaak wat ik noem de "lichtknop marco" daarmee toon en verberg je sheets met 1 knop ifo selectievakje wat je dan ook wilt.

wel even opletten dat deze macro altijd de huidige instelling van een blad aanpast dus als een blad onzichtbaar is wordt ie zichtbaar en andersom.

Bekijk bijlage meerdere bladen verbergen.xlsm

 

[Snulk]

Dat kan met een eenvoudige macro.

om alle bladen zichtbaar te maken

Sub VenA()
For Each sh In Sheets
    sh.Visible = True
Next sh
End Sub

Om een aantal bladen zichtbaar te maken

Sub VenA1()
For Each sh In Sheets(Array("Sheet1", "Sheet3"))
    sh.Visible = True
Next sh
End Sub

Geweldig! ga ik maken! Dank

 

[Snulk]

Ik gebruik hiervoor vaak wat ik noem de "lichtknop marco" daarmee toon en verberg je sheets met 1 knop ifo selectievakje wat je dan ook wilt.

wel even opletten dat deze macro altijd de huidige instelling van een blad aanpast dus als een blad onzichtbaar is wordt ie zichtbaar en andersom.

Bekijk bijlage 279117

waar kan ik de code van deze macro vinden. Zie 'm niet ...

 

[VenA]

Wil je svp niet onnodig quoten? Als je de code van roeljongman niet kan vinden, dan ben ik benieuwd hoe je die van mij gaat maken.

 

[roeljongman]

lol..

om toch maar even volledig te zijn..

1. ALT + F11 opent de VBA editor.
2. Mijn code staat op het bij Blad1(Blad1) in de VBA editor
(en niet in een module)

 

[VenA]

(en niet in een module)

Stiekem toch wel http://www.snb-vba.eu/VBA_Excel_VBproject.html

Met een rechtsklik op de tab en een klik op 'View Code' kom je direct in de bladmodule.