< 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

Zaslat odpověď >

#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

export xls - konkrétní sloupce a pořadí

Alfan • 30.9. 15:11

open book

elninoslov • 30.9. 13:36

Podmíněné formátování - kopírování

elninoslov • 30.9. 13:30

export xls - konkrétní sloupce a pořadí

elninoslov • 30.9. 13:17

spustit makro změnou hodnoty v buňce a svyhledat

PavDD • 30.9. 10:10

Podmíněné formátování - kopírování

mikar • 30.9. 9:58

open book

PavDD • 30.9. 9:23