Tabla de contenido
Función Rnd
Se utiliza para cambiar el valor inicial utilizado por el generador de números aleatorios para la función Rnd.
Ejemplos simples de Rnd
123456 | Sub Rnd_Example ()Dim randomValueAleatorizarrandomValue = RndEnd Sub |
Sintaxis de Rnd
En el Editor de VBA, puede escribir "Rnd (" para ver la sintaxis de la función Rnd:
La función Rnd contiene un argumento:
Número: [Opcional] Cualquier expresión numérica válida.
Ejemplos de la función Rnd de Excel VBA
Para generar un valor entero aleatorio entre 1 y 10, puede utilizar el siguiente código.
12345678 | Sub Rnd_Example1 ()Dim rndValue como únicoAleatorizarPara i = 1 a 20rndValue = Int ((Rnd * 10) + 1)Siguiente yoEnd Sub |
Este código generará 20 valores enteros aleatorios entre 1 y 10.
Para generar un valor aleatorio entre un límite inferior y un límite superior, puede utilizar la siguiente función.
123 | Función RndSpecial (límite superior como único, límite inferior como único) Como únicoRndSpecial = (límite superior - límite inferior) * RndFunción final |
12345 | Sub Rnd_Example2 ()Dim randomValue As SinglerandomValue = RndSpecial (5, 30)MsgBox randomValueEnd Sub |
Esto devolverá un valor aleatorio entre 5 y 30.