A new way of picking random numbers using Random_seed

Reply #3

JADELottery — Tue, 21 Aug 2018 17:42:07 GMT

In this case, just one.

Reply #2

Stack47 — Tue, 21 Aug 2018 17:06:19 GMT

We have found that reseeding the generator does not improve randomness.

How many different types of random are there

Reply #1

JADELottery — Tue, 21 Aug 2018 13:24:39 GMT

Add either or both of the following code snippets to the 'ThisWorkbook' code module in the 'Microsoft Excel Objects' folder to initialize the random number generator each time the file is open or activated.

Seeding a random generator only needs to be done once.

We have found that reseeding the generator does not improve randomness.

____________________________________________________________________________________________________

Private Sub Workbook_Open()

Randomize Timer... [ More ]

A new way of picking random numbers using Random_seed

timmsy — Tue, 21 Aug 2018 13:09:55 GMT

Sub Lotto()

'10 Draws lots from values in a table finding 7 different past numbers.

'If a number occurs in the table more than once, the probability

'increases for this number to become a winner.

Dim lVal As Long

Dim rInput As Range

Dim rCell As Range

Dim colCheck As Collection

Dim colWinners As Collection

On Error GoTo ErrorHandle

'We assume that the table is on the first worksheet and starts in cell A1.

'The range, rInput is set = the table.

Set rInput = Wor... [ More ]