Auteur Topic: txt file omzetten in excel file (gelezen 20942 keer)

ricardo · « **Reactie #15 Gepost op:** 23 maart 2007, 20:04:17 »

hier hoe het is

ricardo

Erik Van Geit · « **Reactie #16 Gepost op:** 24 maart 2007, 13:54:58 »

Ricardo,

Ik schat dat je in 10 minuten de hele zaak in orde kan krijgen met dit 12stappenplan.
Als de manuele aanpak werkt, kan het proces eventueel geautomatiseerd worden.

In bijlage probeer ik zo dadelijk een Excelletje te plaatsen. Ik heb de gegevens veranderd en wil jou om privacyredenen aanraden je voorbeeld-bestanden ook te wijzigen, als je geen last wil krijgen met sommige mensen!

startgegevens:
(dit is natuurlijk geen "code", maar de normale versie van "Table-It werd omgevormd door de forumsoftware)

Code: [Selecteer]

  A                                                                       
1 Resultaat opzoeken makelaarsResultaat van uw opzoekingAALTERServices &  
2       toolsLid van                                                      
3                                                                         
4       ZAKENKANTOOR A                                                    
5       Astraat 30   9880 Adorp                                           
6       Tel. 09/111.11.11                                                 
7                                                                         
8       Talen :        NL                                                 

start

[Table-It] version 06 by Erik Van Geit

STAP1
formule in kolom B
=SPATIES.WISSEN(A1)

STAP2
selecteer kolom B
kopieer
plak speciaal: waarden
menu extra: tekst naar kolommen
"gescheiden" klik Volgende
niets aanvinken klik Volgende
gegevenstype per kolom: standaard klik Voltooien
verwijder kolom A

(zonder tekst naar kolommen "denkt" excel dat er nog iets in de lege cellen zit)

STAP3
selecteer kolom A
menu Bewerken / Ga Naar
"lege waarden" klik OK
verwijder cellen

Erik Van Geit · « **Reactie #17 Gepost op:** 24 maart 2007, 13:59:08 »

nu heb je dit
iets meer gegevens overgenomen deze keer

Code: [Selecteer]

   A                                                                      
 1 Resultaat opzoeken makelaarsResultaat van uw opzoekingAALTERServices & 
 2 toolsLid van                                                           
 3 ZAKENKANTOOR A                                                         
 4 Astraat 30 9880 Adorp                                                  
 5 Tel. 09/111.11.11                                                      
 6 Talen : NL                                                             
 7 GAVEREServices & toolsLid van                                          
 8 B.V.B.A. B                                                             
 9 Bstraat 95 Bus 2 9890 Bdorp                                            
10 Tel. 09/222.22.22                                                      
11 Talen :                                                                
12 STEKENEServices & toolsLid van                                         
13 Maurice C                                                              

stap3

[Table-It] version 06 by Erik Van Geit

Erik Van Geit · « **Reactie #18 Gepost op:** 24 maart 2007, 14:01:57 »

STAP4
selecteer kolom A
autofilter
aangepast
bevat: "toolslid"

STAP5
selecteer het hele bereik
rijen verwijderen
autofilter is weg en enkel juiste rijen blijven over
er zijn nu 4 rijen per bedrijf

Code: [Selecteer]

   A                           
 1 ZAKENKANTOOR A              
 2 Astraat 30 9880 Adorp       
 3 Tel. 09/111.11.11           
 4 Talen : NL                  
 5 B.V.B.A. B                  
 6 Bstraat 95 Bus 2 9890 Bdorp 
 7 Tel. 09/222.22.22           
 8 Talen :                     
 9 Maurice C                   
10 Cstraat 91 9190 Cdorp       
11 Tel. 03/333.33.33           
12 Talen : NL                  
13 Zakenkantoor D              
14 Dstraat 98 9031 Ddorp       
15 Tel. 09/444.44.44           
16 Talen : NL                  
17 NV E                        
18 Estraat 471 9070 Edorp      
19 Tel. 09/555.55.55           
20 Talen : NL                  

stap5

[Table-It] version 06 by Erik Van Geit

Erik Van Geit · « **Reactie #19 Gepost op:** 24 maart 2007, 14:07:49 »

STAP6
vanaf hier de procedure
die reeds uitgelegd staat in een vorige reply
kopieer kolom A naar volgende kolommen
telkens bovenaan 1 rij minder
A2 gaat dus naar B1
A3 naar C1
voorbeeld bevast slechts 3 kolommen, anders werd het te breed

Code: [Selecteer]

  A                     B                           C                           
1 ZAKENKANTOOR A        Astraat 30 9880 Adorp       Tel. 09/111.11.11           
2 Astraat 30 9880 Adorp Tel. 09/111.11.11           Talen : NL                  
3 Tel. 09/111.11.11     Talen : NL                  B.V.B.A. B                  
4 Talen : NL            B.V.B.A. B                  Bstraat 95 Bus 2 9890 Bdorp 
5 B.V.B.A. B            Bstraat 95 Bus 2 9890 Bdorp Tel. 09/222.22.22           

stap6

[Table-It] version 06 by Erik Van Geit

STAP7
voeg bovenaan een rij in
in kolom E 2 dingen doen
1 plaats "hoofding" in eerste cel
2 formule vanaf rij 2
=REST(RIJ()+2;4)=0

STAP8
filter ONWAAR

Erik Van Geit · « **Reactie #20 Gepost op:** 24 maart 2007, 14:15:44 »

Nu zie je enkel nog de "slechte rijen" die er uit moeten.
die gaan er uit in stap 9

STAP9
selecteer het hele bereik
rijen verwijderen
autofilter is weg en enkel juiste rijen blijven over
verwijder laatste kolom

STAP10
"Tel." en "Talen : " (let op spaties) vervangen door ""
eventueel kan dit ook met formules gebeuren
zoals je ziet, komen we in de buurt :-)

Code: [Selecteer]

  A              B                           C            D  
1 ZAKENKANTOOR A Astraat 30 9880 Adorp       09/111.11.11 NL 
2 B.V.B.A. B     Bstraat 95 Bus 2 9890 Bdorp 09/222.22.22    
3 Maurice C      Cstraat 91 9190 Cdorp       03/333.33.33 NL 
4 Zakenkantoor D Dstraat 98 9031 Ddorp       09/444.44.44 NL 
5 NV E           Estraat 471 9070 Edorp      09/555.55.55 NL 

stap10

[Table-It] version 06 by Erik Van Geit

Erik Van Geit · « **Reactie #21 Gepost op:** 24 maart 2007, 14:22:02 »

Nu komt het er enkel nog op aan om kolom B in 3 delen te splitsen

Code: [Selecteer]

  B                           
1 Astraat 30 9880 Adorp       
2 Bstraat 95 Bus 2 9890 Bdorp 
3 Cstraat 91 9190 Cdorp       
4 Dstraat 98 9031 Ddorp       
5 Estraat 471 9070 Edorp      

stap11

[Table-It] version 06 by Erik Van Geit

We gaan daarom op zoek naar de voorlaatste spatie: ik hoop van harte dat alle gemeente namen aan elkaar zijn geschreven, zoniet moeten dit anders worden opgelost.
Eens die spatie gevonden, kan je makkelijk "links"- en "deel"formules gebruiken.

STAP11
voeg 4 kolommen in na B
formules van C tot F
die in C is de "sleutel" = vind de voorlaatste spatie
=VIND.ALLES("|";SUBSTITUEREN(B1;" ";"|";LENGTE(B1)-1-LENGTE(SUBSTITUEREN(B1;" ";""))))
=LINKS(B1;C1-1)
=DEEL(B1;C1+1;4)
=DEEL(B1;C1+5;99)

dat ziet er dan zo uit

Code: [Selecteer]

  B                           C  D                E    F      
1 Astraat 30 9880 Adorp       11 Astraat 30       9880  Adorp 
2 Bstraat 95 Bus 2 9890 Bdorp 17 Bstraat 95 Bus 2 9890  Bdorp 
3 Cstraat 91 9190 Cdorp       11 Cstraat 91       9190  Cdorp 
4 Dstraat 98 9031 Ddorp       11 Dstraat 98       9031  Ddorp 
5 Estraat 471 9070 Edorp      12 Estraat 471      9070  Edorp 

stap11

[Table-It] version 06 by Erik Van Geit

Code: [Selecteer]

RANGE FORMULA (1st cell)
C1:C5 =FIND("|",SUBSTITUTE(B1," ","|",LEN(B1)-1-LEN(SUBSTITUTE(B1," ",""))))
D1:D5 =LEFT(B1,C1-1)
E1:E5 =MID(B1,C1+1,4)
F1:F5 =MID(B1,C1+5,99)

[Table-It] version 06 by Erik Van Geit

Erik Van Geit · « **Reactie #22 Gepost op:** 24 maart 2007, 14:26:53 »

We zijn er bijna. Het moest in verschillende posts. 'k Heb steeds het onderste uit de kan trachten te halen. Om de 1 of andere reden zegt de forumsoftware dat er meer dan 10000 tekens staan, terwijl ik er zelf maar 4000 tel.

STAP12
selecteer kolommen D E F
copieer en plak waarden
verwijder kolommen B C

Code: [Selecteer]

  A              B                C    D      E            F  
1 ZAKENKANTOOR A Astraat 30       9880  Adorp 09/111.11.11 NL 
2 B.V.B.A. B     Bstraat 95 Bus 2 9890  Bdorp 09/222.22.22    
3 Maurice C      Cstraat 91       9190  Cdorp 03/333.33.33 NL 
4 Zakenkantoor D Dstraat 98       9031  Ddorp 09/444.44.44 NL 
5 NV E           Estraat 471      9070  Edorp 09/555.55.55 NL 

stap12

[Table-It] version 06 by Erik Van Geit

In bijlage de hele zaak op 13 werkbladen. (start to stap12)

goed weekend!
Erik

RedHead · « **Reactie #23 Gepost op:** 24 maart 2007, 14:37:15 »

Erik, mooi opgelost dat 'splitten' van kolom B. Ik was zelf ook bezig geweest maar dan gewoon het knippen op de spaties. Daar ging het bij mij bij het testen mis (inderdaad, op meerdere spaties in de naam bijvoorbeeld). Om de 1e spatie na de naam als uitgangspunt te kiezen, vind ik een mooie vondst.

Ik ben nu ook benieuwd hoe je je benoemde (eventuele) probleem...

Citaat

ik hoop van harte dat alle gemeente namen aan elkaar zijn geschreven, zoniet moeten dit anders worden opgelost

...gaat oplossen...

(Maar JIJ kan dat, dat weet ik zeker!)

Groet, Leo

ricardo · « **Reactie #24 Gepost op:** 24 maart 2007, 20:43:15 »

Erik,

Wel bedankt
ik ga het volgende week toepassen en hopelijk lukt het mij
Ik laat jullie iets weten
Ricardo

RedHead · « **Reactie #25 Gepost op:** 24 maart 2007, 20:49:11 »

Ricardo, succes! (en óók namens Erik denk ik

)

Groet, Leo

SoftAid · « **Reactie #26 Gepost op:** 24 maart 2007, 21:27:46 »

Citaat van: RedHead op 24 maart 2007, 14:37:15

Ik ben nu ook benieuwd hoe je je benoemde (eventuele) probleem......gaat oplossen... (Maar JIJ kan dat, dat weet ik zeker!)

als "leek" in deze materie, maar toch nog een "denker", dus nog niet helemaal "braindead" zou ik het volgende willen opmerken, zonder afbreuk te willen doen aan de geboden oplossingen:

Er is eigenlijk maar één vast gegeven in de adres-reeks.
Dat is het post-nummer: 4 cijfers tussen 999 en 10000.
indien men voor elk adres de locatie van dit (eerste of laatste digit van dit 4-cijferig getal) postnummer kan bepalen, dan lijkt het mij mogelijk om met "=Links()" en "=Deel()" (en andere

) op de (enige) juiste manier de tekenreeks op te splitsen.

In de (trouwens zéér lovenswaardige) toepassing van Erik gaan alle inspanningen verloren als er een "Jan van Gentstraat" bestaat, of "Herk de Stad" als gemeente is aangeduid.

Maar toch, ik kan enkel enthousiast applaudiseren voor zoveel inzet en fantasie. Leve Excel.... en hun toepassers.

SoftAid

Erik Van Geit · « **Reactie #27 Gepost op:** 24 maart 2007, 22:27:23 »

Hallo,

Het probleem had ik zelf al aangehaald, maar de tijd en energie was op om de hele zaak verder uit te spitten. Het posten van voorbeelden had nogal wat voeten in de aarde. Ik denk dat het kwam omdat de spaties die mijn tool, Table-It, aanmaakt allemaal naar "&nbsp" omgezet worden, waardoor het aantal tekens spectaculait opliep. De voorlaatste spatie feilloos localiseren is al een kwestie van mijn hele database scannen naar een kandidaat-formule en die dan aanpassen. 'k Heb vooral willen aantonen dat het mogelijk is om de gegevens op vrij eenvoudige manier - ik bedoel met enkele simpele Excelmiddelen - om te zetten.

Jan Van Gentstraat is geen probleem, Herk de Stad wel. Er zijn echter verschillende "waterdichte" oplossingen mogelijk.
1. Met een User-Defined-Function is het zo geregeld, maar 'k wilde nu nog geen VBA gebruiken. De UDF zou van achter naar voor beginnen zoeken naar een cijfer. Mogelijk is er wel een formule op los te laten in die zin.
2. Het is ook mogelijk om een formule te maken die alle cijfers genereert. Dan naar de laatste 4 kijken regelt de zaak ook.

oeps, misschien impulsief-overmoedige post: 'k ga er mij nog een halfuurtje achter zetten, om te zien of 't lukt :-)

groetjes,
Erik

RedHead · « **Reactie #28 Gepost op:** 24 maart 2007, 22:44:45 »

Citaat

oeps, misschien impulsief-overmoedige post: 'k ga er mij nog een halfuurtje achter zetten, om te zien of 't lukt :-)

Erik, ZET 'M OP!

Erik Van Geit · « **Reactie #29 Gepost op:** 24 maart 2007, 22:46:47 »

STAP11 betere versie

hier zijn de formules
{=SOM(DEEL(0&B1;GROOTSTE(ISGETAL(--DEEL(B1;RIJ(INDIRECT("1:"&LENGTE(B1)));1))*RIJ(INDIRECT("1:"&LENGTE(B1)));RIJ(INDIRECT("1:"&LENGTE(B1))))+1;1)*10^RIJ(INDIRECT("1:"&LENGTE(B1)))/10)}
=LINKS(B1;VIND.ALLES(E1;B1)-2)
=RECHTS(C1;4)
=DEEL(B1;VIND.ALLES(E1;B1)+5;999)

NB: de eerste is een matrixformule
Table-It legt uit hoe je die invoert: je kan ook de helpfiles raadplegen
deze formule heb ik niet bedacht, maar een paar keer op MrExcel gezien

Code: [Selecteer]

  B                           C       D                E    F     .
1 Astraat 30 9880 Adorp       309880  Astraat 30       9880 Adorp 
2 Bstraat 95 Bus 2 9890 Bdorp 9529890 Bstraat 95 Bus 2 9890 Bdorp 
3 Cstraat 91 9190 Cdorp       919190  Cstraat 91       9190 Cdorp 
4 Dstraat 98 9031 Ddorp       989031  Dstraat 98       9031 Ddorp 
5 Estraat 471 9070 Edorp      4719070 Estraat 471      9070 Edorp 

stap11

[Table-It] version 06 by Erik Van Geit

Code: [Selecteer]

RANGE FORMULA (1st cell)
C1:C5 {=SUM(MID(0&B1,LARGE(ISNUMBER(--MID(B1,ROW(INDIRECT("1:"&LEN(B1))),1))*ROW(INDIRECT("1:"&LEN(B1))),ROW(INDIRECT("1:"&LEN(B1))))+1,1)*10^ROW(INDIRECT("1:"&LEN(B1)))/10)}
D1:D5 =LEFT(B1,FIND(E1,B1)-2)
E1:E5 =RIGHT(C1,4)
F1:F5 =MID(B1,FIND(E1,B1)+5,999)

{=formula}:
 select first cell
 enter formula without {}
 confirm with Control-Shift-Enter
 then copy down & across

[Table-It] version 06 by Erik Van Geit

fijne zondag gewenst,
Erik

Help!

Menu

Hulp bij posten

Zoeken

Recente topics

Auteur Topic: txt file omzetten in excel file (gelezen 20942 keer)

ricardo

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

RedHead

Re: txt file omzetten in excel file

ricardo

Re: txt file omzetten in excel file

RedHead

Re: txt file omzetten in excel file

SoftAid

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file

RedHead

Re: txt file omzetten in excel file

Erik Van Geit

Re: txt file omzetten in excel file