Je n'y comprend rien, désolé. Je n'ai d'ailleurs jamais rien compris à la comptabilité.
Peut être qu'il vaudrait mieux ne pas toucher du tout à l'échéancier, et y chercher plutôt dans les cumuls prévus celui atteint dans la situation précédente. LÉch = Worksheetfunction.Match(CumulAtteint, CumulsPrévus) + 1 donnerait en gros le numéro de la prochaine ligne d'échéancier à atteindre, si toutefois le cumul atteint n'est pas inférieur au 1er cumul prévu, auquel cas ça planterait si on tentait de l'exécuter, donc il ne faut pas mais on sait que c'est 1 dans ce cas.
Parce que là le même pourcentage de quoi sur un nombre de lignes précédentes qu'on ne connait pas ? Non non non. Ça va pas du tout ! Moi je comprendrais seulement un pourcentage du restant à prendre, un point c'est tout. Sinon débrouillez vous.