Ausgabe in TXT Formatieren

Forumthread: Ausgabe in TXT Formatieren
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Ausgabe in TXT Formatieren

02.10.2003 22:53:18

Philipp

Hallo!

Folgendes Problem:
In A1, A2, A3 stehen Dezimalzahlen, z.B. 0.333, 0.660, 0.000 die dort auch formatiert sind auf drei Nachkommastellen.
Ich möchte eine Datei erzeugen, in die die Zahlen so ausgeben werden wie sie in den Zellen stehen.
mit Print #1, A1 & " " & A2 & " " & A3 & " " entsteht nur 0.333 0.66 0

Wie fülle ich meine fehlenden Stellen mit Nullen auf?

Danke im Voraus

Philipp

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Ausgabe in TXT Formatieren

02.10.2003 23:05:43

Hajo_Zi
AW: Ausgabe in TXT Formatieren

02.10.2003 23:28:18

Philipp
AW: Ausgabe in TXT Formatieren

02.10.2003 23:07:38

GerdW

AW: Ausgabe in TXT Formatieren

02.10.2003 23:05:43

Hajo_Zi

Hallo Philipp

schaue mal in die VBA Hilfe unter Format.

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

AW: Ausgabe in TXT Formatieren

02.10.2003 23:28:18

Philipp

Danke,

da habe ich gefunden, was ich brauchte.
Bsp.:

dim l as double
l=worksheets(1).cells(1,1).value
l=format(l, "###0.000")
print #1, l

liefert mir in der Datei 0.000 wie gewünscht.

Gruß Philipp

AW: Ausgabe in TXT Formatieren

02.10.2003 23:07:38

GerdW

Print #1, [A1].text & " " & [A2].text & " " & [A3].text & " "

Gerd

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!