ich habe meine Dateien mittels Benutzer Erkennung und passende Steuerung geschützt, das funktioniert aber nur innerhalb meiner Abteilung, da nur diese Kollegen meinem Zertifikat vertrauen.
Wenn jetzt jemand aus einer anderen Abteilung, die Datei öffnet und die Frage nach dem Makro mit "Nein" beantwortet, dann kommt dieser mit unter auf unsere Abteilungsdaten.
Um dies zu verhindern, sehe ich nur eine Möglichkeit, nämlich die Dateien mit einem Öffnen-Kennwort zu versehen.
Nun suche ich für meine Kolleginnen und Kollegen eine Möglichkeit diese Dateien, per *.vbs Script zu öffnen, ohne immer wieder das Passwort einzugeben.
Ein Script zum öffnen habe ich schon aus einer anderen Datei.
Set wshell = CreateObject("Wscript.shell")
wshell.Run ("EXCEL.EXE ""\\Beispielpfad\Netzwerk\Musterdatei.xls""")
Wie müsste das Script denn aussehen, wenn die Datei Passwort geschützt wäre.Dieses Script habe ich bei meiner Suche heute morgen gefunden.
gefunden bei einem Posting von jah aus 2006
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run(chr(34) & "G:\IT Support\NetDok\Inventar\INVENTAR.XLS" & chr(34))
WScript.Sleep 100
do until success = true
success = WshShell.AppActivate ("Kennwort")
WScript.Sleep 1000
Loop
WshShell.SendKeys "passwort{ENTER}"
Wie immer, besten Dank schon im voraus.Viele Grüße
Jürgen