VBA especial random numbers generator with option includes or exclude

[motilulla]

Hello

I am looking for a lottery 5/50 exclusive random number generators I search in the Mr.Excel forums and also in Internet but do not find it.

With following features…
I will make a list of numbers need to Excluded in row 2 or numbers to be Include in row 3

1. VBA give an input option for both 1^st input exclude so I can select the numbers to be excluded from the row2, if I do not want to exclude any skip this step, and 2^nd input include may be 1,2 or max 3 numbers, if I do not want to include any skip this step, (so within set of 5 included number must be picked rest random numbers be added to make 5 in total)
2. Input option how many sets require for example 5, 10, 15, or 20 random sets output them in B6:F15
3. If possible (not important) output numbers could be organized in ascending order smaller to higher will the better.

Example...

Book1
	A	B	C	D	E	F	G	H	I	J	K	L	M	N
1
2	Exclude	2	7	12	22	27	32	38	40	42	45	47
3	Include	20	47
4
5		n1	n2	n3	n4	n5
6	Set 01	5	26	31	36	37
7	Set 02	13	16	19	21	35
8	Set 03	8	30	37	41	48
9	Set 04	10	17	18	19	41
10	Set 05	8	13	21	31	34
11	Set 06	14	16	23	36	37
12	Set 07	4	17	19	28	34
13	Set 08	10	25	46	48	49
14	Set 09	1	5	15	30	44
15	Set 10	11	23	24	30	48
16
Sheet1

Thanks In Advance
Using version 2000

Regards,
Moti

 

[motilulla]

B___P, thank you for explaining the logic I understand.

But if possible I want input selection for excluded included number from range and desire numbers of set to be generated is any way to do it.

I appreciate you help

Regards,
Moti

 

[motilulla]

Hello Rick Rothstein, thank you for your response
which can generate 10 sets at once VBA is run out of 1 to 50 numbers each set of 5 numbers
Regards,
Moti

Hello Rick Rothstein,

Sorry I want to make a correction not 10 fix, I want as per input options may be 1, 5, 10 or 50...

Thank you

Regards,
Moti

 

[motilulla]

Bump

 

[B___P]

macro already does what you want:
put excluded numbers in row 2 from column B on. Answer yes to 1st question
put included numbers in row 3 from column B on. Answer yes to 2nd question

if you want a custom set of ticket answer No to "Free numbers only once" and random numbers may repeat over tickets. If answer is yes numbers apart excluded and included appear only once.

 

[motilulla]

macro already does what you want:

Hello B___P,

Thank you very much, and my apologies for not testing it thoroughly.

In the Step3 question NO REPETITIONS? I was answering every time only "YES"

if you want a custom set of ticket answer No

B___P, yes this did the trick answering "No" give me the option "How many sets?"

Sorry, and many thanks All was perfect already.

Regards,
Moti