Pomoc s tabulkou
Napsal: 21 led 2010 13:20
Můžete mi někdo pomoc s odkrýtím sheetů? Moc děkuji.
Skryte listy mely nastavenu vlastnost xlVeryHidden, zobrazeny procedurou (module1):
Kód: Vybrat vše
Sub ShoWShtVeryHidden()
Dim Wsht As Worksheet
For Each Wsht In ActiveWorkbook.Worksheets
Debug.Print Wsht.Name
Wsht.Visible = xlSheetVisible
Next Wsht
End Subodemknuty sesit v priloze.
PS: Nezkoumal jsem sesit, ale na prvni pohled lze rici, ze se da znacne zjednodusit pouzitim efektivnejsich funkci