Postcode notatie

[GerbenDenker]

Hallo,
Ik probeer veel (veel opgezocht en geprobeerd) , maar het lukt niet.
Wie kan mij helpen met een code (o.i.d.), waarbij alle postcodes die in de tabel staan, of de volgende manier worden weergegeven: 4567 AB
Dus vier keer de cijfers, dan een spatie, dan 2 hoofdletters.

Is het mogelijk dat je de code in het bestand verwerkt - wie zou dat willen doen ?


Bekijk bijlage Postcode-test.xlsx

Bij voorbaat veel dank !

 

[edmoor]

Bijvoorbeeld met een code achter een knopje:

Bekijk bijlage Postcode-test.xlsm

Overigens mag de regel: Dim pc As String eruit.
Was ik ff vergeten.

 

[zapatr]

Datzelfde zonder macro:
typ in B2:

=LINKS(A2;4)&" "&HOOFDLETTERS(RECHTS(A2;2))

Kopieer naar beneden in kolom B en verwijder dan evt. kolom A.

 

[perryvg]

om alle letters in hoofdletters te gebruiken kan je de formule =hoofdletters(cel) gebruiken.
om tussen de cijfers en letters een spatie te krijgen heb ik even geen idee.

Gr Perry

 

[GerbenDenker]

Prima, bedankt.
Die spatie zit er toch al tussen ? =LINKS(A2;4)&" "&HOOFDLETTERS(RECHTS(A2;2))
Zie rood.

Ik ga voor de optie om niet de knop te gebruiken, want het is allemaal een onderdeel van een beetje ingewikkelde sheet..
Dus houd ik me aan de optie zoals hierboven.

Maar nu nog een extra vraag; ik gebruik ook Belgische postcodes en die hebben alleen cijfers.
Als ik de formule gebruik, krijg je dus: postcode 4455 > met de formule wordt dat 4455 55
Is daar iets op te vinden ? Dus als er geen letters zijn, dan niets weergeven..

 

[zapatr]

Voor B2:

=ALS(LENGTE(A2)>4;LINKS(A2;4)&" "&HOOFDLETTERS(RECHTS(A2;2));A2)

Zorg er wel voor dat de celeigenschappen op "Standaard" staan.

 

[GerbenDenker]

OK, iedereen ook deze keer weer bedankt voor de hulp !