Loops with saved variables for each loop to be compared after loop is finished?

Hard to explain in the heading, but here is a more complementary version;
I have a macro that puts values into different cells in a sheet. By doing this the sheet has lots of formulas that make other cells give a capasity/result for this situation/combination. I have a lot of combinations (this can be around 5000 rows/combinations). To do all of these combinations I have a loop from 9 (where the first combination starts) to LastRow.
What I want is to store the variable and compera them after the loop is over, like the first variable is Variable1, next Variable 2 etc... then after the loop, I go somthing like Application.Max(Union(Variable1 to VariableLastrow))...? any ideas?

Here are some of the code (it is much larger, but the principle is the same);

Please Login or Register  to view this content.

Is this even possible?
I know I can write all the Results in a range on another sheet, and then compare the values in the range there, but my guess is that this is slowing down the macro (which takes around 4-5 minutes with the solution of writing to another sheet).

Thanks in advance!!

Ok, here is an attachment.
It works, but I want to just show the max value without writing anything (exept the max value of course) in the sheet. The max is to be calculated in the code...
Beregn=Calculate
Slett Res=Delete results