Funkce Rnd
Slouží ke změně počáteční hodnoty použité generátorem náhodných čísel pro funkci Rnd.
Jednoduché příklady Rnd
| 123456 | Sub Rnd_Example ()Dim randomValueNáhodněrandomValue = RndEnd Sub |
Syntaxe Rnd
V editoru VBA můžete zadat „Rnd (“ a zobrazit syntaxi funkce Rnd:
Funkce Rnd obsahuje argument:
Číslo: [Volitelné] Libovolný platný číselný výraz.
Příklady funkce Excel VBA Rnd
Chcete -li generovat náhodnou celočíselnou hodnotu mezi 1 a 10, můžete použít následující kód.
| 12345678 | Sub Rnd_Example1 ()Dim rndValue As SingleNáhodněPro i = 1 až 20rndValue = Int ((Rnd * 10) + 1)Příště jáEnd Sub |
Tento kód vygeneruje 20 náhodných celočíselných hodnot mezi 1 a 10.
Chcete -li generovat náhodnou hodnotu mezi dolní a horní hranicí, můžete použít následující funkci.
| 123 | Funkce RndSpecial (horní jako samostatná, dolní jako samostatná) jako samostatnáRndSpecial = (horní hranice - dolní hranice) * RndKoncová funkce |
| 12345 | Sub Rnd_Example2 ()Dim randomValue as SinglerandomValue = RndSpecial (5, 30)MsgBox randomValueEnd Sub |
Tím se vrátí náhodná hodnota mezi 5 a 30.
