Hallo,
Ik loop regelmatig tegen een zelfde probleem aan in access (versie 2003).
Mijn probleem ontstaat nadat ik een TXT bestand geïmporteerd heb.
Dit txt bestand bevat heel veel data, het nadeel is echter dat het vreemd is opgebouwd.
Het ziet er dan na import bijvoorbeeld zo uit:
[TABLE="width: 500"]
[TR]
[TD]Kolom1[/TD]
[TD]Kolom2[/TD]
[TD]Kolom3[/TD]
[/TR]
[TR]
[TD]Piet [/TD]
[TD]Adres[/TD]
[TD]Hoofdstraat[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]postcode[/TD]
[TD]3542xc[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]tel[/TD]
[TD]010-59959[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]fax[/TD]
[TD]018-595958[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]Adres[/TD]
[TD]bergweg[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]postcode[/TD]
[TD]3540tm[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]tel[/TD]
[TD]078-59959[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]fax[/TD]
[TD]020-595958[/TD]
[/TR]
[/TABLE]
enz, enz
Nou wil ik dit graag de waarden zoals hierboven weergegeven in kolom 2 omzetten naar kolommen en de waarden in kolom 1 en 3 als veldwaarden
De tabel zou er dus als volgt uit moeten komen te zien:
[TABLE="width: 500"]
[TR]
[TD]Kolom 1 (naam)[/TD]
[TD]Kolom 2 (adres)[/TD]
[TD]Kolom3 (postcode)[/TD]
[TD]Kolom 4 (Tel)[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]hoofdstraat[/TD]
[TD]3542xc[/TD]
[TD]010-59959[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]bergweg[/TD]
[TD]3540tm[/TD]
[TD]078-59959[/TD]
[/TR]
[/TABLE]
Ik weet eerlijk gezegd niet hoe ik dit automatisch voor elkaar kan krijgen.
Ik ben niet goed in VBA, maar sta uiteraard wel open voor een oplossing via VBA.
In totaal bevat de geïmporteerde tabel ca. 55000 records.
Om dit allemaal handmatig om te zetten lijkt me ondoenlijk.
Is er iemand die me met dit probleem kan helpen?
Ik loop regelmatig tegen een zelfde probleem aan in access (versie 2003).
Mijn probleem ontstaat nadat ik een TXT bestand geïmporteerd heb.
Dit txt bestand bevat heel veel data, het nadeel is echter dat het vreemd is opgebouwd.
Het ziet er dan na import bijvoorbeeld zo uit:
[TABLE="width: 500"]
[TR]
[TD]Kolom1[/TD]
[TD]Kolom2[/TD]
[TD]Kolom3[/TD]
[/TR]
[TR]
[TD]Piet [/TD]
[TD]Adres[/TD]
[TD]Hoofdstraat[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]postcode[/TD]
[TD]3542xc[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]tel[/TD]
[TD]010-59959[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]fax[/TD]
[TD]018-595958[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]Adres[/TD]
[TD]bergweg[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]postcode[/TD]
[TD]3540tm[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]tel[/TD]
[TD]078-59959[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]fax[/TD]
[TD]020-595958[/TD]
[/TR]
[/TABLE]
enz, enz
Nou wil ik dit graag de waarden zoals hierboven weergegeven in kolom 2 omzetten naar kolommen en de waarden in kolom 1 en 3 als veldwaarden
De tabel zou er dus als volgt uit moeten komen te zien:
[TABLE="width: 500"]
[TR]
[TD]Kolom 1 (naam)[/TD]
[TD]Kolom 2 (adres)[/TD]
[TD]Kolom3 (postcode)[/TD]
[TD]Kolom 4 (Tel)[/TD]
[/TR]
[TR]
[TD]Piet[/TD]
[TD]hoofdstraat[/TD]
[TD]3542xc[/TD]
[TD]010-59959[/TD]
[/TR]
[TR]
[TD]Jan[/TD]
[TD]bergweg[/TD]
[TD]3540tm[/TD]
[TD]078-59959[/TD]
[/TR]
[/TABLE]
Ik weet eerlijk gezegd niet hoe ik dit automatisch voor elkaar kan krijgen.
Ik ben niet goed in VBA, maar sta uiteraard wel open voor een oplossing via VBA.
In totaal bevat de geïmporteerde tabel ca. 55000 records.
Om dit allemaal handmatig om te zetten lijkt me ondoenlijk.
Is er iemand die me met dit probleem kan helpen?