Txt. bestand inlezen in excel

[DEY]

Beste Guru's,

Wie kan mij helpen met het volgende probleem.

Ik heb een txt. bestand en het lukt mij niet correct in te lezen in Excel.
Dit komt omdat er geen (carriage) returns in de txt file aanwezig is of wat dan ook.
Bekijk bijlage test.txt
Zie voorbeeld bestand. Voor elk ('NLxxxxx, wil ik graag een return hebben.


Alvast bedankt voor jullie moeite.

Groetjes,

Dey

 

[VenA]

Mogen we ook even weten hoe je het opgelost hebt?

 

[roeljongman]

met ophalen en transformeren (of power query voor versies ouder dan 2016 ) kun je dit bestand omzetten
Er zitten goede scheidingstekens in. een record staat tussen haakjes ()
elk veld per record is gescheiden door komma's

zie bijage voor de uitwerking van de query die alle handelingen doet


edit: @VenA mijn antwoord was geen antwoord op jou vraag. ik had de opgelost status opgevat als een foutje en toch maar oplossing gezocht

 

[snb]

Of

Sub M_snb()
  sn = Split(Replace(Replace(Mid(CreateObject("scripting.filesystemobject").opentextfile("J:\temp\test.txt").readall & ")", 2), "),)", ""), "'", ""), "),(")

  Cells(1).Resize(UBound(sn) + 1) = Application.Transpose(sn)
  Columns(1).TextToColumns , , , , 0, 0, -1, 0, 0
End Sub

 

[DEY]

Beste Mensen,

Heel erg bedankt voor jullie reacties.

Ik heb doormiddel van de volgende video weten te op lossen:
https://www.youtube.com/watch?v=obqYfwzR-bQ

Groetjes,

Dey