Office: Excel Zelle formatieren

Hallo,

ich will aus einer Anwendung raus Daten in ein Excelblatt schieben und muß danach oder davor die Zellen formatieren...

Das Schreiben funktioniert auch super, bloß wenn ich eine Nummernfolge (als Zahl oder als String!)
z.B. 1936874589263758902 an eine Zelle übergebe, kürzt Excel automatisch die Zahl (oder den Text) als "1,9 E hoch irgendwas" ab. Ich will aber das die Zahl wie ein Text ausgeschrieben in der Zelle steht -ob als Zahl oder String ist mir völlig egal.

Streiche ich nun die Nachkommastellen in Excel direkt, wird die Zahl korrekt dargestellt. Formatiere ich Sie aus meiner Anwendung heraus mit

oExcel.Range(sCellNumber).NumberFormat = "0"

passiert gar nix.

Kann mir jemand helfen?

:)

 

Moin, pho_no2,

vor die Ziffernfolge ein ' setzen und per & mit der Zahl verbinden, was Excel dazu bringt, die Zahlen als Text zu interpretieren...

 

Ciao pho_no2,

entweder mit dem ' davorsetzen, wie es Jinx schon erwähnt hat, oder folgendes:

Zellen formatieren > Zahl und die Dezimalstellen auf 0 setzen

Ich habe es mit VBA ausprobiert ( dabei habe ich diese Zahl in der Zelle A1 geschrieben ), der Code hierfür:

Code:

Die Zellen müsstest du dann mit den deinen ersetzen!

Ciao Silvestro

 

Moin, Silvestro,

Und nu? Du formatierst in Excel, was funktioniert, auch im Beitrag erwähnt...

 

Ciao Jinx,

ich habe es mit seinem " oExcel.Range(sCellNumber).NumberFormat = "0" "
ausprobiert und dort eine Fehlermeldung:
(Laufzeitfehler '424' , Objekt erforderlich ) erhalten!

Aus diesem Grunde habe ich den anderen Code eingefügt!
Ich hoffe, dass ich nichts falsches gesagt habe *rolleyes.gif*, aber bei mir funktioniert es so!

Ciao Silvestro

 

Moin, Silvestro,

Du wirst es aber nur aus Excel heraus versucht haben. Und ich hatte es so verstanden, dass diese Codeanweisung aus der Fremdanwendung (welche das auch immer sein mag) ohne "Folgen" auf Excel bleibt. Aber ich kann mich ja täuschen...

 

Ciao Jinx,

nein, ich habe den Code selbst geschrieben und ihn dann nachher, nachdem ich gesehen habe das er funktioniert, für pho_no2 hier online gestellt. *wink.gif*

Ciao Silvestro