Autor Beitrag
Bise
Hält's aus hier
Beiträge: 4



BeitragVerfasst: Di 08.10.02 21:28 
Hallo,

aus D5 heraus starte ich Excel97 mit
ausblenden Quelltext
1:
excel := GetActiveOleObject('Excel.Application');					

und möchte nun bestimmte Zellen in einem benutzerdefinierten Format haben, nämlich '#.
0,00 "€"'.
Der Wert, der nach der Formatzuweisung in der Zelle stehen soll, kommt entweder aus der Datenbank oder aber ist hartcodiert im Quelltext.
Das ganze mache ich so:
ausblenden Quelltext
1:
2:
Excel.ActiveCell.NumberFormat := '#.
0,00 "€"';

oder so
ausblenden Quelltext
1:
2:
Excel.Cells.Range[r1, r2].NumberFormat := '#.
0,00 "€"';

oder so
ausblenden Quelltext
1:
2:
Excel.Worksheets.Item[1].range[r1, r2].Numberformat := '#.
0,00 "€"';

Natürlich immer nur eine Variante ;-)

Bei 2 Zellen formatiert Excel auch ordentlich (da steht dann 10,00 €), einmal ist es ein Wert aus der Datenbank und das andere mal ist der Wert hart codiert. Bei den übrigen Zellen, stört sich Excel aber nicht an das Format und in den Zellen steht z.B. 0,5 oder 8,5. Das Format für diese Zellen ist auch richtig eingetragen nur die Darstellung geht nicht. :roll:

Weiß vielleicht jemand, woran das liegen kann. Vielleicht seh ich ja vor lauter Bäumen den Wald nicht mehr.

Für evt. Hilfe schon mal 1000 Dank.

Grüße

Bise

(09.10.02 09:46 Tino) Code-Tags hinzugfügt.
bis11
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1247
Erhaltene Danke: 2

Apple Mac OSX 10.11

BeitragVerfasst: Di 08.10.02 21:33 
Hi,

hast Du schon mal versucht es über ein Makro zu machen und dieses dann umzusetzen ?
Bise Threadstarter
Hält's aus hier
Beiträge: 4



BeitragVerfasst: Di 08.10.02 21:53 
Hi Bis,

genauso hab ich den Delphi.Code erst herausgefunden, nämlich über die Excel-Makros. Aber es funzt nur bei 2 Zellen. Die anderen werden genauso aufgerufen, nur Excel macht sich da nix draus.

Iss mir echt ein Rätsel.

Gruss


Bise