Si le format imposé est : 0,00"ml", ("0,00 mL" ne fonctionnant pas), un essai fonction personnalisée:
en B10 : =SufixFormat(A10)
dans un module standard:
Code:
Function SufixFormat(Cel As Range)
SufixFormat = Trim(Split(Cel.NumberFormat, """")(1))
End Function
A+
Edit : Bonjour pierrejean
et, une correction prenant en compte les erreurs possibles:
Code:
Function SufixFormat(Cel As Range)
On Error GoTo Erreur
SufixFormat = Trim(Split(Cel.NumberFormat, """")(1))
Exit Function
Erreur:
SufixFormat = ""
End Function