bjr à tous,
j'ai developpé une macro dont le but est de répartir un nombre dans des cases selon les heures du travail
elle est comme suivant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Do
        Range("m9").End(xlToRight)(1, 2).Value = Round(Range("m9").End(xlToRight)(1, 2).Offset(-3, 0).Value * Range("m9").Value)
        Loop Until Range("at9").Value >= Range("d9").Value
        Range("m9").End(xlToRight)(1, 1).Value = Round(Range("m9").End(xlToRight)(1, 1).Value - (Range("at9").Value - Range("d9").Value))
le problème c'est que : comment je peux faire pour que la repartition s'arrete si on atteint la cellule "AS9".

merci pour votre aide.