VBA Userform - Zichtbaar verbergen tabblad obv textboxwaarde

[gjanus]

Hallo,

Ik zou graag binnen een userform met een knop een tabblad kunnen verbergen of zichtbaar maken. Weet iemand hoe dit te doen?
Zie voorbeeld bestand

Tekstbox in userform vult zich vanuit waarde in cel (Active row en kolom B).

Alvast bedankt.

 

[VenA]

Private Sub CommandButton1_Click()
  Sheets(Txtpost.Value).Visible = Not Sheets(Txtpost.Value).Visible
End Sub

 

[Pagadder]

Andere benadering.

 

[gjanus]

Thanks VenA en Pagadder,

Jouw oplossing is zeker ook interessant Pagadder.

Mijn probleem in ieder geval opgelost. Dank heren of dames.