Addition cellules de couleur de fond rouge

Bonjour dans mon fichier je souhaite additionner les cellules de couleurs de fond rouge du calendrier par onglet. j'ai rentré une formule en C36 mais a priori pas la bonne.

Il faut surtout pas qu'il s'additionne entre chaque onglets.

Merci.

Bonjour Julien

L'ouverture de ton fichier plante mon excel

Cordialement

=sommecouleurfond((B16:Q16;B19:Q19);3)

Voici le code mis en C36 qui doit faire l'addition de cellule sur fond rouge uniquement par onglet seulement

Cdt

en faite je souhaiterais que lorsque je rentre une donnée dans le calendrier et que cela est "heures à payées" et bien que la cellule ce met d'une autre couleur "ex :vert" que dans mon tableau il y a un compteur pour ces heures sur le mois actuel uniquement et surtout qu'elle ne s'additionne pas aux heures "rtt".

Cordialement

https://forum.excel-pratique.com/excel/erreur-de-formule-t62599-10.html

Celui ci plante pas a ouverture.

Bonjour voici le code qui foncionne pour inserer un commentaire dans lors que l'on saisie une donnée dans les palges concerné.

Je souhaitais verrouille les cellules avec les formules pour éviter de les effacer mais si je les verrouille une erreur survient pour saisir un commentaire.

Y a t il une solution a sa?

Merci

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B16:Q19")) Is Nothing Then
If Target = "" Then Target.ClearComments
If Target <> "" Then
    Target.ClearComments
    Target.AddComment
    Target.Comment.Text Text:=InputBox("Entrez votre commentaire")
End If
End If
End Sub