Adres splitsen in Straat, huisnr, postcode

[NogGeenGuru]

Goedemorgen forumleden,

Allereerst de beste wensen allemaal!

helaas loop ik meteen al vast dit jaar

Ik krijg adres gegevens aangeleverd in 1 cel.
Deze wil ik graag splitsen.

Bijv. ik krijg in kolom A: Nieuwjaarstraat 4A 2017AA
Deze wil ik dan graag splitsen in:
Kolom B: Nieuwjaarstraat
Kolom C: 4
Kolom D: A
Kolom E: 2017AA

natuurlijk heeft niet elk huisnummer een toevoeging.
Als deze er niet is mag kolom D leeg blijven.

De toevoeging op het huisnummer kan ook los genoteerd worden (4 A)
het zelfde geldt voor de postcode (2017 AA)

de volgorde is wel altijd het zelfde.

heeft iemand hier een geniale macro voor?

 

[ExcelAmateur]

Ook van af deze kant, de beste wensen voor 2017

Probeer dit jaar eens om de zoekmachine van helpmij te gebruiken - Doorzoek dit forum.
Was je misschien ook hier uit gekomen, er zijn nog meer voorbeelden.

http://www.helpmij.nl/forum/showthr...20793&highlight=Adressen+splitsen#post2820793

 

[SjonR]

Heb je de optie "Tekst naar Kolommen" geprobeerd?

 

[gast0660]

Beste wensen.
Kan je hier wat mee?

 

[NogGeenGuru]

Bedankt allemaal!

Beste gast0660,

Jou macro werkt fantastisch!
Alleen.... ik begrijp niet precies hoe die nou werkt...
Ik zou graag de toevoeging op het huisnummer en de letters in de postcode met hoofdletters noteren (ook als deze als kleine letters in kolom A staan.

ik heb wat zitten proberen in jou macro maar ik kom er niet uit waar ik dit nou precies moet doen

 

[gast0660]

Zoiets?

 

[snb]

Of:

Sub M_snb()
  with Columns(1)
   For j = 1 To 9
     .Replace " " & j, "_" & j
     For jj = 97 To 122
        .Replace j & Chr(jj), j & "_" & Chr(jj), , , True
        .Replace j & " " & Chr(jj), j & "_" & Chr(jj), , , True
        .Replace j & Chr(jj) & "_", j & "_" & Chr(jj) & "_"
     Next
   Next
   .TextToColumns , , , , 0, 0, 0, 0, -1, "_"
  end with
End Sub

 

[NogGeenGuru]

Beste gast0660,
Werkt prefect! Dankjewel

Beste SNB,
Werkt ook goed maar ik wil graag de waardes in kolom A ook behouden.:thumb:

de macro van gast0660 doet precies wat ik hebben wou.

bedankt allemaal, ik zal hierbij deze vraag sluiten.