Spatie(s) in een samengevoegde cel verwijderen

[1102merrick]

Hoi,

Ik ben nieuw in de wereld van VBA dus misschien is het antwoord heel simpel.

Ik heb de waarden van 2 cellen samengevoegd in 1 cel.
Dit moet eigenlijk weer een unieke cel worden.
Met die unieke waarde wil ik namelijk in een ander bestand gaan zoeken naar gegevens.

Het samenvoegen is gelukt maar tussen de ene en de andere waarde zitten spaties terwijl het eigenlijk een nieuwe cijferreeks moet worden.

Weet iemand hoe ik dit moet verhelpen?

Alvast bedankt.

Zie bijlage

Bekijk bijlage art_kl_combinatie.xlsm

 

[edmoor]

Het is wat lastiger dan je denkt. Er zit namelijk tussen die 2 waarden in kolom A niet 1 of meerdere spaties maar 5x het teken Chr(160) in Latin-1 Supplement codering (non-breaking space in HTML). Deze staan ook achter het getal onder het kopje Artikel. Vraag me niet hoe dat er ooit in is gekomen. Goed dat je een voorbeeld hebt geplaatst, anders waren we daar nooit achter gekomen.

Je kunt in een cel de volgende functie gebruiken om de eerste 8 cijfers te krijgen:

=INTEGER(LINKS(A2;8))

En in een cel ernaast de laatste 2 cijfers:

=INTEGER(RECHTS(A2;2))

Of in 1 cel:

=INTEGER(LINKS(A2;8)&(RECHTS(A2;2)))

Op die manier kun je het zonder VBA voor elkaar krijgen en hoef je niets met die vreemde code te doen. Zo kun je eventueel ook omgaan met Kolom B. Mocht je er toch een conversie routine voor willen hebben dan laat het maar even weten.

 

[HSV]

Of:

=SUBSTITUEREN(A2;TEKEN(160);"")

 

[mcs51mc]

Begrijp ik het goed dat je vertrekt van kolommen B & C en kolom A wenst maar dan zonder de spaties?
Dan is de juiste formule voor cel A2

=LEFT(B2;8)&C2

voor een UK Excel.

Mijn 2 voorgangers vertrokken van het antwoord

 

[HSV]

Je gaat nat als het getal niet uit acht cijfers bestaat.

=substitueren(B2;teken(160);"")&c2

 

[1102merrick]

Heren,

Dank u wel.
Ik heb alle voorstellen tot een oplossing weggeschreven.

Het bestand werkt prima!

Merrick