70 knoppen??? Dat lijkt me erg onwenselijk! Het is de bedoeling dat je een gebruiker ondersteund en niet irriteert. Laat 'ns weten waar je mee bezig bent. Wellicht kan je dan geholpen worden om de opzet van je programma aan te passen.

Het is niet de bedoeling dat jij die maakt he. Als ik 1 aan het werk krijg ben ik vertrokken. Maar is blijkbaar niet zo makkelijk dan het eruit ziet
Het is de bedoeling van elke plaats aan te duiden als deze bezet is. zie bijlage

Volgens mij ga je dit een prachtige oplossing vinden...
Gewoon de gewenste plek aanklikken is voldoende. 

Nog 1 klein vraagje. Hoe zet kopieer ik het makkelijkst de sheet naar mijn oorspornkelijke met de makro erin zonder dat er iets misgaat uit de uwe?

Mijn code kan je in elk workbook plakken. Dus ook in je origineel. Wel in een standaard module (geen Sheet of Workbook). Vervolgens zal je al je Shapes (tenten) moeten selecteren en die dan in 1 klap allemaal verbinden aan die macro. Het makkelijkste doe je dit door even de ondergrond weg te slepen zodat je alléén je Textboxen ziet. Als je dan in het Home-lint de knop met het verrekijkertje (Find and Select) in drukt en kiest voor de optie "Select Objects", kan je in 1 slepende beweging een selectie uitvoeren. Hoef je niet elk object apart te selecteren. 

Dank je wel. Ben al heel blij dat dit werkt dankzij jou 
Ik snap alleen nog niet met die "if" en "else" codes ma da zal wel komen hehe.
Was eens aan het proberen om er bijvoorbeeld een 3de kleur in te zetten maar dan geeft hij
fouten aan enzo. Denk da ik het zo ga laten voor ik het verbrod 

Als je meerdere kleuren wilt doorlopen (!) is dat wel mogelijk. Het kan met een IF-structuur, maar dat is vaak niet de handigste methode. Wat voor kleur zou je er nog bij willen hebben dan?
Hou er rekening mee dat het altijd 'doorlopen' van de kleuren wordt. Dus als je bijvoorbeeld Wit, Rood, Groen hebt, zal dat altijd de volgorde zijn waar je doorheen gaat..

Ja dat doorlopen dat is normaal en dus geen probleem hoor, geraak er alleen niet uit hoe ik blauw erbij krijg. Heb al van alles geprobeerd zoals uw structuur te copy/pasten enzo maar krijg telkens
foutmeldingen.

Ik snap niet hoe je dit telkens voor mekaar krijgt? Denk dat ik wat hersencellen tekort heb 
Nogmaals duizendmaal bedankt.

Hoi,

't Kan zelfs NOG plezanter 
In bijlage daarom een ideetje om ongelimiteerd met kleurtjes te spelen (t.t.z. we blijven er voorlopig  nog met 3 werken, maar ze zijn nu simpel te kiezen : celletjes vullen op ander werkblad - da's meteen ook de bepaling van de volgorde).
Op analoge manier kan je ook aan de slag met de tekstkleur.

Mvg,
pitufo