Guten Tag,

ich sehe hier 2 Möglichkeiten:

1) Du baust deinen obrigen Code in eine Schleife ein, einfach mal googeln.

2) Ich sehe hier auch die Möglichkeit einer Formellösung, auch wenn diese sehr lang werden wird.

Da deine ganzen Deklarationen fehlen und aus deinem Codeabschnitt nicht wirklich ersichtlich wird, was da genau berechnet werden soll kann ich nur eine erste Idee liefern, welche noch an die tatsächlichen Gegebenheiten der Tabelle angepasst werden muss. Ich gehe davon aus, dass die Zahlen in Spalte "B" eine eindeutige Zuordnung von zusammenhängenden Sachverhalten zulassen.

In Zelle B49: - Eckige Klammern sind aus der Formel zu löschen und die beschriebenen Inhalte durch Zellverweise ect. zu ersetzen.

=wenn(istnv(sverweis(A49;[Hier dein Suchbereich definieren und festsetzen];2;falsch));"";runden([Hier deine Berechnungen durchführen lassen, hierfür kannst du natürlich nicht deinen Codevariablen nehmen sondern musst auf Zellverweise evtl. unter erneuter zurhilfenahme von sverweisen ausweichen.] ;2)) 

Formel nach Anpassung und Testung runterkopieren.

MFG