Terima kasih pak De. Masih banyak mainan si Mbah yang belum bisa saya mainkan.

Salam,
HK


________________________________
 From: De Premor <[email protected]>
To: [email protected] 
Sent: Thursday, 5 September 2013, 17:32
Subject: Re: [belajar-excel] Penggunaan Randomize, Rnd pada VBA
 


  
Apa manfaat dan bagaimana penggunaan Randomize ?
Di Dalam Kitab Betaljemur AdamExcel tertulis: To repeat sequences of
    random numbers, call Rnd with a negative argument immediately before using 
Randomize with a numeric argument. Using Randomize with the same value for 
number does not repeat the previous sequence.

Jadi, penggunaan pungsi randomizer diperlukan untuk mengantisipasi
    jikalau fungsi Rnd sebelumnya itu dialokasikanuntuk merandom value
    negatif, jadi si Randomizer akan mengambil sebuah nilai baru dari
    timer, kalau nilainya jelas2 selalu positif ya ndak dipakai
    Randomizernya juga ndak apa

Sub tes_rnd3()
    Dim i As Integer
    [B1] = Rnd(-1)
    'Randomize
    For i = 1 To 100
        Cells(i, 1) = Rnd
    Next
End Sub

Paste baris diatas pada Kamar Sheet2
Pada sub routine diatas di hidup dan matikan fungsi Randomize nya
    kemudian coba juga untuk mematikan 1 baris diatasnya, lalu coba
    jalankan beberapa kali serta dilihat hasilnya

Mengapa X harus selalu = 1 + .......
Ini dikarenakan fungsi pada .... (titik-titik nya) yang bunyinya Int(Rnd * 
Matrix.Cells.Count), dimana fungsi dari INT adalah memangkas angka dibelakang 
koma, maka pada saat si Cell Matrix.Cells.Count bernilai 1, maka hasil 
perkalian bisa dipastikan lebih kecil dari 1 (0,xxxxxxx) jadi fungsi INT akan 
mengubah angka 0,xxxx menjadi 0 saja, dan jika ini dibiarkan maka akan 
mengakibatkan error, dikarenakan matrix hitunganya dimulai dari 1

Kira2 begitu :D

On 05-09-2013 16:41, hendrik karnadi wrote:

Yang ingin saya tanyakan:
>- Apa manfaat dan bagaimana penggunaan Randomize ?
>  Dari pengetesan saya, tanpa fungsi tsb pun hasilnya akan tetap sama.
>- Mengapa X harus selalu = 1 + .......

 

Kirim email ke