met opdrachtknop tabblad openen/zichtbaar maken

[schuurar]

Beste forum,

Ik zou graag door middel van een button 2 dingen willen bereiken.
1 een tabblad word zichtbaar.
2 het tabblad word geopend.

Ik kan nu wel met een code het tabblad laten zien/verbergen maar zou ook graag willen dat hij gelijk geopend word.
Hiermee word het tabbald zichbaar/verborgen

Private Sub knop_Click()
Worksheets(3).Visible = knop.Value
End Sub

Wat moet er nog bij??

En dan wil ik op het tabblad wat geopend word een button hebben die het tabblad weer sluit/verbergd en terug gaat naar het hoofdblad.

Hoop dat het duidelijk is en iemand me kan helpen.
Bedankt alvast!

 

[HSV]

Het is dus een wisselknop.

Dan zou het zo kunnen.

Private Sub knop_Click()
  With Worksheets(3)
   If knop = True Then
    .Visible = knop.Value
    .Activate
  Else
    .Visible = False
   End If
  End With
End Sub

 

[Warme bakkertje]

Private Sub knop_Click()
    With Worksheets(3)
        .Visible = knop.Value
        Application.Goto .[A1]
    End With
End Sub

 

[schuurar]

Bij de code van Harry maakt hij het blad goed zichtbaar en springt hij goed naar het blad. Alleen hoe kan ik nu op dit 2e blad weer een button maken die het blad weer sluit en terug gaat naar het hoofdblad? Als ik nu naar het hoofdblad ga en weer op de button klik krijg ik een fout melding. ( fout 1004 tijdens uitvoering)

Bij de code van Rudi krijg ik gelijk een foutmelding ( fout 1004 tijdens uitvoering)

Wat kan ik hier nog aan doen??

Bedankt heren voor het reageren in elk geval!!!