Gekleurde cellen optellen

[Janneman12]

Hallo,

Ik ben met een bestandje bezig en nu is mijn bedoeling om de getallen die in de rode cellen staan bij elkaar op te tellen.
Ik heb een bestandje toegevoegd. Ik werk met office 2013.

Wie kan me helpen.Bekijk bijlage helpmij.xlsx

 

[Demeter]

Dit kan alleen worden bereikt met een VBA code aangezien er geen standaard Excel formule voor de colorindex is te vinden.

Kijk een sop de volgende link:
http://www.xldynamic.com/source/xld.ColourCounter.html

 

[Janneman12]

Ok, maar mijn engels is niet optimaal. Heb je misschien iets in het nederlands.

 

[JeanPaul28]

Bekijk mijn voorbeeld eens

 

[HSV]

Zet onderstaande eens in de bladmodule.
Je doet meestal toch wel een selection.change na het uitvoeren van de opmaak verandering.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Application.Cells.Dirty
 Application.Volatile
End Sub

 

[Janneman12]

Ik heb even geoefend zoals Jean Paul heeft gedaan. Lukt mij ook, maar is het dan ook mogelijk dat de getallen die naast de kleuren staan verdwijnen, anders lijkt dat zo raar in mijn bestandje dat daar een rij getallen staat. Weet niet of dit mogelijk is?

 

[JeanPaul28]

Je kan de getallen ergens anders laten verschijnen,buiten het zichtveld en de kolom verbergen.

 

[Elsendoorn2134]

Janneman12,

Hierbij een VBA programma dat gekleurde cellen telt

Bekijk bijlage SumByColor.xls


Veel Succes

 

[Janneman12]

Elsendoorn,

Hoe krijg ik die rare S tekens dan?

 

[Janneman12]

Ok Jean Paul,

Dat is een goede tip.

 

[Warme bakkertje]

Die rare $-tekens zijn gewoon het dollarteken op je toetsenbord.