Pomoc s tabulkou

[Mc Kubcer]

Můžete mi někdo pomoc s odkrýtím sheetů? Moc děkuji.

[Reklama]

[navstevnik]

K prolomeni hesla a odstraneni vsech zamku byl pouzit doplnek ExcelAsistent http://www.dataspectrum.cz/pages/softwa ... remain.htm
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 Sub

odemknuty sesit v priloze.
PS: Nezkoumal jsem sesit, ale na prvni pohled lze rici, ze se da znacne zjednodusit pouzitim efektivnejsich funkci

[Mc Kubcer]

Když mi někdo pomůže ji zjednodušit, tak budu vděčný. potřebuju hlavně tyto věci - aby sheet s přehledem hodin dal zkopírovat (potřebuju jich asi 10) a počítalo, aby se tam dal souhrn všech sheetů v jiném samostatném sheetu.

Předem moc děkuji

http://leteckaposta.cz/610987172