Skjul en rækkevidde afhængigt af brugervalg - Excel-tip

Mike spørger:

Hvis et kontrolafkrydsningsfelt ikke er markeret i min projektmappe, vil jeg automatisk skjule specifikke rækker og kolonner med VBA. Hvordan gøres dette? Tak skal du have.

At være et kontrolafkrydsningsfelt, vil du have kode, der ser sådan ud:

Private Sub CheckBox1_Click() ActiveCell.Select Rows(15).Hidden = CheckBox1 End Sub

Den første del er at undgå en fejl, HVIS du bruger Excel 97. Den anden linje er en "forbedret" HVIS, den kunne gøres sådan:

If CheckBox1 = True then Rows(15).Hidden = True Else Rows(15).Hidden = False End If 

Men hvorfor gør al den ekstra typning?