random number generator

[rsankh]

Hey !!
I am using Random numer generator in a macro.I need input range to b
variable.

for generating random number I need values and respective probability.
start recording a macro.initially I have 5 values and respectiv
probabilities.I apply random number generator on these values with th
parameters say 30 (number of variables) ;2000(number of Random numbers
; discrete ditribution.one more parameter is needed that is "Values an
Probability input range";as there are 5 values,it takes range a
$A2$:$B$6 and generates the random numbers on a different sheet.

Now my problem is that how to take different inputs to generate rando
numbers.I have recorded macro with five values.I want macro to wor
with 6,7,8 ... intial values.basically I want to change the inpu
range.

How can I generate random numbers with "number of variables" an
"number of random numbers" other than 30 and 2000 respectively.
thanks in advance
rsank

 

[Nigel]

Your VBA code for the parameters you intially set would look like this.....

Application.Run "ATPVBAEN.XLA!Random", , 30, 2000, 7, , ActiveSheet. _
Range("$A$2:$B$6")

The parameters can be changed into variables like this

Dim xVars As Long, xNumbers As Long, xRange As Range
xVars = 30
xNumbers = 2000
Set xRange = ActiveSheet.Range("$A$2:$B$6")

Application.Run "ATPVBAEN.XLA!Random", , xVars, xNumbers, 7, , xRange

By changing the variables (either user input or using VBA code) different
conditions for the RNG can be set.

 

[rsankh]

Thanks ..it worked !