Met Toggle button kollommen verbergen of weergeven

[bugsgunny]

Beste mensen,

Ik zit met een klein vraagstuk.

Ik wil graag door middel van een toggle button de kollommen A:C verbergen en bij indrukken van de knop
weer zichtbaar maken.

Hoe doe ik dit?

Alvast dank!!

Groeten

 

[trucker10]

Met deze

Private Sub ToggleButton1_Click()

If ToggleButton1.Value = True Then
 With Sheets(1)
        
        .Columns("A:C").Hidden = True
       
    End With
    Else
    With Sheets(1)
      
        .Columns("A:C").Hidden = False
      
    End With
  End If
End Sub

 

[Warme bakkertje]

Private Sub ToggleButton1_Click()
    Sheets(1).Columns("A:C").Hidden = IIf(ToggleButton1, True, False)
End Sub

 

[trucker10]

@ Rudi , een paar weken geleden had ik jouw verkorte versie gelezen , maar kom er niet direct opkomen en hier

 IIf(ToggleButton1, True, False)

liep het bij mij mis