Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Excel Kopfzeilen / Fußzeilen (https://www.delphipraxis.net/122852-excel-kopfzeilen-fusszeilen.html)

Errraddicator 23. Okt 2008 08:34


Excel Kopfzeilen / Fußzeilen
 
Hiho,

hab da ma ne kurze Frage:
Ich wollte in einem Excel-Dokument - welches ich über OLE mit Daten fülle - Kopf- und Fußzeile hinterlegen.
In die Kopfzeile soll der Dateiname, in die Fußzeile "Seite x von y".

Jetzt hab ich das Ganze mal in VBA aufzeichnen lassen und das erhalten:
Delphi-Quellcode:
With ActiveSheet.PageSetup
  .CenterHeader = "&F"
  .CenterFooter = "Seite &P von &N"
So weit so gut, habe dann in meinem Delphi-Code das daraus gemacht:
Delphi-Quellcode:
vWorksheet.PageSetup.CenterHeader  := '&F';
vWorksheet.PageSetup.CenterFooter  := 'Seite &P von &N';
vWorksheet.PageSetup.PrintTitleRows := '$1:$1';
Aber im fertigen Dokument hat er quasi die Felder vertauscht.
Also unter "&P" steht nich die Nummer, wie wenn ich es manuell mache, sondern der Dateipfad.

Hat einer eine Idee, woran das liegt / wie ich das gelöst bekomme?


Danke im voraus

cu Patrick

Errraddicator 23. Okt 2008 08:46

Re: Excel Kopfzeilen / Fußzeilen
 
Ok, hab jetzt einfach mal geraten und anstatt F für File N für Name genommen, und dann passt es.
Bzw. das hatte ich ja durch Zufall herausgefunden, weil es ja der Fehler war. *G*

Habe dann einfach ma frei übersetzt und das daraus gemacht:
Delphi-Quellcode:
vWorksheet.PageSetup.CenterHeader  := '&N';
vWorksheet.PageSetup.CenterFooter  := 'Seite &S von &A';
Ich vermute mal, dasses sowas heißt:
N = Name
S = Seite
A = Anzahl

Und jetzt funzt es. :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:24 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz