< návrat zpět

MS Excel


Téma: Viditelnost listů dle uživatelů v síti rss

Zaslal/a 10.1.2014 12:14

Dobrý den,

potřeboval bych poradit jak docílit viditelnosti konkrétních listů definovanými uživatele. Pro upřesnění vás uvedu do problému.

Mám report pro vedení společnosti, kde jsou na jednotlivých listech různá data a potřebuji, aby když sešit otevře konkrétní uživatel (dle lokální sítě jako u revize -> Povolit uživatelům úpravy oblastí, kde si vyhledám v síti uživatele) viděl jen listy, které si nadefinuji. Do reportu by mělo přístup jen pár manažerů vedení společnosti a ti by například pod heslem viděli reporty za své úseky, pak generální ředitel by viděl vše a další uživatelé by se do excelu ani nedostali.

Děkuji za rady (ideálně příklad) jak toto provést.

Zaslat odpověď >

Strana:  1 2   další »
#017156
avatar
dalo by sa to riesit eventom ked sa otvori dokument a potom len definovat uzivatelov pomocou:

Environ$("username")citovat
#017167
avatar
Děkuji za reakci, bohužel programování mě minulo, takže ve VBA neumím :( Dokážu si přes VBA nahrát nový modul s kódem a použít ho jako makro a samotný kód bohužel nenapíšu. Předpokládám že cesta "klikací" pře standardní část excelu asi nepovede :(citovat
#017168
avatar
no neviem ci ma taku moznost office ale je dost mozne ze to ma ... ja osobne o nej zatim nic neviem ale kludne sa neham poucit :)

tu som urobil to makro:
Private Sub Workbook_Open()
For x = 1 To Sheets.Count - 1
Sheets(x).Visible = False
Next

Select Case Environ$("username")
Case "Login1"
Sheets(1).Visible = True
Case "Login2"
Sheets(2).Visible = True
Case "Login3"
Sheets(3).Visible = True
Case "Login4"
Sheets(4).Visible = True
Case "Login5"
Sheets(5).Visible = True
End Select
End Sub


v makre treba este zamiesto login1,2,3,4 dopisat loginy userov a potom dopisat ktory slide sa ma odkryt

posledny slide je odkryty pre vsetkych tak preto tam je count - 1

- samozrejme dasato aj lepsie spravit len netusim vobec naco to potrebujete

priloha:
Příloha: zip17168_test.zip (17kB, staženo 48x)
citovat
#017169
avatar
este som tam urobil makro na zistenie ID usera staci ho kliknut na pocitaci a vypise vam jeho ID namecitovat
#017171
avatar
Děkuji za uvedený soubor. Hodně pomohl :) Potřebuji to pro reporting pro vedení. Jednotlivá oddělení musí mít přístup k určitým reportům (listům), ale nesmí vidět reporty z jiných oddělení. Reporting je ale v jednom uceleném excelu. Když po spuštění spustím makro, tak se mi dle tvého návodu zviditelní listy které potřebuji. Problém ještě nastává v tom, že potřebuji zabezpečit, aby se neoprávněný uživatel nedostal do zbylých listů, tedy potřeboval bych sešit zamknout. Pak mi ale makro hlásí chybu. Napadlo mě zda to nejde obejít v kódu, případně jak v kódu nastavit skrytí listu jako "VeryHidden", že není vidět pokud si chce někdo list zobrazit. Pak bych ještě potřeboval, aby se mi makro spouštělo vždy a bez něj se excel ani neotevřel, ale to bude asi někde v nastavení excelu.

Díky :)citovat
#017173
avatar
no a presne toto som potreboval pocut a preto vam navrhujem lepsiu metodu a aj istejsiu ako to riesit takto

najidealnejsie je si spravit makro ktore automaticky rozposle danemu uzivatelovi dany sheets

je to aj lahsie a aj bezpecnejsie ... lebo aj verryHiden keby ze sa naseru tak to aj tak uvidim :))

nechcete radsej makro na posielanie sheetov?citovat
#017174
avatar
Sheets(1).Visible=xlSheetVeryHidden
Sheets(1).Visible=xlSheetVisible
Sheets(1).Visible=xlSheetHiddencitovat
#017175
avatar
Palooo: Určitě bych byl rád a vyzkoušel, pokud píšete že to bude jednodušší.

Předem děkuji :)citovat
icon #017179
eLCHa
Jednoduché řešení, které si budete moci obsluhovat sám:

Vytvořte každému manažerovi soubor a v něm kopii pouze tabulek, které má vidět. Tyto tabulky odkazujte na originály ve vámi obsluhovaném sešitě.

Je to bez maker, asi i nejspolehlivěji zabezpečené (pokud budete chtít heslovat, tak je obtížnější prolomit heslo v souboru než prolomit VBA - i když pochybuji, že by se o to manažeři snažili) a jak říkám, budete to umět sám.citovat
#017203
avatar
eLCHa: O této variantě jako jediné vím a zatím to tak je řešené. Chtěl jsem to ale posunout kousek dál a třeba se něco nového naučit. V každém případě moc děkuji za reakci :)citovat

Strana:  1 2   další »

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21