Creating Dynamic Checkboxes

[moosenator]

I have a spreadsheet I'm working on where I'd like checkboxes to be able to "open" subsequent columns when checked-off. To give more information, I currently have Checkboxes in every row in "column C" and I would like them to reveal the hidden columns of D & E only for specific rows in which the check box has been marked off. Is that possible?

I'd be open to using methods that don't include checkboxes if it's possible to achieve this in other ways.

Thanks!

[Palmetto]

Try using Marlette check boxes.

Code goes in the worksheet module. This is an example only, you will need to modify for row references, etc.

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Dim lngCol As Long
    
    If Target.Cells.Count > 1 Then Exit Sub
    
    If Target.Column = 3 Then ' column c
    
        Select Case Target.Row
            Case 2: lngCol = 4
            Case 5: lngCol = 5
            Case Else: Exit Sub
        End Select
        
        Range("C" & Target.Row).Font.Name = "Marlette"
        
        If Range("C" & Target.Row).Value = vbNullString Then
            Range("C" & Target.Row).Value = "a"
        Else
            Range("C" & Target.Row).Value = vbNullString
        End If
        
        Columns(lngCol).EntireColumn.Hidden = Range("C" & Target.Row).Value <> "a"
        
    End If

End Sub