SendKeys
10.01.2006 11:29:57
tigersat
ich habe für das Setzen des Projektschutzes von VBA aus die SendKeys-Methode verwendet:
SendKeys _
"%{F11}%xi+{TAB}{RIGHT}{TAB}{TAB}" & _
"kennwort" & "{TAB}" & "kennwort" & "{TAB}{ENTER}%{q}"
Kurzer Hintergrund für euch zur Info:
Ich habe eine Prozedur erstellt, die überprüft, ob eine Datei vorhanden ist oder nicht. Falls nicht, soll sie neu erzeugt und mit dem Codeinhalt aus einer anderen Datei eingefügt werden.
Da dieser Code von anderen Benutzern nicht eingesehen werden dürfen, muss im Projekt der Schutz gesetzt werden.
Dies habe ich mittels SendKeys durchgeführt (Siehe oben).
Anschliessend habe ich den Arbeitsmappenschutz gesetzt, damit der Projektschutz wirksam ist.
Dennoch stelle ich fest, dass diese neu erzeugte Datei zwar den Code im Projekt enthält, aber nicht geschützt ist.
Ich habe bereits in den anderen Foren nach korrekten SendKeys gesucht und sie mit meinen verglichen. Alles passt, nur der Schutz dagegen nicht!
Warum?
Bei mir liegt die Vermutung nahe, dass ich einige wichtige Einstellungen übersehen habe, die für diesen Schutz notwendig sind.
Oder liege ich da falsch?
Kann jemand mir bitte helfen?
Gruss
tigersat