< návrat zpět

MS Excel


Téma: Ošetření souboru proti použití rss

Zaslal/a 2.1.2019 13:53

Ahoj ,přeji štěstí ,zdraví a mnoho dalších dobrých řešení se kterým tak pomáháte.
Dotaz : lze nějak ošetřit sešit aby ho nešlo otevřít např. mimo podnikovou sít nebo jen na vyjmenovaných počítačích.
Zatím to řeším dotazem na umístění souboru v adresáři na síťovém disku , zda existuje složka ze které je spouštěn.Pokud není spuštěn z tohoto adresáře tak se listy uzamknou.
Myslel jsem zda je možnost dotazu pomocí VBA třeba na bránu sítě nebo jmeno PC.
díky Stana V. 1

Jméno
Kontrola
Text
  b i u s img code url hr   1 2 3 4 5 6 7 8 9 10

#042292
avatar
Vzdejte to.citovat
#042293
avatar
Zatím nevzdávámmmm .
Zkouším pomocí Environ$("USERNAME")
vytvořit podmínku pro vyjmenované - povolené uživatele nebo počítače.

Pohodlnější by to bylo kdybych dokázal ověřit sít ( bránu) . Nemusel bych vyjmenovávat uživatele.

Díky a zatím bojuju.
SVcitovat
#042302
avatar
' Get the domain string ("dc=domain, dc=local")
Dim strDomain As String
strDomain = GetObject("LDAP://rootDSE").Get("defaultNamingContext")citovat
#042309
avatar

Barth napsal/a:

' Get the domain string ("dc=domain, dc=local")
Dim strDomain As String
strDomain = GetObject("LDAP://rootDSE").Get("defaultNamingContext")


nemůžu se pohnout dopředu. je to už pro mě moc vysoká matematika.nedokážu to použít. Počítače máme pouze ve skupině nejsme v domeně a soubor spouštíme z nasdíleného adresáře na lokálních PC. 7 7citovat
#042310
avatar
Pokud existuje místo na síťovém disku, kam dohlédnou pouze vybraní uživatelé, pak se mi řešení jeví poměrně snadné. Na takovém místě stačí založit maličký soubor s libovolným obsahem. Listy sešitu s citlivým obsahem by měly být při uložení ve stavu "VeryHidden" (alespoň jeden list ale musí zůstat viditelný).

Při otevření sešitu by měla procedura Worksheet_Open pokusit zavolat výše uvedený kontrolní soubor. Pokud se soubor najde, lze skryté listy zviditelnit. Když se nenajde, mělo by dojít k uzavření citlivého sešitu, protože byl otevřen z místa, odkud nelze kontrolní soubor zavolat. Při pokusu otevřít sešit bez maker, nedojde ke zviditelnění skrytých listů. VBA projekt citlivého sešitu by měl být zamčený s heslem.citovat
#042311
avatar

teta napsal/a:

Pokud existuje místo na síťovém disku, kam dohlédnou pouze vybraní uživatelé, pak se mi řešení jeví poměrně snadné. Na takovém místě stačí založit maličký soubor s libovolným obsahem. Listy sešitu s citlivým obsahem by měly být při uložení ve stavu "VeryHidden" (alespoň jeden list ale musí zůstat viditelný).

Při otevření sešitu by měla procedura Worksheet_Open pokusit zavolat výše uvedený kontrolní soubor. Pokud se soubor najde, lze skryté listy zviditelnit. Když se nenajde, mělo by dojít k uzavření citlivého sešitu, protože byl otevřen z místa, odkud nelze kontrolní soubor zavolat. Při pokusu otevřít sešit bez maker, nedojde ke zviditelnění skrytých listů. VBA projekt citlivého sešitu by měl být zamčený s heslem.

Krásná teorie. V praxi k ničemu.citovat

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

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09