Bonsoir Tous,
Vois ce que cela donne en remplaçant la ligne
Cells(j, 5).FormulaR1C1 = "="" ""&FIXED(RC[-2],0)&""/""&FIXED(RC[-1],0)"
par celle-ci
Cells(j, 5) = " " & [Cy].Text & "/" & [Az].Text
où
Cells(j, 5) est l'adresse de la cellule contenant l'écriture fractionnaire,
Cy est celle de la cellule contenant le numérateur et
Az celle de la cellule qui contient le dénominateur.
A noter que le premier espace permet d'éviter le format de date provenant du slash /.
Pour la second question, je mettais simplement un exemple d'utilisation de la fraction en calcul comme a = b x ¾ , a étant en Cells( j , 7 ), b en Cells( j , 6) et la fraction ¾.
Partager