Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro zur Ausgabe als txt-Datei

Forumthread: Makro zur Ausgabe als txt-Datei

Makro zur Ausgabe als txt-Datei
01.07.2005 12:25:27
Ingo
Hallo
Ich hoffe mir kann jemand weiter helden.
Ich bräuchte ein Makro, dass mir Spalten A-I, mit Komma abgetrennt, in eine txt-Datei ausgibt.
Leider kenne ich mich nicht mit dem Schreiben von Makros unter Excel aus und da es sehr eilig ist, würde es wohl auch zu lange dauern, dass ich es mir eben mal selbst beibringe :(
Wäre also nett, wenn mir das jemand kurz zeigen könnte.
Die Ausgabe in der txt-Datei müsste so aussehen:
Z.B.:
1000,2000,3000,4000,5000,6000,7000,8000,9000,
Schonmal danke für jegliche Hilfe.
MfG
Ingo
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro zur Ausgabe als txt-Datei
01.07.2005 12:47:20
Alexander
Gib mal im Suchfeld den Begriff "TXT" ein. Da ist ein langer Thread, der dein Problem lösen sollte.
AW: Makro zur Ausgabe als txt-Datei
01.07.2005 13:01:16
ede
hallo
versuchs mal damit

Sub export2txt()
Dim sFile As String
sFile = "c:\export.txt"
Close
Open sFile For Output As #1
Zeilen = 10  ' für 10 Zeilen
spalten = 9 ' für A..I
For z = 1 To Zeilen
mytext = ""
For s = 1 To spalten
mytext = mytext & Cells(z, s).Value & ","
Next s
Print #1, mytext
Next z
Close
End Sub

--
viel erfolg
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige