MS Excel

Ahoj,

potřeboval bych poradit. Potřeboval bych vymyslet makro, které by po uplynutí nějaké doby (1 den) vypnulo veškeré vzorce a makra v sešitě. V praxi by to vypadalo tak, že by se se sešitem do uplynutí 1 dne pracovalo jakoby v plné verzi a pak by se celý obsah sešitu bloknul a nebylo by možné s ním dále pracovat. Veškerý obsah by se uzamkl pro vkládání jakýchkoliv dat.
Je možné něco takového udělat?

Děkuji za každou radu.

Martin

Zaslat odpověď >

Strana: « předchozí 1 2

Začátečník(29.7.2010 8:50)#002020

To Jeza.m:
Souhlasím, upozorňoval jsem na automatické uložení.

If Date > Cells(1, 256) + Cells(2,256) Then
List1.Unprotect "heslo" '...odemknout list s heslem "heslo" - můžeš nastavit cokoliv
Cells.Locked = True '...zamknout buňky
List1.Protect "heslo" '...zamknout list s heslem "heslo" - můžeš nastavit cokoliv
ActiveWorkbook.Save ' uložení sešitu se změnami
End If

Je samozřejmostí, že takovéto testy by se měly dělat při otvírání sešitu.

Mj. s těmi registry to není špatné, čekal jsem, že to vykoumáš.

Existuje taky něco jako DeleteSetting(....)???citovat

Jeza.m(29.7.2010 9:13)#002021

DeleteSetting jsem dřív nikdy nezkoušel, teď jsem zkusil a existuje :-)
DeleteSetting "Aplikace", "Demo", "Datum"
M@citovat

marficek119(29.7.2010 19:24)#002024

Díky za reakce k tématu.
Nicméně nevím, zda bude nutné to řešit zápisem do registru? Zatím testuji navrhované možnosti.
Pokud přeci jenom bych přistoupil k možnosti zápisu dat do registru, kam vložit onen kód (zápis, načtení)
Martincitovat

Začátečník(29.7.2010 20:49)#002025

To marficek119:
Pokud si nejseš jist základními věcmi, pak s registry raději neexperimentuj.
Vložení do registru musí být na začátku (při otevření sešitu) - otestovat, zda je klíč v registru zapsán, pokud ne tak zapsat.
Načtení pak následuje a pokud je splněna podmínka uzamčení - uzamknout list.

To Jeza.m:
Co se týká DeleteSetting

DeleteSetting "Aplikace", "Demo", "Klíč" - vymaže pouze "Klíč" z registru;
DeleteSetting "Aplikace", "Demo" - vymaže celou sekci "Demo";
DeleteSetting "Aplikace" - vymaže celou větev "Aplikace" - tedy vyčistí po sobě.

Loncitovat

Strana: « předchozí 1 2

Téma: Omezení dat v sešitě

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje