VB Script soll Exceltabelle mit Schreibschutz öffn
Heinz
ich versuche mit VBS (nicht VBA!) ein Excelsheet zu öffnen. Problem ist, daß die Exceltabelle einen Schreibschutz hat und ich den Schreibschutzdialog nicht mit sendkeys geschlossen bekomme.
dim objExcel
Set objExcel= createobject ("Excel.Application")
objExcel.visible = true
objExcel.Workbooks.Open("test.xls")
objExcel.sendkeys "{ENTER}", true
objExcel.Sheets("Blatt1").select
gn_1 = objExcel.Cells(8,1)
...
Excel erscheint korrekt mit der Tabelle, aber immer mit dem Schreibschutzdialog, den ich ja eigentlich mit sendkeys mit Enter schließen möchte (ich benötige das Excelsheet nur für lesenden Zugriff)
Hat jemand eine Idee?
Danke im vorraus für Hilfe!
Heinz