VBA stops responding half way - impossible bet simulation

[imyrgd]

Hello all,

I came across this video and want to use Monte Carlo to examine it.
https://www.youtube.com/watch?v=eivGlBKlK6M
To accomplish the task, I write a VBA script to run the simulation. My scrip always stops at 2xx tries. I tried to run it on multiple computers and sometimes it stopped at 50.
In addition, I can only run the script when sheet 1 is selected. I don't know how to fix this.
I try to use DoEvents or add wait time, but none works.

Excel is attached.

[imyrgd]

Where's all the experts ?

[shg]

You're more likely to get useful help if you explain exactly what you're trying to do, rather than hope someone will try to divine your intent from the code.

[imyrgd]

You're more likely to get useful help if you explain exactly what you're trying to do, rather than hope someone will try to divine your intent from the code.

My script runs fine. The issue is that it is stop in the middle of the loop. Will update how it works later then.