Tento tutoriál předvede, jak pracovat s náhodnými čísly ve VBA.
Funkce RND
Funkce RND generuje číslo, které je mezi 0 a 1. Syntaxe funkce RND je:
Rnd ([číslo]) kde:
- Číslo (Volitelný)- Toto je volitelné a pokud 0, funkce vrátí další vygenerované náhodné číslo. Pokud je pole prázdné, použije se výchozí hodnota> 0.
123 | Sub RndNum ()MsgBox Rnd ()End Sub |
Generování náhodného čísla ve VBA
Abyste mohli generovat náhodné číslo mezi dvěma hodnotami, musíte použít funkci RND v kombinaci s funkcí INT (funkce Integer) pomocí následujícího obecného vzorce:
- Int (Lowerbound + Rnd * (upperbound - lowerbound + 1))
Abyste vygenerovali náhodné číslo mezi 2 a 30, použili byste následující kód:
12345678 | SubgeneratingARandomNumber ()Dim randomNumber As IntegerrandomNumber = Int (2 + Rnd * (30 - 2 + 1))Debug.Print randomNumberEnd Sub |