Bonjour,
pas vraiment utile le fichier ....et le message précédent aussi...
tu crée une fonction personnalisé (dans un module standard VBA)
'
' Nombre valeur nonVide d'une plage ( même fusionnée)
'
Function NbValNonVide(r As Range) As Long
Application.Volatile
Dim i As Long
Dim c As Range
For Each c In r.Cells
If c.MergeArea.Cells(1, 1) <> "" Then
i = i + 1
End If
Next
NbValNonVide = i
End Function
puis tu utilise la fonction dans ta feuille de calcul :
=NbValNonVide(B2:B4)