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

Forumthread: Inhalt einer Zelle in .txt speichern

Inhalt einer Zelle in .txt speichern
28.08.2024 12:01:44
Tim
Hallo,

Ich habe eine Excel Tabelle aus der ich Informationen ziehe für den Import in ein anderes Program. Als Import-Datei muss ich ein .txt File verwenden. Momentan lese ich mit meinem Makro alle Informationen aus und schreibe diese am Ende in eine die Zelle A1 eines neuen Excel-Dokuments. Dieses wird dann mit dem Befehl unten abgespeichert.

Workbook.SaveAs Filename:="C:\..\File.txt", FileFormat:=xlText

Steht in der Zelle A1 jetzt zum Beispiel: Test12345

so speichert er mir das ganze wie unten ab:

----------------------------------
"Test12345"
>>2. Zeile ohne Inhalt
----------------------------------

Also
----------------------------------
Test12345
----------------------------------


Ich würde gerne die Anführungszeichen und diese 2. Zeile ohne Inhalt loswerden. Habt ihr hierfür Tipps?

Vielen Dank.

Grüße
Tim
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Inhalt einer Zelle in .txt speichern
28.08.2024 15:26:15
daniel
Hi
die Anführungszeichen bekommst du vielleicht auch weg, in dem du ein anderes Dateiformat verwendest, es gibt ja meherere mit Endung .txt (z.B. Text MS-DOS)
das mit der leeren Zeile könnte schwierig werden, da Excel vermutlich nach der Zelle immer automatisch ein "Neue Zeile" sendet.
Gruß Daniel
Anzeige
AW: Inhalt einer Zelle in .txt speichern
28.08.2024 15:38:19
volti
Hi,

wie sieht es hiermit aus?
Sub ZeleninhaltInTxTDatei()

Open "D:\ird\File.txt" For Output As #1
Print #1, Range("A1").Value
Close #1
End Sub


Gruß
Karl-Heinz
Wenn du bei...
28.08.2024 16:13:32
Case
Moin, :-)

... Print keinen Zeilenvorschub möchtest, dann musst du ein Semikolon anhängen: ;-)

Print #1, [A1];


Servus
Case
Anzeige
AW: Wenn du bei...
28.08.2024 16:18:00
Tim
So funktioniert es:

Sub Textdatei()


Open "F:\Testdatei.txt" For Output As #1
Print #1, [A1];
Close #1

End Sub





Vielen Dank an KarlHeinz und Case!!
AW: Wenn du bei...
28.08.2024 17:49:25
volti
Danke Case,

für die Info.

Habe ich nicht gewusst oder vergessen.... :-)

Ägän wot lörnt.

Gruß KH
Anzeige
AW: Inhalt einer Zelle in .txt speichern
28.08.2024 14:42:42
Tim
Hallo Onur,

Danke für die Antwort. Die Anführungszeichen werde ich damit los, aber leider ist immer noch eine 2. Zeile in dem Textfile ohne Inhalt. Siehe unten im Bild, gelb markiert.

Kann man die extra Zeile vermeiden?

Grüße
Tim

Userbild
Anzeige
S. Objekt-Katalog, Unters. zw. "Write" und "Writeline" owT
28.08.2024 15:30:55
Yal

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige