Hoe password in VB afschermen?

[mdk]

Beste mensen,

Gisteren heb ik dankzij dit forum een manier gevonden om een Excelbestand met macro's en meerdere werkbladen te beschermen tegen het aanpassen van cellen.
Vandaag kwam ik erachter dat iedereen die VB oproept van mijn Excelbestand, daar het wachtwoord dus kan zien staan....
Hmmm...hahaha....leuk, maar niet de bedoeling dus!
Dit staat er nu in VB:

Private Sub Workbook_open()
For x = 1 To Sheets.Count
    Sheets(x).Protect Password:="*****", UserInterfaceOnly:=True
Next
End Sub

Weet iemand hoe ik mijn bestand kan beschermen tegen aanpassingen, zonder dat het wachtwoord in VB komt te staan?

Alvast bedankt!

Groetjes,
MDK

 

[Hoornvan]

mdk,

Als je in de VBA editor ben, klik je met rechts op de file.
Kies voor Eigenschappen van VBA project.
Kies dan voor tabblad Beveiliging - zet een vinkje bij Project vergrendelen voor weergave.
Vul een Password in.

Dat is alles, vergeet niet dat als je wil er binnen een paar sec.in ben, dus niet echt veilig.

 

[mdk]

Het werkt prima met deze oplossing!

Enorm bedankt!

 

[zapatr]

Het werkt prima met deze oplossing!

Hoe sterk de beveiliging in Excel 2007 is weet ik niet, dat heb ik nog niet onderzocht;
maar in Excelversies vóór 2007, is die beveiliging binnen een halve minuut er af te halen.

 

[Hoornvan]

zapatr,
Hoe sterk de beveiliging in Excel 2007 is weet ik niet, dat heb ik nog niet onderzocht;
maar in Excelversies vóór 2007, is die beveiliging binnen een halve minuut er af te halen.

In mijn vorige bericht #2 had ik dit al vermeld.
Voor een echte beveiliging moet je geen Excel gebruiken.

Je kunt ook een beveiliging op de file zetten, dus zodra hij wordt geopend moet je een password invoeren.
Het wordt dan wat lastiger om binnen te komen.