De benaming van de landen is zo opgemaakt omdat niet altijd de landnaam op de munten staat en er daarom verwarring kan ontstaan.
Dat begrijp ik wel. Maar voor een macro die overweg kan met het optellen van zowel "in bezit" als "dubbel" wordt het al gecompliceerd en is eenduidigheid in namen nodig. Ik heb een macro klaar, maar deze baseert zich op kolom A van je tabblad lijst 2€ alfabetisch. (die ik eerst netjes gemaakt heb)
Het zal het overzicht ook beter maken.
Met je stelling: "De benaming van de landen is zo opgemaakt omdat niet altijd de landnaam op de munten staat en er daarom verwarring kan ontstaan." wat dan met bijvoorbeeld Duitse munten? Daar staat toch ook niet Duitsland op, maar in je werkboek wel. Of België en Belgique (en misschien nog een versie met Belgiën in de toekomst? Op de Griekse munt staat EYPΩ, geen Griekenland. Als je een consequente lijst wil bijhouden dan kan je de nederlandse naam van het land in kolom A zetten, en zet alternatieven zoals EYPΩ in een opmerking( vakje) in de eerste landnaam en waar je verschillende namen in verschillende talen (Nederlands, hun eigen taal, en varianten) in kan zetten en eenvoudig aanroepen.. Zo blijft je werkboek overzichtelijk.
Je kan de landnamen gerust onveranderd laten, maakt het zeker niet moeilijker om de VBA code te schrijven.
Deze vreemde landnamen worden alleen gebruikt in de labels van je overzichtsformulier, niet in de VBA code.
roodborstje, in jou
huidige code niet, maar als je ze wil uitbreiden naar aparte aantallen voor "In bezit" en "Dubbel" dan ga je toch tegen problemen aanlopen.
Ik heb het opgelost gekregen, maar enkel met me op de lijst in kolom A te richten en alle namen correct te herschrijven.
Bedenk dat die lijst langer kan worden, als een van de EU landen die nog geen Euro gebruiken dat wel gaan (mogen) doen.
Zie bijlage voor mij resultaat:
Maar ik wacht graag nog even op jou inbreng, geen probleem

Met vriendelijk groeten,

SoftAid
