txt in spalten/zahlen?

[gerdfromgermany]

Hallo allerseits.
Ich downloade Aktienkurse von meinem Broker im txt Format. Geht leider nicht anders.
Würde die nun gerne in Excel in verwertbare Daten umwandeln,
kommen in diesem Format an:

58.46,58.65,58.42,58.45,20328,MIN_1,2018-06-15

Weiss jemand einen Rat?

Viele Grüsse,
Gerd aus München

[Klaus-Dieter]

Hallo Gerd,

wenn du für "Nichtspekulanten" aufschlüsselst, was die Werte bedeuten und wo getrennt werden müsste.

[Klaus-Dieter]

Hallo Gerd,

richtig getrennt?

Tabelle1

	A	B	C	D	E	F	G
2	58.46	58.65	58.42	58.45	20328	MIN_1	15.06.2018

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

[snb]

Vouraussetzung:

Die Datei "G:\OF\Beispiel009.txt" enthällt deine 'Broker'daten.

Code:

Sub M_snb()
 With CreateObject("scripting.filesystemobject")
    .createtextfile("G:\OF\Beispiel009.txt").write Replace(Replace(.opentextfile("G:\OF\Beispiel009.txt").readall, ",", vbTab), ".", ",")
  End With

  Sheets.Add , Sheets(Sheets.Count), , "G:\OF\Beispiel009.txt"
End Sub

[gerdfromgermany]

Hi Klaus Dieter!
Ja, genau...
Grüsse,
Gerd

[Klaus-Dieter]

Hallo Gerd,

das habe ich mit Text in Spalten gelöst.

[Der Steuerfuzzi]

Hallo,

ich würde das mit Power Query lösen.

[Jockel]

Hallo,

ich würde das mit Power Query lösen.

Hallo, ich auch, aber der TE nicht..!!!

[Der Steuerfuzzi]

Das ist schade :19:

[snb]

PowerVBA:

Code:

Sub M_snb()
   Workbooks.OpenText "G:\OF\Beispiel009.txt", , , , , , 0, 0, -1, 0, 0, , , , "."
End Sub