VBA code is working, but struggling to store the output

Dear Forum Members,

I am in a situation where I managed to do the tricky part but am stuck with the easier stuff (or at least I think it's easier). I compiled the following VBA code which I use for some computations:

Please Login or Register  to view this content.

After the "Loop Until" row and before the Next rows I want to store the output from that particular solution, namely I want to save the outcome for cells (16,2), (16,3), (17,2), (17,3) and (31, 3). Then, after all the calculations are completed I want to write those solutions somewhere in the same sheet (say in columns M, N, O, P and Q). I've tried different things, but they only seem to invalidate my code without actually storing and writing the output. Any suggestions?

Thank you for the reply, AlphaFrog. While this code does the job, I was expecting an output that consists only of 3 results. Your code gives me 81 results. There are three different starting values for my cells B16:C17. These are 20,20,40,40; 30,30,60,60 and 40,40,80,80. For each of these three starting values Solver is supposed to run until it finds some ultimate solution (one and only one per starting value). The three solutions that I am looking for are within those 81 results (I found my 3 solutions one by one before composing the Macro with the For loops). I'm just wondering what are the other 78 out of 81 results that I am getting.

Now, when I think about it, you are absolutely right! I did not realize that I am finding 81 unique solutions to my problem since I have 4 For Loops with three steps each, and 3^4 = 81. Many thanks for your help!