VBA Rnd-functie

Rnd-functie

Wordt gebruikt om de beginwaarde te wijzigen die wordt gebruikt door de generator voor willekeurige getallen voor de Rnd-functie.

Eenvoudige Rnd-voorbeelden

123456

Sub Rnd_Example()Dim willekeurig WaardeRandomiserenwillekeurige waarde = RndEinde sub

Rnd-syntaxis

In de VBA-editor kunt u "Rnd(" typen om de syntaxis voor de Rnd-functie te zien:

De functie Rnd bevat een argument:

Nummer: [Optioneel] Elke geldige numerieke uitdrukking.

Voorbeelden van Excel VBA Rnd-functie

Om een ​​willekeurig geheel getal tussen 1 en 10 te genereren, kunt u de volgende code gebruiken.

12345678

Sub Rnd_Example1()Dim rndValue As SingleRandomiserenVoor i = 1 tot 20rndWaarde = Int((Rnd * 10) + 1)volgende iEinde sub

Deze code genereert 20 willekeurige gehele getallen tussen 1 en 10.

Om een ​​willekeurige waarde tussen een ondergrens en een bovengrens te genereren, kunt u de volgende functie gebruiken.

123	Functie RndSpecial (bovengrens als enkelvoudig, ondergrens als enkelvoudig) als enkelvoudigRndSpecial = (bovengrens - ondergrens) * RndFunctie beëindigen

12345

Sub Rnd_Example2()Dim willekeurig Waarde als singlewillekeurige waarde = RndSpecial (5, 30)MsgBox willekeurige waardeEinde sub

Hiermee wordt een willekeurige waarde tussen 5 en 30 geretourneerd.