|
Hall Internet,
Ich habe in meiner Applikation folgendes Login implementiert:
http://www.onlinepclearning.com/excel-userform-login/
Die Features sind:
- In einem AdminSheet stehen sowohl User als auch Passwörter.
- Ein Admin kann dieses Sheet einsehe und die User bekommen Zugriff auf jeweils bis zu 3 Sheets. Das ganze ist natürlich erweiterbar.
- Username und Passwort müssen beim öffnen eingegeben werden
- nach 3 falschen Eingaben schliesst das Workbook
- "Zugriff" wird mittels visible und veryhidden bewerkstelligt, d.h. wenn das passwort für User1 richtig eingegeben wird werden die ausgewählten, für User1 freigegebenen Sheets auf visible gesetzt.
- Login "Cancle" ist ausgeschaltet, login kann also nicht einfach weg geklickt werden
Das ganze funktioniert einwandfrei und gefällt mir ziemlich gut. Jetzt das Problem:
Sobald ein User sein Passwort weiss und ein klein wenig von VBA versteht weiss er alle Passwörter, denn er kann den VB Editor öffnen und:
1 | Worksheets(x).Visible=True
|
eintippen und er sieht das entsprechende Sheet. Das Login schützt effektiv vor Zugriff wenn man keines der Passwörter/User Kombinationen weiss. Aber sobald man eines weiss kann man sich Zugriff auf das AdminSheet mit den anderen Passwörtern verschaffen. Wie kann ich das schützen? Gibt es eine Möglichkeit das Direktfenster zu blockieren oder das Sheet anders vor Zugriff zu schützen? Ich bin durchaus bereit ein Login mit einer anderen Methode zu implementieren.
Grüsse
|