Kolommen verbergen/zichtbaar maken via checkbox

Status
Niet open voor verdere reacties.

Peekhamer

Gebruiker
Lid geworden
2 okt 2012
Berichten
146
Hoi,

ik ben een model aan het schrijven voor controles die ik uitvoer. Dit gaat over omzetbelasting. Ik probeer het met macro's op te lossen dmv checkboxen.

Als er sprake is van omzet laag dan wil ik dat kolommen E en F getoond worden, indien er geen sprake van is dan wil ik dat deze kolommen verborgen zijn. Maar de macro doet niet wat ik wil:

Sub Selectievakje16_Klikken()
If CheckBox16 = True Then
[E:F].EntireColumn.Hidden = False
End If
If CheckBox16 = False Then
[E:F].EntireColumn.Hidden = True
End If
End Sub

Heb hem ook al 'andersom' geprobeerd, dus met show = true, dat werkt ook niet.
Wat doe ik fout?

Ben ook al met optionbuttons aan het vogelen, maar tot nu toe geen geluk..
Kan iemand met verstand er eens naar kijken?
 
aanvullend nog: uitgangssituatie is dat de kolommen verborgen staan en de checkboxes uit...

EDIT:
Deze had ik gevonden en die werkt op zich:

Sub Selectievakje39_Klikken()
With Range("E1,F1").EntireColumn
.Hidden = Not .Hidden
End With
End Sub

ECHTER; ik heb zo'n 5 of 6 selectievakjes die onafhankelijk van elkaar moeten kunnen opereren. Als ik deze macro nogmaals kopieer en het bereik aanpas naar kolommen G en H (en er tevens selectievakje 40 van maak) dan verbergt ie TOCH kolom E en F... eeuhmm.. HUH??

Nu, nog maar n EDIT:
Ik maakte zelf een fout; het werkt.

Iets te snel n topic aangemaakt.. Gefixt dus.
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan