Mike se ptá:
Pokud v mém sešitu není zaškrtnuto kontrolní políčko, chtěl bych automaticky skrýt konkrétní řádky a sloupce pomocí VBA. Jak se to dělá? Děkuji.
Zaškrtávací políčko Control byste měli kód, který vypadá takto:
Private Sub CheckBox1_Click() ActiveCell.Select Rows(15).Hidden = CheckBox1 End Sub
První částí je vyhnout se chybě, POKUD používáte Excel 97. Druhý řádek je „vylepšený“ IF, může být proveden takto:
If CheckBox1 = True then Rows(15).Hidden = True Else Rows(15).Hidden = False End If
Ale proč dělat všechny ty extra psaní?