Excel 2003 VBA - Meer voorwaarden bij voorwaardelijke opmaak

[doosje1967]

Kan er iemand helpen?
In bijlage een testbestandje voor de opmaak van een jaarkalender van een vereniging met meerdere ploegen.
Er moet dus gelet worden op het eventuele samenvallen van wedstrijden.
In het voorbeeld zijn er 3 ploegen voorzien met hun speeldata in januari.
Via voorwaardelijke opmaak of VBA is er een vergelijking gedaan van de eerste 2 ploegen:
- als beide ploegen op dezelfde dag spelen kleurt de achtergrond PAARS
- als alleen ploeg 1 thuis speelt, kleurt de achtergrond BLAUW
- als enkel ploeg 2 thuis speelt, kleurt de achtergrond ROOD
- speelt er niemand op een kalenderdag dan blijft de achtergrond ongekleurd.

Dit moet nu worden uitgebreid naar meerdere ploegen (in het voorbeeld naar 3)
Zo ontstaan er volgende mogelijkheden:
- ploeg 1, 2 en 3 spelen op eenzelfde dag
- ploeg 1 en 2 spelen op eenzelfde dag
- ploeg 1 en 3 spelen op eenzelfde dag
- ploeg 2 en 3 spelen op eenzelfde dag
- ploeg 1 speelt op een bepaalde dag
- ploeg 2 speelt op een bepaalde dag
- ploeg 3 speelt op een bepaalde dag
- niemand speelt er

Ik dien mij te houden aan Excel 2003 omdat nog niet alle gebruikers beschikken
over een recentere versie.

Dank bij voorbaat,

 

[Elsendoorn2134]

Oplossing met VBA

Doosje1967

Het zal vast wel mogelijk zijn met gebruik van voorwaardelijke opmaak maar dat is voor mij
veel te lastig.
Ik maak zelf liever gebruik van VBA om dit soort problemen op te lossen.
Ik heb in je bestand dus een procedure aangemaakt die de cellen kleurt.
Ik heb in de procedure wat uitleg opgenomen zodat je het programma kan volgen.

Bekijk bijlage HelpMySpeelkalender.xls

Veel Succes.

 

[doosje1967]

Hey Elsendoorn,

alvast thanks voor de reactie.
Alles ziet er puik uit, maar ik moet het nog eens goed bekijken,
want daarna ga ik het uitbreiden naar de 12 maanden in het jaar
en de mogelijkheid tot 6 à 8 ploegen.

Je zal mij alvast meer dan op de goede weg geholpen hebben.

CU,

 

[Elsendoorn2134]

Doosje1967,

Met de maanden zal het wel lukken maar met 6 tot 8 ploegen gaat dit niet werken.
Als je dat op basis van deze manier van werken doorzet heb je voor 6 ploegen 2^6 -1 = 63 kleuren nodigen
en voor 8 ploegen zelfs 2^8 -1 = 255 kleuren.
Je zal dus een andere manier moeten vinden om dit vast te leggen.

Veel Succes.

 

[doosje1967]

Dan wordt het waarschijnlijk een kleurtje per ploeg.
Wanneer er dan ploegen op hetzelfde moment een thuiswedstrijd hebben
verschijnt deze dag dan bvb in een rode achtergrond en komt er
een berichtvenster met de melding dat op dd/mm/yy er een ontmoeting samenvalt
van ploeg x en ploeg y OF van ploeg x, ploeg y en ploeg z

enz...


CU en thnkx voor de opmerking (spaart een hoop werk in de poging dit te realiseren)