[Visual Basic] Incrémenter en fonction de la couleur

[Dispix]

Bonjour à tous !

Je suis ici car j'ai un problème pour lequel je n'ai pas trouvé d'aide sur internet. Ma situation est la suivante : dans le cadre de mon travail, nous avons mis en place un planning sur excel en mettant en couleur des cases pour représenter les semaines d'activité (il y a plusieurs couleur, par exemple : rouge pour "chantier", bleu pour "étude", etc.).

Dans une colonne à gauche de la zone dans laquelle j'ai mis mes cases de couleur, j'ai les heures allouée à chaque tâche et mon but serait de faire l'addition des heures de toutes les tâches d'une même couleur.

Il faudrait donc que je trouve une formule du genre :

c=0
For i = 6 to 100
For j = 5 to 100
If CouleurCellule=Rouge then c=c+Cellule(i,4).valeur
Next
Next
Cellule(1,1).valeur=c.valeur

(le code au dessus étant bien évidemment faux dans la syntaxe)

Quelqu'un aurait-il une idée du code approprié pour ce calcul ?

Je reste à votre disposition pour tout renseignement complémentaire

 

[Dispix]

Re : [Visual Basic] Incrémenter en fonction de la couleur

Oui ça semble correspondre ! Je n'aurais pas l'occasion d'essayer ça avant un mois hélas (je suis en congés, puis ensuite en cours pendant 2 semaines puis une semaine de congés, les aléas de l'apprentissage ^^) mais à priori ça semble tout à fait convenir !

Merci beaucoup pour toute ton aide et ta patience