Calculer une période

Bonjour,

Voici mon problème, j'aimerais calculer une ou des périodes d'absence avec une formule pour que quand on modifie un élément dans le tableau et que ça se calcule automatiquement. Mais je n'arrive pas à trouver la solution.

Ci-joint vous trouverez un exemple du tableau (tout est fictif), Et les réponses dans la colonne AG sont tapées à la main et c'est la formule que je désire trouver. Mais il faut qu'elle s'adapter si il y a un changement.

Pouvez-vous m'aider?

Bonjour,

Avec une fonction personnalisée en VBA:

Dans la cellule AG3; mettre la formule suivante: =Nb_Periodes(B3:AE3)

Le code de la fonction:

Function Nb_Periodes(Plage As Range) As Long
    Dim Cpt As Long, Cpt_Inter As Long
    Dim Cell As Range
    Cpt = 0
    Cpt_Inter = 0
    For Each Cell In Plage
        If Cell = "m" And Cpt_Inter = 0 Then
            Cpt_Inter = 1
            Cpt = Cpt + 1
        ElseIf Cell.Interior.ColorIndex = 6 Then
            GoTo Suivant
        ElseIf Cell <> "m" Then
            Cpt_Inter = 0
        End If
Suivant:
    Next
    Nb_Periodes = Cpt
End Function

Cdlt

Merci beaucoup Arturo83, cela fonctionne très bien. Je me doutais bien qu'il fallait faire une fonction personnalisée mais comme mes connaissances ne vont pas jusque là, j'étais coincé. En tout cas merci beaucoup.

Cordialement

Bonjour à tous !

Une proposition formule unique et dynamique (Microsoft 365) ?