Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: gekleurde cellen tellen  (gelezen 17093 keer)

0 leden en 1 gast bekijken dit topic.

Offline rdcoster

  • Volledig lid
  • **
  • Berichten: 214
  • Geslacht: Man
  • Oplossing.be
gekleurde cellen tellen
« Gepost op: 19 juni 2019, 06:50:12 »
De cellen van kolom A in werkblad 'Lijst' worden met voorwaardelijke opmaak gekleurd als die overeenkomen met deze van kolom A op blad 'Conditie'.

Ik wil nu de gekleurde cellen tellen.
Ik dacht dit te doen met een functie  "red($A2)" maar dit werkt niet.
Blijkbaar is het niet hetzelfde als je een cel manueel inkleurt tegenover voorwaardelijk.
Iemand een suggestie ?

In bijlage een testje.

Offline Dotchiejack

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 626
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #1 Gepost op: 19 juni 2019, 09:08:47 »
Kan je hiermee verder?
Sub dotch()
For Each cel In Range("A2:A" & Cells(Rows.Count, 1).End(xlUp).Row)
    If cel.DisplayFormat.Interior.ColorIndex = 3 Then i = i + 1
Next
[B21] = i
End Sub
Groet, Philiep

Offline rdcoster

  • Volledig lid
  • **
  • Berichten: 214
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #2 Gepost op: 19 juni 2019, 11:06:17 »
@Dotchiejack,

Perfect !  Dank u wel !!

Ik kan weer verder tot de volgende struikelblok.

Offline Dotchiejack

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 626
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #3 Gepost op: 19 juni 2019, 11:11:14 »
Dank voor de terugkoppeling. :thumbsup:
Groet, Philiep

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 1.953
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: gekleurde cellen tellen
« Reactie #4 Gepost op: 19 juni 2019, 22:10:42 »
Dit snap ik niet? Je kleurt een cel dmv een voorwaarde. Dan kan je toch met dezelfde voorwaarde met de SumIf functie aan de slag? Wat je nu doet, is onlogisch.
______________________________

Groet, Leo

Offline rdcoster

  • Volledig lid
  • **
  • Berichten: 214
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #5 Gepost op: 20 juni 2019, 07:59:45 »
@RedHead,
Ik wil niet de som van waarden in de gekleurde cellen maar alleen het aantal.

@Dotchiejack
Eens ik de gekleurde cellen gevonden heb wil ik de bijhorende waarden van A?:C? kopiëren naar een ander tabblad zodanig dat ik een gefilterde lijst krijg met alleen de info van de gekleurde cellen.
Hoe zou ik dit best aanpakken?

Offline pitufo

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 1.088
  • Geslacht: Man
Re: gekleurde cellen tellen
« Reactie #6 Gepost op: 20 juni 2019, 08:55:35 »
Hallo,

Citaat
Ik wil niet de som van waarden in de gekleurde cellen maar alleen het aantal
Toch kon je met de tip van RedHead eenvoudig verder.
Zet in B2 gewoon =AANTAL.ALS(voorwaarde; $A2)
Dat staat dan volkomen los van de vraag of kolom A rood is.

Citaat
Eens ik de gekleurde cellen gevonden heb
Die moet je toch niet meer 'vinden' ? Ze staan automatisch gekleurd, met net als in de eerste kwestie de vraag of het nog nuttig is, want je hebt dan kolom B als eenvoudiger alternatief om naar een ander tabblad te kopiëren.

Groeten,
pitufo
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

Offline pitufo

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 1.088
  • Geslacht: Man
Re: gekleurde cellen tellen
« Reactie #7 Gepost op: 20 juni 2019, 09:15:25 »
En nu mét bijlage  ;)
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

Offline emields

  • Volledig lid
  • **
  • Berichten: 210
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #8 Gepost op: 20 juni 2019, 14:38:22 »
Hier nog 2 mogelijkheden zonder vo

Offline pitufo

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 1.088
  • Geslacht: Man
Re: gekleurde cellen tellen
« Reactie #9 Gepost op: 20 juni 2019, 14:49:45 »
En voor alle duidelijkheid: in mijn voorbeeld was de voorwaardelijke opmaak van TS nog blijven staan, maar MAG natuurlijk wel weg.
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

Offline rdcoster

  • Volledig lid
  • **
  • Berichten: 214
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #10 Gepost op: 20 juni 2019, 20:07:01 »
Ik constateer dat blijkbaar de inkleuring van de cellen (voorwaardelijk of door VBA gekleurd) niet meer manueel weg te krijgen is met 'Celeigenschappen/opvulling'.

Is dit normaal?

Offline emields

  • Volledig lid
  • **
  • Berichten: 210
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #11 Gepost op: 20 juni 2019, 22:53:30 »
in welk voorbeeld?

Offline rdcoster

  • Volledig lid
  • **
  • Berichten: 214
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #12 Gepost op: 21 juni 2019, 05:58:43 »
In voorbeeld van pitufo (reactie #7)

Offline Dotchiejack

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 626
  • Geslacht: Man
  • Oplossing.be
Re: gekleurde cellen tellen
« Reactie #13 Gepost op: 21 juni 2019, 08:30:00 »
Sub dotch()
Sheets("Rode").Cells.FormatConditions.Delete
End Sub

Groet, Philiep

Offline pitufo

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 1.088
  • Geslacht: Man
Re: gekleurde cellen tellen
« Reactie #14 Gepost op: 21 juni 2019, 12:32:18 »
Citaat
Ik constateer dat blijkbaar de inkleuring van de cellen (voorwaardelijk of door VBA gekleurd) niet meer manueel weg te krijgen...in voorbeeld van pitufo

Euhhh ??  ???

Er stond in mijn vba-code niets dat met voorwaardelijke opmaak te maken heeft.
Die stond al in jouw voorbeeld en ik heb hem laten staan zodat je er naar believen je ding kon mee doen.
Die terug weghalen doe je niet met 'celeigenschappen', maar wel op quasi dezelfde wijze zoals je die hebt ingesteld, met name bij 'voorwaardelijke opmaak'
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

 


www.combell.com