automatisch cijfers genereren

[stefano]

Hoi hallo

Graag had ik een methode om willekeurig een cijfer te kiezen tussen twee intervallen. bv ondergrens is 10.0, bovengrens is 11.0. Druk op toets of makro geeft dan 10.7 nogmaals drukken 10.2 nogmaals 10.5 etc etc , dus steeds andere getallen. Kan dit in excel ?

dank bij voorbaat, stefano

 

[Jan van Asseldonk]

Dit kan met ASELECT(), bijvoorbeeld

=ASELECT()*(11-10)+10

of met ASELECTTUSSEN(), bijvoorbeeld

=ASELECTTUSSEN(100;110)/10

De eerste genereert een getal tussen 10 en 11 met meerdere decimalen, de tweede met 1 decimaal.

Om deze functies te kunnen gebruiken moet wel analysis toolpak geinstalleerd en geactiveerd zijn bij de invoegtoepassingen.

 

[Eugene]

Gebruik hiervoor de volgende functie

=ASELECTTUSSEN(100;110)/10

 

[Withaar]

Met een macro:

Sub Macro1()
'
' Macro1 Macro
' De macro is opgenomen op 16-5-2003 door --.
'
'
For t = 1 To 30
Range("A" + CStr(t)).Select
ActiveCell.FormulaR1C1 = (Rnd(1) * 99) + 1
Next t
End Sub

30 getallen in de cellen A1 t/m A30 tussen de 1 en 100.

met;
Sub Macro2()
Range("A1").Select
ActiveCell.FormulaR1C1 = (Rnd(1) * 1) + 10
End Sub
Krijg je een getal in cel A1 in de range tussen 10 en 11.