Macro maken

[ingmar]

Ik zit met het volgende probleem. Ik heb een Excel-bestand met in kolom 1 getallen van 8 - 12 cijfers. In kolom 8 wil ik de laatste 4 cijfers van die getallen zetten, dus bv. in kolom 1 staat 8765432196, in kolom moet dan 2196 komen te staan. Hoe doe je dat? Ik heb het met een macro geprobeerd, maar die springt steeds terug naar de cel die ik als basis voor de macro heb genomen. Heeft iemand een idee?

Alvast bedankt voor je antwoord,
Ingmar

 

[jheesterbeek]

mag het ook met een formule?
=links(a1;4)

 

[ingmar]

Dank JHeesterbeek voor je reactie. Maar hoe gebruik ik je formule? Zet ik hem in de cel waar '2196' wil hebben? Als ik dat nl. doe, verschijnt er helemaal niets. Of moet het anders?

 

[ingmar]

Wacht, ik heb nog even verder geëxperimenteerd met je formule. Het blijkt dat hij 4 cijfers overneemt uit de kolom links ervan, maar dan van 4 regels hoger. Dus bv. 87654321 in A5 wordt 4321 in B9.
Maar dan zit er nog een foutje in, want hij neemt niet de laatste 4 cijfers maar de eerste 4, dus (in mijn voorbeeld) 8765.
Verder valt me op dat de rasterlijnen verdwijnen rond de cellen waar de formule in staat.
In ieder geval, toch lijkt het veelbelovend. Kun je me nog verder helpen?

 

[jheesterbeek]

Dat is inderdaad een ochtend slordigheidje ;-)

Met de formule LINKS kun je een aantal karakters uit een cel nemen, aan de linkerzijde
Met de formule RECHTS kun je hetzelfde, maar dan aan de rechterzijde
Met de formule DEEL kun je karaktrers uit het midden halen.

Als je in A5 een getal hebt staan van 8-12 cijfers en je wilt de 4 laatste cijfers overnemen in cel C5, plaats je onderstaande formule in C5:
=RECHTS(A5;4)
Bovenstaande formule resulteerd in een tekstwaarde. Als je er ook mee wilt gaan rekenen kun je onderstaande formule gebruikken
=RECHTS(A5;4)*1
de vermenigvuldiging zorgt ervoor dat Excel "begrijpt" dat het hier om een getal gaat.

Formules hebben geen invloed op de opmaak, het verdwijnen van de rasterlijnen moet dan ook een andere oorzaak hebben.

Succes
John

 

[ingmar]

Hee perfect, zo werkt hij inderdaad!
Hartelijk bedankt!