Problème de ré0partition d'un montant sur plusieurs cellules

J'ai crée un fichier avec l'aide de chat gpt dans le but de répartir les montants saisies dans une textbox et qui depassent le million sur plusieurs cellules en fractions de 999 999.99 ,mais le code généré n'affiche que la première fraction,le fichier joint aide mieux a comprendre

merci d'avance à celles et à ceux qui prendront le temps de jeter un oeil

Bonjour,

ça fonctionne chez moi

Mais bon, pas vraiment besoin de vba pour ça
eric