ciao a tutti, sono Enzo62, qualcuno sa come posso, in un foglio Excel, contare solo celle evidenziate in grassetto?
faccio un esempio : 
ho un lavoro composto da  5 fogli, dove all'interno di ognuno c'è una griglia di celle 10x10. 
Se prendiamo per esempio le celle da A1 a L1 e inseriamo un codice in lettere tipo "Pr" per tutte le dieci celle. 
Delle dieci celle da A1 a L1 solo 6 "Pr" sono scritti in carattere normale gli altri 4 sono scritti in grassetto.
Vorrei avere la possibilità in un sesto foglio dove riporterò i totali di tutte le griglie, di avere una colonna di Pr totale (e qui non ci sono problemi) ma anche una colonna che mi contasse delle 10 celle scritte col codice "Pr" solo le 4 scritte in grassetto.
Spero di essere stato chiaro.    GRAZIE............

Function contagrassetto(rng as Range)
Dim cel as Range
Dim conta as Integer
For Each cel in rng
    If cel.font.bold = True Then
          conta = conta + 1
    End If
Next cel
contagrassetto = conta
End Function

Option Explicit

Sub conta()
Dim tabella As Range, c As Range
Dim i As Integer, a As Integer, b As Integer
Set tabella = Range("B2:K11")
For i = 1 To Sheets.Count - 1
    For Each c In tabella
        If c <> "" Then a = a + 1
        If c.Font.Bold = True Then b = b + 1
    Next
    Sheets(3).Range("C2") = a
    Sheets(3).Range("C3") = b
Next i
Sheets(3).Select
End Sub