Hallo Luc,
Ik wou net schrijven: Let op het pad dat je vroeger gebruiktte voor je foto's:
Pad = "C:\Documenten\Excel\Mijn 2€ verzameling\fotos\" & FotoNr & ".jpg"
Maar je hebt het al aangepast.

Ook de layout van de userform een beetje aangepast zodat de volledige tekst van de benaming verschijnt.
Had ik intussen ook gezien. lblStatus mag je best nog een beetje breder maken, tot aan de rechterkant, en vertikaal wat minder hoog. Dan gaat de tekst zich over 2 rijen verspreiden met de bovenste tekstlijn op dezelfde hoogte van "Thema".
Wat die foutmelding betreft, ik krijg die nu ook als ik jou bestand open op mijn PC. Ook opent jou bestand op 100%, mijn versie steeds op 80%. Geen idee hoe dat komt, want het is een identieke kopie die ik je stuurde. Hoe opent het bij jou? 100 of 80% ? ik heb voorlopig in de opstart de zoom geforceerd op 80%.
Voor de foutmelding heb ik een vertraging ingebouwd voor de 2 UserForms. Die zit dan ook in de versie die ik hier aanhang. Test er maar eens mee.
PS, verander de namen van de werkboeken op een logische wijze als je ze aanpast en opstuurt.
Zo noem ik de bestanden die ik naar jou stuur Munten & Oplossing & 1 en de volgende 2 enz.
Noem de bestanden die jij verstuurd naar mij Munten_ & Luc_ & 1 en de volgende 2 enz =
dus: Munten_Luc_1.xlsm En gebruik zeker geen €-symbool in bestandsnamen, Oplossing.be kan daar niet mee overweg (Code van voor 2000)
groeten,

SoftAid
