Check alle échte Black Friday-deals Ook zo moe van nepaanbiedingen? Wij laten alleen échte deals zien

[Excel] Voorw opmaak gebaseerd op andere kolom & cel

Pagina: 1
Acties:

  • jvdk1709
  • Registratie: Juni 2009
  • Laatst online: 25-06-2009
Ik ben bezig met het maken van een VBA-script dat de achtergrondkleur van een cel aanpast gebaseerd op de tekstwaarde van een cel in andere kolom en de waarde die in de cel zelf staat.

Om precies te zijn ben ik bezig met het toepassen van Altman's Z-Score die gebruikt wordt om de waarschijnlijkheid van bedrijfsfaillissementen te bepalen. Er bestaan verschillende grenzen voor 3 categorieën bedrijven: publiek gehouden bedrijven, privaat gehouden bedrijven en service (non-manufacturing) bedrijven. Om de failissementswaarschijnlijkheid aan te geven wil ik gebruik gaan maken van de kleuren rood, oranje en groen.

In het excel bestand staat in kolom E de categorie van het bedrijf (public, private of non-manufacturing). In de kolommen F, G, H en I staat de Z-score van respectievelijk de fiscale jaren 2008, 2007, 2006 en 2005.

Nu is het de bedoeling dat de achtergrondkleur van de cellen waarin de Z-Scores staan van kleur veranderen gebaseerd op de categorie van het bedrijf. Dit zou volgens de volgende voorwaarden moeten gebeuren:

Voor Public bedrijven:
Z < 1.8 Rood
1.8 < Z < 2.99 Oranje
Z>2.99 Groen

Voor Private bedrijven:
Z < 1.33 Rood
1.23 < Z < 2.9 Oranje
Z > 2.9 Groen

Voor Non-manufacturing bedrijven:
Z < 1.11 Rood
1.1 < Z < 2.6 Oranje
Z > 2.6 Groen

Ik heb reeds geprobeerd iets in VBA te maken maar dit blijkt niet te werken. Nu ben ik nog maar net begonnen met het gebruiken van VBA, dus het zou goed kunnen dat ik basiszaken over het hoofd heb gezien. Deze code heb ik hieronder gezet.

Wie weet hoe ik dit kan aanpakken? Alvast bedankt voor je hulp!

  • onkl
  • Registratie: Oktober 2002
  • Laatst online: 20:50
Hier heb je geen VBA voor nodig. Als je de voorwaardelijke opmaak van een cel instet, kan je ook kiezen voor "formule".
Door de cel standaard oranje te maken en een formule als =ALS(OF(EN($E2="Publiek";F2<1,8);EN($E2="Privaat";F2<1,33));WAAR;ONWAAR) om de cel rood te maken en een equivalente om de cel groen te maken, kom je een heel eind.

  • jvdk1709
  • Registratie: Juni 2009
  • Laatst online: 25-06-2009
Dat werkt inderdaad erg goed! Bedankt voor je tip, onkl!