✅ VBA Rnd -funksjon

Innholdsfortegnelse

Rnd -funksjon

Brukes til å endre frøverdien som brukes av tilfeldige tallgeneratoren for Rnd -funksjonen.

123456

Sub Rnd_Example ()Dim randomValueTilfeldigrandomValue = RndSlutt Sub

I VBA Editor kan du skrive "Rnd (" for å se syntaksen for Rnd -funksjonen:

Rnd -funksjonen inneholder et argument:

Nummer: [Valgfritt] Ethvert gyldig numerisk uttrykk.

For å generere tilfeldig heltall mellom 1 og 10, kan du bruke følgende kode.

12345678

Sub Rnd_Example1 ()Dim rndValue As SingleTilfeldigFor i = 1 til 20rndValue = Int ((Rnd * 10) + 1)Neste jegSlutt Sub

Denne koden genererer 20 tilfeldige heltall mellom 1 og 10.

For å generere tilfeldig verdi mellom en nedre og en øvre grense, kan du bruke følgende funksjon.

123	Funksjon RndSpecial (øvre som enkel, nedre som singel) som singelRndSpecial = (upperbound - lowerbound) * RndSluttfunksjon

12345

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

Dette vil returnere en tilfeldig verdi mellom 5 og 30.