Vahemiku peitmine sõltuvalt kasutaja valikust - Exceli näpunäited

Lang L: none (table-of-contents)

Mike küsib:

Kui oma töövihikus pole märkeruutu märgitud, siis tahaksin konkreetsed read ja veerud VBA abil automaatselt peita. Kuidas seda tehakse? Aitäh.

Olles märkeruut Control, on teil kood, mis näeb välja selline:

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

Esimene osa on vea vältimine, kui kasutate Exceli 97. Teine rida on "täiustatud" IF, selle võiks teha järgmiselt:

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

Aga miks kogu ekstra tippimine?