find 6 matching numbers out of 20 vba good for keno

Reply #50

retxx — Mon, 13 Nov 2017 15:12:03 GMT

found the reason; it is read only

Reply #49

timmsy — Mon, 13 Nov 2017 08:35:12 GMT

messaged you the new link . check your inbox

Reply #48

retxx — Sun, 12 Nov 2017 15:34:34 GMT

hi timmsy. you said you were going to send another link for me to try. waiting

Reply #47

KARAT — Sat, 11 Nov 2017 09:09:48 GMT

Perfectly, timmsy

Reply #46

timmsy — Sat, 11 Nov 2017 01:59:28 GMT

One button delete numbers the other deletes extra sheets buttons on the left hand side .

Reply #45

retxx — Sat, 11 Nov 2017 01:35:26 GMT

when i opened it it had 5 sets of numbers. I hit delete to clear those #'s but they remained. why

Reply #44

timmsy — Fri, 10 Nov 2017 22:07:06 GMT

https://1drv.ms/u/s!Ag3gOZ6aEeT_bc24VDNc-fKdkVk

updated the excel file for 60 keno and matching 7 8 9 ,,,

Reply #43

timmsy — Wed, 08 Nov 2017 20:43:00 GMT

Hello karat

I will fix the exell file to have keno 60 and macthing 7 8 9 . I upload it soon

Reply #42

KARAT — Wed, 08 Nov 2017 16:15:19 GMT

And for Keno 20/60? And why is not present macthing7, macthing8, macthing9

Reply #41

dr san — Tue, 07 Nov 2017 19:39:43 GMT

tmmiy password please

Reply #40

retxx — Tue, 07 Nov 2017 14:53:16 GMT

when I open it it sends me to a filter selection screen. what next? waiting for your password and how to apply it.

Reply #39

timmsy — Tue, 07 Nov 2017 11:16:18 GMT

hello retxx

I made some changes to the excel file its now generate keno 20/50 numbers also made 2 other macro for generate keno 20/100 numbers and generate keno 20/80 numbers for other keno's

https://1drv.ms/u/s!Ag3gOZ6aEeT_bNE93hiKbiy0tVc

Note : the reason you had issues with the old file is because someone moderfied it ,,, so I password protect this file, just e-mail me and i will send you the password.

Reply #38

retxx — Tue, 07 Nov 2017 01:41:16 GMT

found out why. it is a read only.won't change to write. any help would be helpful. thanks

Reply #37

retxx — Sun, 05 Nov 2017 00:55:34 GMT

P.S. I use open office if that makes any difference to you.Let me know

Reply #36

retxx — Sun, 05 Nov 2017 00:21:44 GMT

i have my 50 keno numbers but not sure how to get them to you.

Reply #35

timmsy — Sat, 04 Nov 2017 22:19:34 GMT

retxx add your excel file here https://1drv.ms/f/s!Ag3gOZ6aEeT_azInIPd3iZ3GfHg with your numbers in it and i will have a look

Reply #34

retxx — Sat, 04 Nov 2017 14:49:02 GMT

i enabled macros clicked on the button, nothing happens on any button. why

Reply #33

timmsy — Sat, 04 Nov 2017 01:38:17 GMT

Click delete numbers macro button and past your numbers in make sure your numbers are in order e.g 1 2 3

Reply #32

retxx — Sat, 04 Nov 2017 00:45:19 GMT

how to go about deleting the list and inserting my keno numbers games #'s.do i copy and paste it in

Reply #31

dr san — Thu, 02 Nov 2017 23:29:24 GMT

Ok, TIMMSY but my keno goes up to 100 australia is up to 80 but mine has 100 numbers

In other words, 100/20 my keno uses 100 numbers = 00 to 99

Reply #30

timmsy — Thu, 02 Nov 2017 13:21:41 GMT

https://1drv.ms/u/s!Ag3gOZ6aEeT_ai56DlLOPJ3MbF4

dr san down load my excel file it has been setup to use your past 50 20/80 keno numbers , you can use 100 rows but note the macro will take longer to run

how to use :

1. Past your past 50 or 100 wining 20 keno numbers in B1 ((Note : all number must be smallest to highest format if not it wont work))

2. then run one of 2 3 4 5 6 or 10 matching keno buttons to find the most common numbers

((note: if you use 100 rows the macro m... [ More ]

Reply #29

dr san — Thu, 02 Nov 2017 09:46:02 GMT

Hello, TIMMSYkeno, both with 80 numbers or 100 numbers we have a problem of inverted cas or polindromos example = 23,32 or 57 75

In 90% or is drawn 23 or 32, numca the two together there are few cases that appear the two numbers, exception! The question is how to combine in such a way that you can synchronize

Example I play 23,57,26 ..... I do not play 32,75,62, but hit only 23, the 57 and 26 were not drawn, but 75 and 62 was how to do the synchronization (combine

Reply #28

timmsy — Thu, 02 Nov 2017 08:52:42 GMT

Ok will post it up soon

Reply #27

dr san — Wed, 01 Nov 2017 14:19:09 GMT

Hello my neko is a hundred numbers = 00 to 99 100/20 Do you get 10 numbers for keno 100/20? thank you

Reply #26

KARAT — Wed, 01 Nov 2017 14:19:07 GMT

I wish to receive a working macro or the program for KENO 20/60.

Reply #25

timmsy — Wed, 01 Nov 2017 08:07:15 GMT

ok who is keen for an .xls file that checks 2,3,4,5,6,7,8,9, and 10 matching numbers out of 20/80 keno ??? ...

Reply #24

retxx — Fri, 20 Oct 2017 13:00:31 GMT

is there another way to copy and enter into a link/thanks

Reply #23

FUADFF — Fri, 20 Oct 2017 01:17:11 GMT

Thanks.

Reply #22

timmsy — Thu, 19 Oct 2017 10:40:49 GMT

this is for 4 out 20 for FUADFF

Sub CombiMax4()

On Error Resume Next

Dim a%, b%, c%, d%, m%, n , i , dc As Object, k, T()

Set dc = CreateObject( Scripting.Dictionary )

'Recueil combinaisons

With ActiveSheet

n = .Cells(.Rows.Count, 1).End(xlUp).Row

For i = 1 To n

For a = 2 To 18

For b = a + 1 To 19

For c = b + 1 To 20

For d = c + 1 To 21

k = .Cells(i, a) | .Cells(i, b) | .Cells(i, c) | _

.Cells(i, d)

If dc.exists(k) Then

m = CInt(dc(k)) + 1... [ More ]

Reply #21

FUADFF — Thu, 19 Oct 2017 00:30:47 GMT

Hi, i need 4 matching numbers out of 20 ( Keno-Ontario

Reply #20

retxx — Tue, 17 Oct 2017 00:23:23 GMT

are you sure. did you check with Todd

Reply #19

timmsy — Mon, 16 Oct 2017 20:25:50 GMT

I would like to post a link to excel with all the macro' in it but the i am not allowed by the admin of the post .

Reply #18

retxx — Mon, 16 Oct 2017 13:35:37 GMT

P.S. Mass. is a 20/80 game. I use the day before as past draws. Thanks again

Reply #17

retxx — Mon, 16 Oct 2017 13:32:35 GMT

I would like to work with 5 numbers. Being old and feeble could you post a link to use open office to get the #'s. I cannot use your formula as is. Thanks

Reply #16

timmsy — Mon, 16 Oct 2017 01:51:15 GMT

Just completed 2,3and 4 vba if anyone is keen

Reply #15

timmsy — Fri, 13 Oct 2017 11:34:49 GMT

let me know if you want 7, 8 and 9 vba as well

Reply #14

timmsy — Fri, 13 Oct 2017 10:20:49 GMT

Post a reply to find 5 matching numbers out of 20 vba good for keno

note if you need to find 5 matching numbers out of 10 numbers using the 5 matching vba the code should look like this

With ActiveSheet

n = .Cells(.Rows.Count, 1).End(xlUp).Row

For i = 1 To n

For a = 2 To 7

For b = a + 1 To 8

For c = b + 1 To 9

For d = c + 1 To 10

For e = d + 1 To 11

also note your data sheet should have all the lotto numbers in order and not mixed , otherwise the vba will... [ More ]

Reply #13

timmsy — Fri, 13 Oct 2017 10:14:55 GMT

Post a reply to find 10 matching numbers out of 20 vba good for keno

Sub combo10()

On Error Resume Next

Dim a%, b%, c%, d%, e%, f%, g%, h%, i%, j%, m%, n , p , dc As Object, r, T()

Set dc = CreateObject( Scripting.Dictionary )

'Collection combinations

With ActiveSheet

n = .Cells(.Rows.Count, 1).End(xlUp).Row

For p = 1 To n

For a = 2 To 12

For b = a + 1 To 13

For c = b + 1 To 14

For d = c + 1 To 15

For e = d + 1 To 16

For f = e + 1 To 17

For g = f... [ More ]

Reply #12

timmsy — Fri, 13 Oct 2017 10:14:01 GMT

Post a reply to find 5 matching numbers out of 20 vba good for keno

Sub CombiMax5()

On Error Resume Next

Dim a%, b%, c%, d%, e%, m%, n , i , dc As Object, k, T()

Set dc = CreateObject( Scripting.Dictionary )

With ActiveSheet

n = .Cells(.Rows.Count, 1).End(xlUp).Row

For i = 1 To n

For a = 2 To 17

For b = a + 1 To 18

For c = b + 1 To 19

For d = c + 1 To 20

For e = d + 1 To 21

k = .Cells(i, a) | .Cells(i, b) | .Cells(i, c) | _

.Cells(i, d) | .Cells

Reply #11

timmsy — Fri, 13 Oct 2017 02:23:24 GMT

Ok almost done with this new vba .. the new vba will find 10 matching numbers out of 20 numbers.

Reply #10

dr san — Wed, 11 Oct 2017 11:44:18 GMT

My keno is 100/20

You draw 20 numbers in 100 (00 to 99)

Please

Reply #9

CARBOB — Wed, 11 Oct 2017 10:21:06 GMT

Thanks Steve. Changed my mind, Georgia's history is in a dumb format.

Reply #8

kreative1 — Wed, 11 Oct 2017 01:48:50 GMT

You aren't stupid Sometimes when people post something, they think because they know what it means so should we lol and then you have someone like winsum and others who take the time to explain it to us

Reply #7

winsumloosesum — Wed, 11 Oct 2017 01:26:03 GMT

Please share when you have time.

Thanks

Reply #6

timmsy — Tue, 10 Oct 2017 20:00:24 GMT

I also have code for 5 macthing numbers as well if anyone wants

Reply #5

timmsy — Tue, 10 Oct 2017 19:52:54 GMT

For one year will take a very long time unless you have a super computer.

Reply #4

winsumloosesum — Tue, 10 Oct 2017 19:15:43 GMT

Bob,

Just substitute the GA Keno draws from last 365 draws. Number the draws 1 through 365 in cell column A then copy and paste your 365 past draws starting in cell B1 then click the toolbar. 365 draws may take some time to calculate depending on the speed of your computer.

I would be interested to know how long 365 past draws takes.

Reply #3

CARBOB — Tue, 10 Oct 2017 13:32:04 GMT

Steve,

How much work would it be to create an Ga keno db for one years draw

Reply #2

winsumloosesum — Tue, 10 Oct 2017 11:09:01 GMT

Keno Excel file:

https://1drv.ms/u/s!AifgvyqwTTMrh1rDAlvEQqxLgrFX

What is a VBA Code? Visual Basic for Applications. Programming language used for Microsoft Excel, Word, etc.

What is on Sheet 1 and 2? Sheet 1 contains a listing of 12 drawings. Each drawing has 20 sets for each drawing.

You say 6 Matching numbers out of 20..but I dont see one column or row with 20 numbers.?

VBA code creates a list of 6 keno numbers from the draw history and how many times a six number list appears

Reply #1

DownandDirty — Tue, 10 Oct 2017 02:38:43 GMT

I play Keno and wish I could understand what it is you are outlining here.

Let me start with a few stupid questions.

What is a VBA Code?

What is on Sheet 1 and 2?

You say 6 Matching numbers out of 20..but I dont see one column or row with 20 numbers.?

I must be stupid..really...

find 6 matching numbers out of 20 vba good for keno

timmsy — Mon, 09 Oct 2017 16:28:19 GMT

sheet one should look like this format

1 6 10 17 19 20 25 28 34 35 36 39 42 49 51 54 62 63 69 71 73

2 1 5 10 11 12 13 20 23 25 27 29 40 42 44 47 63 65 66 75 80

3 3 9 14 16 17 18 20 24 38 40 42 47 49 50 51 54 62 72 74 75

4 7 11 12 15 21 22 31 33 40 42 43 45 48 51 52 56 57 68 70 80

5 3 4 9 10 17 19 25 26 31 33 40 42 45 51 52 54 57 61 74 76

6 4 7 9 17 18 21 26 30 46 52 53 56 65 68 69 70 73 74 76 80

7 3 23 24 25 27 28 30 36 38 42 44 45 47 51 54 59 62 68 74 76

8... [ More ]