werkblad optimaal beveiligen

[YvesL]

hallo!

we hebben hier een bestandje op het werk
maar het is niet de bedoeling dat iedereen er in kan...

eerst en vooral hebben we het gewoon beveiligd
extra--> beveiliging --> werkblad beveiligen
maar we hebben er ook een macro in geplaatst
zodat er bij het opstarten van het werkblad een wachtwoord wordt gevraagd
indien fout --> wordt het werkblad terug afgesloten

Sub AUTO_OPEN()
Dim Password, Pword
Password = "TEST"
Pword = InputBox("Type Uw Wachtwoord")
If Pword <> Password Then
MsgBox "password is verkeerd"
ActiveWorkbook.Close
End
End If
End Sub

zover zijn we al

nu het enigste minpunt is...
als je bij het opstarten klikt op "macro's uitschakelen"
dan kan je er dus gewoon in
en het ergste van al is, dat je via VBE nog eens de macro kan bewerken ook!
en eventueel het passwoord kan veranderen :s

is er geen mogelijkheid dat dit wachtwoord niet te omzeilen valt?

alvast bedankt!

 

[Wigi]

Je kan een paswoord zetten op de VBA code zetten, maar meer kan je niet doen in Excel / VBA. Onthoud dat de beveiliging in Excel / VBA van dien aard is, dat als men het bestand wil kraken dat dan ook kraakbaar is. Met paswoorden op bestandsstructuur, elk werkblad en VBA code schrik je wel meer dan 99% van de mensen af. Voor 2007 zou het iets verbeterd zijn, maar daar weet ik niet het fijne van.

 

[richard1970]

Beste YvesL,

Truukje.
Maak een Event genaamd: Private Sub Workbook_BeforeClose(Cancel As Boolean)
Daarin zet je code dat op één na alle werkbladen verborgen worden via XlVeryHidden. Dan kan de gebruiker de werkbladen ook niet terughalen via Opmaak > Werkblad > Zichtbaar maken.
Je maakt ook een Event genaamd: Private Sub Workbook_Open() waarin die werkbladen zichtbaar worden gemaakt.
Jij slaat dan het bestand op.
Als een gebruiker de macro's uitschakelt, kan 'ie helemaal niets

Verder sluit ik me bij Wigi aan.

Richard

 

[YvesL]

Beste YvesL,

Truukje.
Maak een Event genaamd: Private Sub Workbook_BeforeClose(Cancel As Boolean)
Daarin zet je code dat op één na alle werkbladen verborgen worden via XlVeryHidden. Dan kan de gebruiker de werkbladen ook niet terughalen via Opmaak > Werkblad > Zichtbaar maken.
Je maakt ook een Event genaamd: Private Sub Workbook_Open() waarin die werkbladen zichtbaar worden gemaakt.
Jij slaat dan het bestand op.
Als een gebruiker de macro's uitschakelt, kan 'ie helemaal niets

Verder sluit ik me bij Wigi aan.

Richard

Dit ga ik eens proberen

een paswoord schrikt idd de meeste gebruikers wel af
maar hier werken er een paar die toch een stap verder durven

bedankt!

 

[Wigi]

maar hier werken er een paar die toch een stap verder durven

Durven is daarom nog niet kunnen.

Een paswoord van iet of wat lengte, met cijfers letters (kleine en hoofdletters), een leesteken, ... daar zijn kraakprogramma's toch een tijdje mee zoet. En die waarvoor je niet betaalt stoppen al bij de eerste 3 karakters of zo.

 

[Spiderman]

Als het gaat om het beveiligen van een hele excel bestand. En dan zodanig dat je er alleen in mag als je het wachtwoord kent.

Dus alleen als je het wachtwoord kent mag je alles. Ken je het wachtwoord niet dan kom je niet in het bestand, dan kun je het volgende doen.

Ga naar Extra-Opties en kies tabblad Beveliging.
Type bij 'Wachtwoord voor openen' een wachtwoord.
Ga naar Geavanceerd en kies daar voor 'RC4, Microsoft Strong Cryptographic Provider'


Op deze manier kun je het bestand alleen openen als je het wachtwoord kent.
Kraken is wel te doen, als je een weekje of wat hebt

 

[Jan van Asseldonk]

Kijk even op dit topic.
Daar staat onderaan een klein voorbeeldje. Wachtwoorden zelf nog instellen.

 

[arafy]

als het op het werk is, is het waarschijnlijk een netwerk. een aparte map met restricties van wie wat mag doen is ook een optie.

steven

 

[jpvs]

Zie hier nog een voorbeeld van Oele van Dishoeck.

Pierre