✅ VBA Rnd -funktion

Innehållsförteckning

Rnd -funktion

Används för att ändra frövärdet som används av slumptalsgeneratorn för Rnd -funktionen.

123456

Sub Rnd_Example ()Dim randomValueSlumpmässigtrandomValue = RndAvsluta Sub

I VBA Editor kan du skriva "Rnd (" för att se syntaxen för Rnd -funktionen:

Funktionen Rnd innehåller ett argument:

Siffra: [Valfritt] Alla giltiga numeriska uttryck.

För att generera slumpmässigt heltal mellan 1 och 10 kan du använda följande kod.

12345678

Sub Rnd_Example1 ()Dim rndValue As SingleSlumpmässigtFör i = 1 till 20rndValue = Int ((Rnd * 10) + 1)Nästa iAvsluta Sub

Denna kod genererar 20 slumpmässigt heltal mellan 1 och 10.

För att generera slumpmässigt värde mellan en nedre gräns och en övre gräns kan du använda följande funktion.

123	Funktion RndSpecial (övre som enkel, nedre som singel) som singelRndSpecial = (upperbound - lowerbound) * RndAvsluta funktion

12345

Sub Rnd_Example2 ()Dim randomValue As SinglerandomValue = RndSpecial (5, 30)MsgBox randomValueAvsluta Sub

Detta returnerar ett slumpmässigt värde mellan 5 och 30.