Passwort geschützte Excel-Datei via WSH öffnen

[jah 10]

Hallo zusammen,

 

ich brauche ein Script um eine Excel Datei mit Passwort zu öffnen. Momentan verwende ich dazu folgendes Script, ich denke aber es müsste noch eine elegantere Lösung geben.

 

Mein Script:

 

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}"

 

 

Hat jemand vielleicht eine Idee für eine bessere Lösung?

 

Gruss,

 

jah