Siechfred: Save As fenster Wie???

Beitrag lesen

Tag Norbert1.

möchte das an dieser Stelle das SaveAs fenster geöffnet wird
[...]
<script>
  objExcel = new ActiveXObject('Excel.Application');
  hallo=objExcel.Workbooks.Open('c:\test2.xls');
  hallo.Worksheets(1).range('a1:b3').value="rudi";
  alert(hallo.Worksheets(1).range('a1').value);
  objExcel.ActiveWorkbook.SaveAs('c:\test.xls');  <------
  objExcel.Quit();
</script>

Zunächst darf ich dich auf die Referenz zum Excel.Workbook-Objekt verweisen, falls du diese noch nicht kennen solltest. Dort gibt es ein Howto zum Thema SaveAs. Dort unter Tipps ist die Rede von der Application.DisplayAlerts-Eigenschaft, welche man auf true setzen soll, um Dialoge angezeigt zu bekommen. Ohne Gewähr könnte es so aussehen:

<script language="JScript">
  objExcel = new ActiveXObject('Excel.Application');
  objExcel.DisplayAlerts = true;
  hallo=objExcel.Workbooks.Open('c:\test2.xls');
  hallo.Worksheets(1).range('a1:b3').value="rudi";
  alert(hallo.Worksheets(1).range('a1').value);
  objExcel.ActiveWorkbook.SaveCopyAs('c:\test.xls');  <------
  objExcel.Quit();
</script>

Btw, das Ganze läuft natürlich nur im IE und bei entsprechend niedriger Sicherheitsstufe. Wenn du garantieren kannst, dass dein Code nur auf IEs ausgeführt werden wird, solltest du evtl. besser mit VB-Script arbeiten, damit wärst du unabhängig von ActiveX.

Siechfred

--
Zum Testen freigegeben: Siechfreds kleines Weblog
Wer Fehler findet, bitte an die angegebene E-Mail schicken. Danke.