Forum: Programmieren allgemein
by oakley,
20. Jun 2020
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?
ExcelApp :=...
Forum: Programmieren allgemein
by oakley,
25. Mai 2020
Okay also ich habe es jetzt so gemacht, dass ich LCID abfrage.
LCID := Languages.indexOf(SysLocale.DefaultLCID);
syslang := Languages.LocaleID;
Wenn syslang = 1031 habe ich als Systemsprache Deutsch.
Forum: Programmieren allgemein
by oakley,
25. Mai 2020
Danke für den Code Chemiker ich hatte bis jetzt immer nur die Standardfunktion GRID.SaveFiletoXLS(Dateiname:String) verwendet.
Andreas, gibt es da nichts, das Sprachunabhängig ist? Was macht man wenn man verschiedene Sprachversionen Excel hat? Deutsch und Englisch z.B.?
LG
Mirko
Forum: Programmieren allgemein
by oakley,
22. Mai 2020
Nachdem das Ganze jetzt mit dem Neuschreiben der Zahlen funktioniert wollte ich noch die letzte Spalte als Datum formatieren.
Ich habe ein Datum-Format mit Schrägstrichen, also sowas wie 24/12/2020 .
In Excel werden in der betreffenden Spalte teilweise Zellen als Text, teilweise Datum erkannt.
ExcelApp.Range.EntireColumn.NumberFormat:= 'dd/mm/yyyy';
Funktioniert leider nicht. Excel formatiert...
Forum: Programmieren allgemein
by oakley,
20. Mai 2020
Hallo Andreas,
ja da hast Du recht. Ich habe die Speicher Routine eines AdvStringgrid von TMS genommen und die hat die Daten einfach als Text übertragen.
Das war der Fehler. Die Neuformatierung hat dann alles wieder gerade gebogen.
Noch eine kurze Frage, da ich nur sehr selten so etwas mache wie Excel fernsteuern: Im Editor wird mir EntireColumn.Numberformat als undeklariert angezeigt bei ...
Forum: Programmieren allgemein
by oakley,
19. Mai 2020
In A1 steht die Überschrift also ein Text.
Und es ist ein deutsches Excel.
LG
Mirko
Forum: Programmieren allgemein
by oakley,
19. Mai 2020
Hallo Andreas,
wenn ich mit der rechten Maustaste auf die Zahl klicke und nachschaue, sehe ich, das sie als Zahl formatiert ist und oben links die Markierung für den Ablaufverfolgungsfehler angezeigt. Also das grüne Dreieck. Ich habe noch die Zeile:
ExcelApp.Range.EntireColumn.Numberformat := '0,00';
nach
ExcelApp.Range.EntireColumn.Numberformat := '#.##0,00';
Forum: Programmieren allgemein
by oakley,
19. Mai 2020
Hallo zusammen,
ich speichere ein TAdvStringgrid als Excel ab und erhalte durch nachträgliches Anpassen auch ein ordentlich formatiertes Excel Sheet.
Ich habe allerdings noch das Problem mit den Zahlen.Ich verwende:
ExcelApp := CreateOleObject('Excel.Application');
Workbook := ExcelApp.WorkBooks.Open(excelfilename);
ExcelApp.Range.EntireColumn.Numberformat := '0,00';
Und die Zahl wird...