Excel-Loste nach txt mit Formatierung

Computer: Software & Programmierung Office Software
1

Hi,
ich habe eine Excel-Liste, die ich in eine txt-Datei umwandeln möchte, die Formatierung der Spalten soll beibehalten werden. Wenn ich mit Copy&amp:stuck_out_tongue_winking_eye:aste arbeite, bleiben die Spalten aber nicht untereinander, insbesondere wenn in der Excel-Zelle ein Zeilenumbruch ist, wird der Teil nach dem Umbruch in der txt-Datei ganz an den Anfang gerückt.
Wer weiss Rat?
Alex

2

Hi Alex,

leider geht das nicht ohne Probleme. Willst du die Daten später weiterverarbeiten oder ist die Txt Datei das endgültige Ergebnis?

Grüße

Egon

3

Hi,
die txt-Datei soll wiedert eingelesen werden, hierzu ist es Voraussetzung, das die Spalten untereinander stehen. Leider geht das ganze nur per Copy&amp:stuck_out_tongue_winking_eye:aste, woraus eben das geschilderte resultiert.
Alex

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

4

ich habe eine Excel-Liste, die ich in eine txt-Datei umwandeln
möchte, die Formatierung der Spalten soll beibehalten werden.
Wenn ich mit Copy&amp:stuck_out_tongue_winking_eye:aste arbeite, bleiben die Spalten aber
nicht untereinander, insbesondere wenn in der Excel-Zelle ein
Zeilenumbruch ist, wird der Teil nach dem Umbruch in der
txt-Datei ganz an den Anfang gerückt.

Hi Alexander,
habe es jetzt nicht getestet, probier doch mal folgendes Makro:

Sub Test()
 Close
 Open "c:\temp\test.txt" For Output As #1
 For n = 1 To Cells(1, 1).End(xlDown).Row
 Zeile = Cells(n, 1)
 For m = 2 To Cells(n, 1).End(xlToRight).Column
 Zeile = Zeile & vbTab & Cells(n, m)
 Next m
 Print #1, Zeile
 Next n
 Close #1
End Sub

Gruß
Reinhard