Bonjour job75, NumeroMan,
Ah oui, elle est drôlement bien, ta formule !
Mais à c'moment-là, j'laisserai tomber les résultats intermédiaires,
et je mettrais en C1 :
=MOD(B1;9) ;
reste plus qu'à tirer vers le bas.
La colonne D ne sert plus ; et y'a plus besoin de code VBA,
car ma fonctions SumDigits() devient inutile
(et donc
le fichier peut être un simple .xlsx et plus un .xlsm).
Je joins ci-dessous, pour NumeroMan, le fichier .xls
x (9 Ko) ;
et comme il a peut-être Excel 2003, le fichier .xl
s (26,5 Ko).
@NumeroMan :
note bien que j'ai fait ces 2 fichiers
grâce à la formule de job75 ; c'est lui que tu dois
remercier !
soan