< návrat zpět

MS Excel


Téma: zlomení hesla - excel 2013 rss

Zaslal/a 11.12.2014 16:53

Dobrý den,

potřeboval bych poradit s možností odemčení všech listů a celého sešitu v MS Excel 2013 x64. Mám poměrně rozsáhlý excel s desítkami listů a všechny musí být pro uživatele excelu uzamčeny. Při úpravách (párkrát do roka) ale potřebuji vše odemknout. Již nějaký pátek na toto používám makro viz příloha. Na netu jsem našel ještě další dva typy, ale ani jeden mi na 2013 nefunguje. Na 2010 vše běželo jak má.

Prosím o radu, případně pokud máte někdo nějaké jiné ověřené makro pro MS 2013, tak budu rád.

děkuji
Pavel

stop Uzamčeno - nelze přidávat nové příspěvky.

#022741
avatar
A to si nevedel dať priamo do excelu???citovat
#022745
avatar
Odemčení:


Sub Odemknout()
Dim sh As Object

ActiveWorkbook.Unprotect "Heslo"
For Each sh In ActiveWorkbook.Sheets
sh.Unprotect "Heslo"
Next
End Sub


Pokud znáš heslo, tak to funguje.citovat
#022747
avatar
lubo: Pokud znám heslo, tak určitě super. Díky. Občas mi ale někdo nějaký list při editacích zamkne jiným heslem, plus jsem samozřejmě používal i na jiné excely, než na ten svůj. To jsem uvedl jako příklad. Fakt mě překvapilo, že to v excelu 2013 nefunguje a v 2010 a nižších bez problémů.

marjankaj: Co tím myslíš? To makro co jsem přikládal jsem psal, že používám, nebo jsem spíše do teď používal dost často. Ale v 2013 už to nefunguje.citovat
icon #022751
eLCHa
Asi takhle
Vytváření sešitů a VBA projektů považuji za programování jako každé jiné (i když si to jiní programátoři často nemyslí). Tzn., že pokud někdo uzamkne sešit nebo list má k tomu důvod a Vy a všichni ostatní byste to měli respektovat. Zveřejněním tohoto kódu v podstatě napomáháte některým lidem ke krádežím duševního vlastnictví jiných autorů - můžete si myslet, že zveličuji, můžete se tomu smát, ale myslím to vážně. A to, že jste jej našel někde na internetu to nijak nesnižuje, naopak - opět jste zveřejnil něco co není Vaše bez odkazu odkud to máte a asi i bez souhlasu autora (i když tenhle se na Vás asi zlobit nebude). Napadá mně jednoduché řešení, které by mohlo fungovat, ale zkoušet ho nebudu a ani Vám ho nesdělím. Pouze požádám Vás nebo admina o stažení toho kódu.

Občas mi ale někdo nějaký list při editacích zamkne jiným heslem
Na to je jednoduché řešení - zamkněte a heslo nikomu nesdělujte - pokud má mít někdo právo udělat v sešitu změny tak mu ho sdělte nebo mu řekněte, že ty změny má provést ve spolupráci s Vámi. Pokud se Vám to přeci jen stane, pravděpodobně sklízíte vlastní ovoce.

Možná se k tomu MS konečně postavil čelem - i když to už asi situaci se zabezpečením nijak nezachrání.citovat
icon #022785
avatar
@ eLCha: opět jste zveřejnil něco co není Vaše bez odkazu odkud to máte a asi i bez souhlasu autora
On to ani autor uvedeného kódu nie je; sám to niekde splašil a dorobil tam akurát nejaké hlášky v češtine.
Inak, naprosto súhlasím s Vašim pohľadom na vec, bohužiaľ, ľudia si zvykli mať prístup k týmto veciam takpovediac zadarmo a za skutočne málo sú ochotní zaplatiť.
MS vo verzii office 2013 zabezpečenie súborov skutočne vylepšil a doteraz fungujúce "návody" už nefungujú.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje