Comptage de cellules fusionnées

[legrandcharles]

Bonjour,
Je souhaite compter les cellules d'un tableau qui contiennent du texte.
Certaines sont fusionnées par groupes de 2 ou 3. Il s'agit d'un emploi du temps. Si 3 cellules sont fusionnées par exemple, en employant nb.si, excel n'en compte qu'une ( la première qui contient le texte). Or je voudrais obtenir comme résultat 3 puisque 3 heures sont affectées.
QQ a-t-il une idée ?
Merci

 

[jp14]

Re : Comptage de cellules fusionnées

Bonjour

Une fonction personnalisé pour compter le nombre de cellules.

Function NbColonnes(zoneàcompter As Range) As Integer
Application.Volatile
    If zoneàcompter.MergeArea(1) = "" Then
    NbColonnes = 0
    Else
    NbColonnes = zoneàcompter.MergeArea.Columns.Count
    End If
End Function

la fonction renvoie 0 si la zone est vide.

JP