Set Random seed
Hello,
I searched a lot in the web but I was not able to find any solutions.
Using "Rnd", I can have a random number but I would like to be able to set the random seed.
Would it be possible to do so ?
For MATLAB user, I would like to do the following code in VBA :
Thank you in advance.
rand('state',seed_value) %seed value is the random seed (integer) %state or seed or twister can be used to set the seed
Last edited by oro77; 09-09-2011 at 01:57 AM.
Hello oro77,
Randomize [number]
The optional number argument is a Variant or any valid numeric expression.
Randomize uses number to initialize the Rnd function's random-number generator, giving it a new seed value. If you omit number, the value returned by the system timer is used as the new seed value.
Sincerely,
Leith Ross
Remember To Do the Following....
1. Use code tags. Place [CODE] before the first line of code and [/CODE] after the last line of code.2. Thank those who have helped you by clicking the Starbelow the post.
3. Please mark your post [SOLVED] if it has been answered satisfactorily.
Old Scottish Proverb...
Luathaid gu deanamh maille! (Rushing causes delays!)
The VB statement Randomize will set the seed.
http://mac2.microsoft.com/vb/1033/default.aspx
_
...How to Cross-post politely...
..Wrap code by selecting the code and clicking the # or read this. Thank you.
Thank you very much for your help
I thought I checked this function but with no results, I will try again and get back to you.
I tried again with this code
I put this code on a pushbutton, each time I push it, I have different number. I would like to have the same number because I have seed it.Randomize(1) msgbox Rnd
I understood how to use it.
I have to put a negative number for Rnd first and then use Randomize :
Dim i As Long Const Max As Long = 10 Cells.ClearContents Rnd (-10) Randomize (1) For i= 1 To Max Cells(i, 1).Value = Rnd() Next
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks