trouver le format personalisé appliqué a une cellule en VBA

Dans un fichier Excel, des données numériques sont sous divers formats personnalisés. Pour retrier intelligement ces données, il faut savoir quel est le format personnalisé qui a été appliqué!

En appliquant la formule "=CELLULE("format";A4)", on obtient un code P2 qui indique seulement qu'un format personnalisé est appliqué mais ne différencie pas les divers formats. Je n'ai rien trouvé en VBA ni dans la FAC.

Qqu'un aurait-il une idée?

Merci d'avance

Code:

---

MsgBox Range("A4").NumberFormat

---

Merci c'est exactement ce que je voulais mais j'avais voulu l'appliquer sur un range contenant plusieurs cellules, d'ou l'erreur!

En balayant la plage de données avec une macro, je peux les identifier et créer une table de données logique.

Vive les forums et surtout merci à ceux qui savent!

Pierre