@Molly,
Zoals beloofd, in bijlage mijn laatste versie (2.3) met een volledig vernieuwd "UF_nieuw".
Ik heb wel wat extra's toegevoegd en dit ook reeds verwerkt in het codeblokje voor de 'DMCtoRGB' .Wat heb ik gewijzigd en/of toegevoegd?
Wel, ik vond het iets efficiënter werken (voor mezelf dan) met een wat kortere lijst dus heb ik ipv 1 ListBox met 489 items er
5 ListBox'en van gemaakt met elk 98 items (behalve de laatste dan met 97 items).
Heb mijn aanpassing in de codeblok uitgetest en het werkt, dus tenzij er ergens een voor mij nog
'verborgen' conflict in de code zou zitten (maar dat hoor (lees) ik dan wel
), lijkt dat onderdeel succesvol afgewerkt.
@Pagadder,
je vergeet één klein tussenstapje hoor
.
1) ik kies de juiste kleuren via de listboxen waarvan dan de code-resultaten worden weggeschreven op werkblad "stats".
2) er opent een UF waarin reeds alle 150 symbolen op voorhand vermeld staan (UF_symboolkiezer) (die captions (de symbolen) op de knopjes zullen dus reeds op voorhand door mij in de ontwerpfase van de UF erop geplaatst worden.
Op dit UF (bij de aanmaak van het nieuwe borduur-project) kies ik dan de symbolen die ik wens te gebruiken waarna het resultaat van die keuze ook wordt weggeschreven op werkblad "stats" in kolom 6. Nadat vba dit heeft weggeschreven sluit het "UF_symboolkiezer" en word opnieuw werkblad "DASHBOARD" geactiveerd
3) op het werkblad "DASHBOARD" kies ik dan de knop "patroon inkleuren" (waar eerst nog een msgbox komt om te controleren of ik klaar ben met inkleuren en de volgende fase wil doorlopen) waar na klik op "nee" werkblad "raster" wordt geactiveerd en het "UF_patroontekenen" wordt geopend.
En het is pas dan en enkel dan dat de symbolen uit het werkblad "stats" kolom 6 dienen ingeladen te worden en als caption te worden toegewezen aan de knoppen.
Met andere woorden :
Het UF met de 150 knopjes dient éénmalig voorzien te worden van de nodige symbolen welke ik er handmatig zal inzetten adhv het lettertype binnen de ontwerp-fase van het UF.
Het UF dat gebruikt gaat worden voor het inkleuren zelf (60 knopjes) dat zal bij elke initialisatie dienen ingeladen te worden adhv de vermelde symbolen op het werkblad "stats". Wat dus automatisch via VBA zal gebeuren.
Het gigantische én éénmalige werkje om 'handmatig' die 150 knopjes van een symbool te voorzien is een werkje dat ik in de ontwerp-fase dus voor mijn rekening neem
groetjes,
BlackDevil