Compté les cellules de couleur + motif ( Tramé ). Comment faire

[mistercoke]

Hello les stars, j'aurais besoin d'un petit coups de main car là je sèche.

Je chercher à comptabiliser les cellules de couleur dans une plage de données. Ceci c'est oK. J'ai réussi également à comptabiliser les cellules uniquement avec "motif" avec fond blanc. Mais je souhaite également comptabiliser les cellules de couleur + motif ( Tramé ) mais je n'y parviens pas. Si quelqu'un peut me dire ou ca cloche, ce serait .

Voici une partie de ma ligne de code et j'a mis également mon fichier.

If cellule.Interior.ColorIndex = 10 Then
Nbvertfoncé = Nbvertfoncé + 1
Else
If cellule.Interior.Pattern = xlGray16 Then
NbtraméNtaf = NbtraméNtaf + 1
Else
If cellule.Interior.ColorIndex <> 2 And cellule.Interior.Pattern = xlGray16 Then
Nbtramétaf = Nbtramétaf + 1
Else

Au plaisir de vous lire

 

[Banzai64]

Re : Compté les cellules de couleur + motif ( Tramé ). Comment faire

Bonjour

Pas sur que cela soit une solution
A voir

 

[BOISGONTIER]

Re : Compté les cellules de couleur + motif ( Tramé ). Comment faire

Bonsoir,

Voir PJ

JB

 

[mistercoke]

Re : Compté les cellules de couleur + motif ( Tramé ). Comment faire

Bonjour Messieurs, Banzai64 cela fonctionne c'est super, je ne comprend pas le -4105 mais bon ca fonctionne. Merci Boisgontier, une explication à la pro comme j'ai déjà vu plusieurs fois mais là je vais faire le faignant ( Copier/coller ) car je dois aller au boulot. Merci beaucoups à vous deux.
Passer une bonne soirée, et encore merci