Rnd function
Returns a Single containing a pseudo-random number.
Syntax
Rnd [ (Number) ]
The optional Number argument is a Single or any valid numeric expression.
Return values
If Number is | Rnd generates |
---|---|
Less than zero | The same number every time, using Number as the seed. |
Greater than zero | The next number in the pseudo-random sequence. |
Equal to zero | The most recently generated number. |
Not supplied | The next number in the pseudo-random sequence. |
Remarks
The Rnd function returns a value less than 1 but greater than or equal to zero.
The value of Number determines how Rnd generates a pseudo-random number:
For any given initial seed, the same number sequence is generated because each successive call to the Rnd function uses the previous number as a seed for the next number in the sequence.
Before calling Rnd, use the Randomize statement without an argument to initialize the random-number generator with a seed based on the system timer.
To produce random integers in a given range, use this formula:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Here, upperbound is the highest number in the range, and lowerbound is the lowest number in the range.
Note
To repeat sequences of random numbers, call Rnd with a negative argument immediately before using Randomize with a numeric argument. Using Randomize with the same value for Number does not repeat the previous sequence.
Example
This example uses the Rnd function to generate a random integer value from 1 to 6.
Dim MyValue As Integer
MyValue = Int((6 * Rnd) + 1) ' Generate random value between 1 and 6.
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
피드백
https://aka.ms/ContentUserFeedback
출시 예정: 2024년 내내 콘텐츠에 대한 피드백 메커니즘으로 GitHub 문제를 단계적으로 폐지하고 이를 새로운 피드백 시스템으로 바꿀 예정입니다. 자세한 내용은 다음을 참조하세요.다음에 대한 사용자 의견 제출 및 보기