tabbladnaam met celwaarde verbergen in macro

[bebobebo]

Hallo exceltoppers,

Ik heb afgelopen weekend een mooie oplossing gekregen mbt naam van celwaarde naar naam tabblad.
Ik ben nu een beetje aan het proberen om 1 tabblad zichtbaar te houden en de rest te verbergen en later alle tabbladen weer zichtbaar maken.
Deze kan ik maken en deze werken ook, maar op het moment dat ik een andere datum invul en de tabbladen dus veranderen werken de twee macro's niet meer.
Er moet iets anders verwezen worden naar de basissheets dan er op dit moment gedaan is.
Dit gaat mij even te ver.

Bestandje met uitleg
Bekijk bijlage tabbladnaam met celwaarde verbergen in macro.xls

Iemand een oplossing?

Groet Bert

 

[Cobbe]

Probeer eens op dit verder te borduren:

Sub alleensheet1zichtbaar()
For i = 2 To Sheets.Count
    Sheets(i).Visible = False
    Next
End Sub


Sub allesheetszichtbaar()
For i = 1 To Sheets.Count
    Sheets(i).Visible = True
    Next
End Sub

Succes, Cobbe

 

[bebobebo]

Probeer eens op dit verder te borduren:

Sub alleensheet1zichtbaar()
For i = 2 To Sheets.Count
    Sheets(i).Visible = False
    Next
End Sub


Sub allesheetszichtbaar()
For i = 1 To Sheets.Count
    Sheets(i).Visible = True
    Next
End Sub

Succes, Cobbe

Hallo Cobbe,

Dank voor deze twee.
Ze werken beide oke.
Ik wil nu alleen dat sheet 2 zichtbaar is.
Ik ben nu een tijdje aan het proberen gegaan, lukt niet helemaal.
Ik kan wel iets maken om meerdere sheets zichtbaar te laten, maar om sheet 2 alleen zichtbaar lukt niet.

Sub alleensheet2zichtbaar()
For i = 3 To 3
    Sheets(i).Visible = True
    Next
End Sub

Hier blijf ik hangen.
Ik heb het bestand even bijgewerkt.
Bekijk bijlage tabbladnaam met celwaarde verbergen in macro2.xls

Bert

 

[Warme bakkertje]

Mijn poging

Mvg

Rudi

 

[bebobebo]

Mijn poging

Mvg

Rudi

Hallo Rudi,

Dank voor het meedenken, ik ga hier mee uitproberen.

Groet Bert.