Bonjour Berni
Voici une macro:
Sub Compter_une_valeur()
nombre = InputBox("Inscrivez la valeur à compter", "nombre", 0)
nbre = WorksheetFunction.CountIf(Range("A:IV"), nombre)
MsgBox ("La valeur " & nombre & " est présente " & nbre & " fois dans cette feuille!!")
Range("A1").Activate
End Sub
Pour ce qui est de l'anglais dans inputBox change ceci ...Inscrivez la valeur à compter en anglais et.... La valeur est présente fois dans cette feuille!!")
Ne pas changer " & nombre & " ....et " & nbre & "
A++
Temjeh