Rumah >Tutorial perisian >Perisian Pejabat >Bagaimana untuk menjana nombor rawak untuk rakan sebilik menggunakan Excel
Sub CiptaRND()
Malapkan arr() Sebagai Integer 'Tentukan tatasusunan
ReDim arr(julat("d3").Nilai) 'Tukar saiz tatasusunan
Malapkan min Sebagai Integer 'Tentukan nilai minimum nombor rawak
Malapkan maks Sebagai Integer 'Tentukan nilai maksimum nombor rawak
Malapkan bendera Sebagai Boolean 'Tentukan pembolehubah bendera untuk menentukan sama ada terdapat nilai pendua
maks = julat("d2").Nilai 'Tetapkan nilai sel d2 kepada nilai maksimum
min = julat("d1"). Nilai 'Tetapkan nilai sel d1 kepada nilai minimum
Jika (maks - min + 1
Keluar Sub
Tamat Jika
Random (Sekarang()) 'Janakan benih nombor rawak menggunakan masa semasa
Untuk i = 0 Kepada julat("d3").Nilai 'Gelung untuk menjana nombor rawak
Lakukan
arr(i) = Rnd() * (maks - min) + min 'Jana nombor rawak
bendera = Palsu
Untuk j = 0 Kepada (i - 1) 'Gelung untuk menentukan sama ada nombor rawak semasa adalah sama dengan nombor rawak yang dijana sebelum ini, dan jika ia sama, jana semula ia
Jika (arr(i) = arr(j)) Maka
bendera = Benar
Tamat Jika
Seterusnya
Gelung Semasa bendera
Seterusnya
Lajur("A:A").KosongkanKandungan
julat("a1").Ubah saiz(julat("d3").Nilai) = Aplikasi.Transpose(arr) 'Hasil keluaran
Tamat Sub
1 Mula-mula kira perbezaan dalam julat ini. Diandaikan di sini bahawa nilai julat ialah nombor rawak dalam lingkungan 50~100
2 Buka hamparan dan masukkan formula berikut dalam sel tempat anda ingin menjana nombor rawak: =rand()*(100-50)+50. Tekan butang sahkan untuk menjana nombor rawak dalam julat yang ditentukan!
3 Jika anda perlu menjana berbilang nombor rawak, hanya seret segitiga kecil di sudut bawah sel!
Microsoft Excel ialah salah satu komponen perisian Microsoft Office Ia adalah perisian hamparan yang ditulis dan dijalankan oleh Microsoft untuk komputer dengan sistem pengendalian Windows dan Apple Macintosh Versi terawal dibangunkan pada tahun 1985.
Microsoft Excel boleh melakukan pelbagai pemprosesan data, analisis statistik dan operasi bantuan membuat keputusan, dsb. Ia mempunyai fungsi seperti membuka atau menutup baris pengepala jadual, mengira lajur untuk melaraskan setiap baris menggunakan formula tunggal, pengisihan dan penapisan data, tersuai formula, dan input teks. Pada masa ini, Microsoft Excel digunakan secara meluas dalam banyak bidang seperti pengurusan, statistik dan kewangan, dan kewangan.
Atas ialah kandungan terperinci Bagaimana untuk menjana nombor rawak untuk rakan sebilik menggunakan Excel. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!