Use VBA/Macros Excel for solving this interesting simulation question (probability)

I'm sure you can calculate these probabilities easily with basic equations of probability. there is notghing strange, just a bit tedious work. Anyway, if you want to play with simulations - why not, the simple VBA code to generate these numbers could be:

Please Login or Register  to view this content.

run it in an empty workbook, empty sheet.
it now makes 10*1 000 = 10 000 simulations and depending on a computer power takes probably just few seconds. But it does not mean the time increase will be strictly linear, neither i'm not sure if you will not hit the limits of computer memory etc.

If you are satisfied, you can increase upper limit 10 in row

Please Login or Register  to view this content.

or you may just rerun the code - new results will be placed below old ones

The good point is that the whole processes of drawing 8 times 10 from refilled set of 100 numbers are independant
You may generate say 100 000 (for n = 1 to 100) in one file, save it and prepere next 9 files (starting from empty one) the same way.
Finally you can just copy data from all files into one.

Cross-posted at:
http://www.vbaexpress.com/forum/show...ation-question
https://forums.excelguru.ca/threads/...uestion.11660/
https://chandoo.org/forum/threads/ho...uestion.50030/
https://forum.ozgrid.com/forum/index...tion-question/
(and who knows where else)
Please read Excel Forum's Cross-Posting policy in rule 8 - you know, the rules you agreed to abide by when you joined this forum: http://www.excelforum.com/forum-rule...rum-rules.html

Welcome (back) to the forum.

Thanks for your question. However, we have just found out that you have posted the same question elsewhere.... and haven't told us. Feel free to cross-post on other sites...

But. Every forum has its rules. Please see Forum Rule #3 about cross-posting. So.

Do not keep it a secret. We all are willing to give you our time, freely. However, some of us get very annoyed if we waste our time developing a solution for you, when you already have a nice solution elsewhere. All we ask is that you show us some respect and tell us:

1) if you have cross-posted, and

2) the URL of the cross posts.

That way, those of us who don't want to waste their time can quickly check to see if you're already happy with another solution.

So. Where ELSE have you cross-posted this request?

The websites are totally UNRELATED, but some people contribute to more than one.

The point is that you are looking for help in multiple places, potentially wasting OUR time, which is given to you FREELY.

So I repeat my question. Where else have you crossposted this request?

NO HELP to be offered until this is done.

To be honest with you... I don't do VBA, so I will be unable to help. However, if I saw that something was copied ALL across the WWW, I would just ignore the thread and move on, as I could not be bothered checking SOOO many fora to see if you already had an answer.

You may need to add a space into the URL, as posting URLs is srestricted until you've made about 10 posts (an anti-spam measure).

The thread remains CLOSED until the links are provided.

Also cross-posted at:
https://www.mrexcel.com/board/thread...ution.1223471/
https://stackoverflow.com/questions/...y-distribution
https://www.reddit.com/r/excel/comme..._solving_this/

Open for business again... even if it was Macropod (and notably NOT the Original Poster) who provided the links...

Four changes are needed:

Please Login or Register  to view this content.

Sure, it could be simply

Please Login or Register  to view this content.

this was a result of recycling a code from one of previous posts.

And as Im'm coming back to this thread, lets see from just probability view (mentioned at the beginning of post #2).

we are always drawing 10% of the box content
after first draw we have 90 pens of group 1-100 remaining in the box (0.9 as probability of not being choosen)*100
in the second draw we added 10 from group 101-110. So we have 90 of first group and 10 of second, select 10%, so we take (statistically) 9 of first group and 1 from second. The remaining pens will (statistically) be 9 (0.9*10) from this group and 81 (0.9*0.9*100 or 0.9^2 *100) from 1-100
third we've added 10 from 111-120. statistically we draw 1 from this group, 0.9 from 101-110, and 8.1 from first group so in box there is (statistically) 9 newest (0.9*10), 8.1 second (0.9^2 *10) and 72.9 (0.9^3 *100) from the oldest
4th we've added 10 from 111-120. so remaining 0.9*10 ; 0.9^2 *10; 0.9^3 * 10 and 0,9^4 * 100
... etc
So after 16 draws we will have (of course 90 pens total in a box)

18.53020189 form set 1-100
2.058911321 from set 101-110
2.287679245 from set 111-120
2.541865828
2.824295365
3.138105961
3.486784401
3.87420489
4.3046721
4.782969
5.31441
5.9049
6.561
7.29
8.1
9 from the most recently added (241-250)

See attached Zeszyt3.xlsx

Marc L at other forum (Ozgrid i think) suggested that a table could be used insteda of dictionary, with shifting results within table - well, why not. Below is working code for such approach prepared yesterday waiting for my car to be washed :-) (again reusing some of previous code) and from the triplet: reuse-recycle-reduce, reduce is probably not the case :-) neither in previous snippet, nor in this one:

Please Login or Register  to view this content.

Well, I'd like to see the comment and/or feedback from MrSimulation