Ocultando um intervalo dependendo da seleção do usuário - Dicas do Excel

Mike pergunta:

Na minha pasta de trabalho, se uma caixa de seleção de controle não estiver marcada, eu gostaria de ocultar linhas e colunas específicas automaticamente com o VBA. Como isso é feito? Obrigado.

Sendo uma caixa de seleção de controle, você teria um código semelhante a este:

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

A primeira parte é para evitar um erro SE você estiver usando o Excel 97. A segunda linha é um IF "aprimorado", poderia ser feito assim:

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

Mas por que toda a digitação extra?