Also das nachträgliche Schreiben der Formate funktioniert.
Das Workbook wird auch nicht angezeigt weil Excelapp.Visible := false gesetzt ist.
Sobald Excel das erste mal gestartet ist wird eine zweite Excel Instanz erzeugt und die ist dann direkt sichtbar.
Wir kann ich unterdrücken, dass bei geöffnetem Excel das Workbook direkt angezeigt wird?
Code:
ExcelApp := CreateOleObject('Excel.Application');
Excelapp.Visible := false; <- Wird bei laufendem Excel ignoriert
Workbook := ExcelApp.WorkBooks.Open(excelfilename); <- hier wird die Datei dann im sichtbaren Excel geöffnet, was aber falsch ist
ExcelApp.Range['A1','J1'].EntireColumn.AutoFit;
ExcelApp.Range['A1','J1'].Font.Bold := True;
ExcelApp.Range['A1','J1'].HorizontalAlignment := -4108; //xlHAlignCeenter
ExcelApp.Range['A1','J1'].Interior.Color :=
RGB(150,150,150);
...
Excelapp.Visible := True;
LG
Mirko