Text datei importieren und in tabelle sortieren

[Halber]

.SaveAs csv-Datei ?

Oder vielleicht so ?

Code:

Sub M_snb()
  Sheet1.UsedRange.Copy
   
  With GetObject("New:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
    .GetFromClipboard
    CreateObject("scripting.filesystemobject").createtextfile("G:\OF\sensorcodes_001.txt").write .GetText
  End With
End Sub

danke funktioniert. ich glaub ich hab mich da falsch ausgedrückt. ich meinte die gleiche struktur wie die txt vorher war. also alles wieder untereinander.

[Ralf A]

Moin,

wozu soll das gut sein? Du hast doch die Datei bereits. Sonst hättest Du sie ja nicht in die gewünschte Excelstruktur umwandeln können. Oder löschst Du die jedesmal wieder? Dann verzichte darauf...

[Halber]

na ja um daten zu bearbeiten oder neue Abwandlungen hinzuzufügen und wieder neu zu speichern.

[snb]

Geht auch unmittelbar in VBA ohne Excel.

Zeig mal: Ausgangssituation (txt, csv) und gewünschtes Ergebnis (txt,csv)

[Halber]

also die sensorcodes.txt ist die ausgangslage und das endergebnis nach dem bearbeiten. die bearbeiten.xlsx mußte so zum bearbeiten aussehen.
dort müßte ich ggf. datensätzte hinzufügen und löschen.