Ta vadnica bo pokazala, kako delati z naključnimi številkami v VBA.
Funkcija RND
Funkcija RND ustvari število, ki je med 0 in 1. Sintaksa funkcije RND je:
Rnd ([Število]), kjer:
- Številka (Neobvezno)- To ni obvezno in če 0 funkcija vrne naslednje generirano naključno število. Če je prazno, se uporabi privzeto> 0.
123 | Sub RndNum ()MsgBox Rnd ()End Sub |
Ustvarjanje naključnega števila v VBA
Če želite ustvariti naključno število med dvema vrednostma, morate uporabiti funkcijo RND v kombinaciji s funkcijo INT (celobrojna funkcija) po naslednji splošni formuli:
- Int (spodnja meja + Rnd * (zgornja meja - spodnja meja + 1))
Torej, da ustvarite naključno število med 2 in 30, uporabite naslednjo kodo:
12345678 | Sub GeneratingARandomNumber ()Zatemni naključno število kot celo številorandomNumber = Int (2 + Rnd * (30 - 2 + 1))Odpravljanje napak. Natisni naključnoŠteviloEnd Sub |