"Out of Stack Space" error vba Excel 2010

Please Login or Register  to view this content.

It's giving me the error where I annotated it. Any ideas? Those formula are taken quite literally from my excel sheet exactly the same way (but converted to vba of course), but I wanted to run the for/next loop to increment varX which excel couldn't do on it's own so I turned it into code. Not sure why that line is giving error when it works perfectly fine in Excel using the same cells/formula . Btw, that's error 1004.

Changing the cell is firing the Worksheet_Change event, which changes the cell which fires the Worksheet_Change event which changes the cell which fires... eventually you get dizzy and fall down - so does Windows.

You need to disable the event firing at the start of the procedure

Please Login or Register  to view this content.

not forgetting to re-enable afterwards.

As you are disabling event handling, it it critical you include an error handler to trap any potential errors, otherwise Excel will be unresponsive to any events after the error....

Might suggest the following structure for your procedure.

Please Login or Register  to view this content.

I'm wondering if that might disable the rest of my code. I only listed part of it because, well, I didn't think the answer would have an effect on the first part of my code, but now I'm not so sure. Here is my code on that page in its entirety:

Please Login or Register  to view this content.

If I add in your suggestion, won't that disable the event triggering of the two Intersected cells?

EDIT: I just tried it with your suggestions and the two bits of code before what my initial posting work fine, but the bit of code I put does not work now. It does not loop correctly and thus instead of continuing the If/Then until formulaX is greater than 1, it stops at 1. Thoughts?

EDIT-2: I decided to make a button instead for this formula that the user can press to eliminate all issues. But it still does not For counterX correctly. I thought if I had put from 1 to x, and x incremented within the code until certain conditions were met, that the loop would continue until x became true. This does not seem to be the case. For/Next seem to only loop a set amount of times based on what x was when the loop first started. This is not like how vb was back in the 80's. How can I get the counter to count to a variable amount that changes within the code, not a set amount (i.e. not 1 to 10, but 1 to x)?

I'm currently feeling a level of frustration I've not felt in a very long time. I had to add some to my code for zero division error. I was not working as I expected. I narrowed down the problem to this bit of code:

Please Login or Register  to view this content.

When I press the button to run the code, nothing pops up. It does not matter what value I assign formulaX. formulaX works fine in the rest of my code everywhere, allowing me to put it's value into cell ranges, but for whatever wacky reason, it wont in this instance, and this is literally the entirety of my code atm because I erased everything else just to get this tiny code to work, which it does not. Any ideas as to what I'm doing wrong? I'm trying to get AJ11 to have the number 1 in it's cell. I have this exact same code in the rest of my project with formulaX and it displays correctly in AJ11. I'm so confused right now...


***EDIT: Apparently it was because I had a non-macro-enabled workbook open at the same time. I'm really beginning to hate Excel 2010... Closed again.