Valores Aleatórios dentro de um Intevalo

Gostaria de entender a melhor maneira, para criar valores aleatórios dentro de um intervalo de valores, exemplo: uma geração de valores aleatórios dentro de um range de 0…20, nunca menor que 0 e nunca maior que 20.

Desde já grato.

@Matheus, bom dia.

Utiliza um tag demo com a propriedade Minimum em 0 e Maximum em 20. Também utiliza a propriedade Type como Random.

Sds.

Muito obrigado pela ideia, porém conhece alguma maneira de fazer esse procedimento por script?
sem a necessidade da criação de uma tag demo.

Pois minha situação é a seguinte: Essa variação irá ocorrer dentro de um loop, bem rápida a variação, sendo assim a variação da tag demo, por mais que ajuste o period e o scan, se torna muito lenta.

@Matheus,

não aconselho utilizar scripts com loops, mas se for muito necessário, segue um exemplo utilizando a função Randomize/Rnd():

Sub CommandButton_Click()
Dim max,min
max=20
min=0
Randomize
'Aqui ao invés de MsgBox pode passar o valor para outros objetos
MsgBox (Int((max-min+1)*Rnd+min)) 
End Sub

Sds.

1 Like