Actualisation qui ne se fait pas

Bonjour,

J'ai créé un tableau avec des jours de présence.

Ces jours sont matérialisés par des couleurs.

A la fin du tableau, le total des couleurs s'affiche dans plusieurs cellules.

Mon problème est que ce total ne s'actualise pas, y compris en appuyant sur la touche F9.

J'ai essayé différents choses, mais rien n'y fait.

Je vous joins le fichier pour avis.

Merci d'avance.

Cordialement.

Bonjour,

ajoute

Application.Volatile

à tes fonctions

personnellement, j'évite de "compter" des couleurs, je mets plutôt un code et je joue avec les MFC et les formules classiques

Bonjour,

Il suffit de reforcer le calcul de la colonne "BV", comme ceci :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Columns("BV").Dirty
End Sub

Merci pour la réponse, mais ca ne marche pas.

aqxzsx a écrit :

Merci pour la réponse, mais ca ne marche pas.

Il suffit de sélectionner une autre cellule que celle venant d'être colorée et la mise à jour s'effectue.

Oui, c'est ce que j'ai fait, mais ca ne change pas la valeur pour autant.

aqxzsx a écrit :

Merci pour la réponse, mais ca ne marche pas.

la preuve ...

Bonjour,

Dans ta fonction change le type de données pour ta variable "Couleur" passes de Byte à Variant :

Function NbColor(ByRef Plage As Range, Couleur As Variant) As Long