Hallo,
ich versuche eine Exceldatei als
Html-Datei zu speichern, klappt auch so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
ExcelApp,Sheet :variant;
Workbook:_Workbook;
begin
ExcelApp:=createoleobject('excel.application');
ExcelApp.Workbooks.open(ExtractFilePath(Application.ExeName)+'1.xls',EmptyParam, EmptyParam, EmptyParam,EmptyParam, EmptyParam, EmptyParam, EmptyParam,EmptyParam, EmptyParam);
ExcelApp.ActiveWorkBook.SaveAs('c:\filename.html',FileFormat:=xlHtml,ReadOnlyRecommended:=false,CreateBackup:=False);
ExcelApp.DisplayAlerts := False;
ExcelApp.:=Unassigned;
ExcelApp.Quit;
end;
Mein Problem ist, ist c:\filename.html schon vorhanden gibt's einen Dialog den ich nicht haben möchte
Zitat:
---------------------------
Microsoft Excel
---------------------------
Eine Datei mit dem Namen 'c:\filename.html' existiert schon an diesem Platz. Soll sie ersetzt werden?
---------------------------
Ja Nein Abbrechen
---------------------------
Wie bekomme ich diesen Dialog weg?
gruss vom capo