Ciao mapp.
Non puoi farlo con le formule occorre il VBA.
Ti faccio un esempio; questo codice va inserito in un modulo standard.
vb
Function ContaGrassetto(rng As Range)
Dim cel as Range
For Each cel in rng
If cel.Font.Bold = True Then
ContaGrassetto = ContaGrassetto + 1
End If
Next cel
End Function Quindi se vuoi contare le celle in grassetto dell’intervallo A1:A10 sul foglio scriverai
Alfredo