| Autor |
Uzamčení buňky bez uzamčení listu |
Bombardo
Člen
Příspěvků: 22
Založen: 20.12.08 |
|
Zdarvim, poradíte mi někdo.
Potřebuji chránit určité buňky, ale nechci zamikat list.
Jde to nějak |
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
eLCHa
Člen
Příspěvků: 81
Bydliště: Ostrava
Založen: 22.05.08 |
|
Jinou možností je
Data -> Ověření
Nebo nejjednodušší je skrýt buňky
Pak už asi VBA
Záleží, jak je potřebuješ chránit a proč nechceš zamknout list
Já osobně list zamykám (bez hesla) skoro pokaždé, protože to je nejlepší ochrana proti přepsání. Přijde mi škoda vymýšlet něco co už je vymyšlené
Karel Koutný
eLCHa@email.cz |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
Bombardo
Člen
Příspěvků: 22
Založen: 20.12.08 |
|
|
Používám seskupení dat, a pokud je uzamčen list tak to nejde, jinak bych samo nevymýšlel nic jiného. Uzamčení by mi vyhovovalo , ale jak píšu nelze využít seskupování dat. |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
eLCHa
Člen
Příspěvků: 81
Bydliště: Ostrava
Založen: 22.05.08 |
|
zase bych asi nevymýšlel jak chránit buňky ale jak dočasně a co nejsnadněji dočasně odemknout list
potom 3 možnosti
-(bez vba) vytáhnout si panel Zámek (excel 2003) a před každým seskupením si odemknout a zamknout list
- nebo si na list umístit vlastní tlačítko, které ti list odemkne a zamkne
| Kód VBA | Sub cb_click() With ActiveSheet if .ProtectContents then .unprotect else .protect end if end with End Sub
|
- nebo to celé udělat kódem (nejjednodušší příklad,co mě napadl):
| Kód VBA | Sub cb_click() With ActiveSheet .Unprotect .Outline.ShowLevels 1 .Protect end with End Sub
|
Karel Koutný
eLCHa@email.cz
Upravil eLCHa, 27.01.2010 21:46 |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
Bombardo
Člen
Příspěvků: 22
Založen: 20.12.08 |
|
Díky reakce a trpělivost, ale:
Uživatel má zamknutý list, jenže data jsou seskupena třeba měsíce.
Jak mu povolit, aby mohle sbalovat a rozbalovat seskupení.
Když mu odmknu sešit smázne mi vzorec :-).
Nedá se to nějak přes Ověření?
Upravil Bombardo, 27.01.2010 21:59 |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
eLCHa
Člen
Příspěvků: 81
Bydliště: Ostrava
Založen: 22.05.08 |
|
mno, řekl bych, že varianta 2 a 3, když se dobře udělá, tak si uživatel ani nevšimne, že sešit byl odemčený
ale napadlo mě lepší řešení a to pomocí autmatického filtru
vložil bych si sloupec a do něj zadal číslem úroveň řádku
list pak můžeš zamknout a při zamykání zaškrtnout povolit automatický filtr
takže si pak uživatel vyfiltruje úroveň stejně jako by kliknul na křížek
v excelu 2000 ta možnost tuším nebyla, 2002 nevím ale v 2003 už je určitě ;)
Karel Koutný
eLCHa@email.cz |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
Bombardo
Člen
Příspěvků: 22
Založen: 20.12.08 |
|
S tím filtrem to je pakárna. Opravdu neexistuje elegatní způsob jak jsem se jiz ptal třeba přes ověření?. Nevím jak udělat ověření , aby mi nepřepsali danou buňku. Tohle kdyby šlo, byla by to paráda.
No a nebo , kdyby se tak dala chytit událost kliku na + - seskupování, pak by se to dalo taky ošetřit
Upravil Bombardo, 28.01.2010 19:17 |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
eLCHa
Člen
Příspěvků: 81
Bydliště: Ostrava
Založen: 22.05.08 |
|
|
Bombardo napsal:
S tím filtrem to je pakárna...
když se nebude dařit tak 10 minut práce (nezávisle na počtu řádku ;) ) a bez maker
mno přeji štěstí při řešení problému ;)
Karel Koutný
eLCHa@email.cz
Upravil eLCHa, 28.01.2010 19:52 |
|
|
| Autor |
RE: Uzamčení buňky bez uzamčení listu |
Bombardo
Člen
Příspěvků: 22
Založen: 20.12.08 |
|
Zdarec, tak jsem požádal o pomoc pana Cisaře z Dataspektrum a tem mi poradil , přesně to co jsem potřeboval.
Doufám , že se na mne nebude zlobit, ale použiji jeho radu v tomto foru, třeba se to někomu bude hodit.
| Kód VBA | Private Sub Workbook_Open() With Worksheets("AUTA") .Activate .EnableOutlining = True .Protect Contents:=True, UserInterFaceOnly:=True End With End sub
|
|
|
|
