gue, update blog ini dengan disertai perasaan yg berkecamuk dalam dada, rasa bahagia, suka cita . huaaahaaahahah
*sesuatulubung
pagi ini, gue disuruh bikin account voucher sebanyak 3000 voucher .
banyak kan? huee. biasanya gue bikin nya di antlabs itu. di webnya antlabsnya switch First Media di sultan . oiya catet, ini buat voucher internet di Sultan Hotel yaaa.
kata mas akram, takut kurang memorynyaaa. jadi , bikinnya di excell aja.
di random . terus dia nanya "bisa ga bung? di excell, di random gitu ya? "
gue pikiiiiiiiiirrrr, pasti bisa kalo nyari di google. yauda gue bilang bisaaa
awalnyaaa, gue bikin pake mid , left, right gitu dicampur campur , terus tinggal di drag ke bawah , kan jadi banyak .
tapi kata mas akram, ga efektif kaya gitu, itu namanya berurutan , bukan random.
gue nyari lah tuh di google.
dengan keyword "CARA MEMBUAT NOMER SECARA ACAK OTOMATIS DI EXCELL"
gue cari cari , dapetlah ini .
tugas gueeee ituuuu
1. BIKIN VOUCHER DAY. DISINGKAT (VD) . SEBANYAK 1800 ACCOUNT .
FORMATNYA USER ID : VDXXXY DAN PASSWORD : YXXXXY
(nb. x=angka y=huruf) , DAN SEMUANYA DI RANDOM
2. BIKIN VOUCHER HOURS. DISINGKAT (VH) . SEBANYAK 1200 ACCOUNT.
FORMATNYA SAMA KAYA FORMAT DIATAS
jawabannya
BIKIN VD ----->
1. GUE INPUT 'VD' DI DALEM CELL A2
2. BIKIN CODING KAYA GINI , DI CELL A3 .
=LEFT(A2,2)&INT(RAND()*(90-10)+10)&INT(RAND()*(8-2)+2)&CHAR(RAND()*(90-65)+65)
3. BUAT CODING PASSWORDNYAAA, KAYA GINI
=CHAR(RAND()*(122-97)+97)&INT(RAND()*(90-10)+10)&INT(RAND()*(99-11)+11)&CHAR(RAND()*(90-65)+65)
DAN , ALHAMDULILLAH YAAA SESUATUUUUUUUUU .
SEKIAN LAH BIKIN NOMER +ANGKA YG DIACAK ACAK SAMPE SEBANYAK 3000 ACCOUNT .
OIA BUAT VH NYA, NGIKUTIN AJA KAYA SI VD DIBUAT :)
HASILNYA KAYA GINI
ga keliatan ya?
haha bodo :P
oia , mau ngasi tau , gue kangen aqso :) :*
tambahan
ini gue copy dari sumber nya :D
Berikut ini saya akan contohkan bagaimana kita bisa membuat angka acak di Excel
Fungsi Excel untuk membuat angka acak adalah Rand(). Fungsi Rand() – lengkap dengan tanda kurungnya akan menghasilkan angka acak (random) diantara 0 dan 1, jadi angkanya pecahan. Kalau anda menginginkan nilai diantara 1 dan 100, misalnya, rumusnya adalah =Rand()*100
Nah, angka random yang dihasilkan diatas adalah angka pecahan. Untuk membuat angka random yang berupa bilangan bulat, kita tambahkan fungsi Int.
=Int(Rand()*100)
—->menghasilkan bilangan bulat random dari 1-100
Kalau anda ingin menghasilkan bilangan bulat Random dari 5 – 20, bagaimana caranya?
untuk menghasilkan bilangan random dari 5 – 20, kita harus buat seperti ini.
=Int(Rand()*(ba-bb)+bb)
dimana
bb = batas bawah =5
ba = batas atas = 20
=int(rand()*(20-5)+5) —>menghasilkan angka random bulat dari 5 sampai 20
Dengan demikian, anda dengan mudah dapat membuat angka random berapapun batas atasnya….
Nah, untuk membuat karakter a-z, nomor ASCIInya adalah 97 – 122, sedangkan untuk huruf besar A-Z, kodenya adalah 65 – 90.
Dengan mengetahui hal ini, kita dapat dengan mudah mengubah angka random menjadi karakter. Rumusnya
=CHAR(INT((RAND()*(90-65)+65)))
—->menghasilkan huruf besar random
Bagaimana kalau ingin membuat 5 huruf random?
Untuk mengimplementasikannya, anda bisa membuat 5 sel, berisi rumus diatas, kemudian di sel ke – enam anda Concatenate isi kelima sel tersebut. Atau yang lebih praktis dengan menggunakan fungsi berikut ini. Tulis di Module baru dan langsung bisa dipanggil lewat sel
Function KarakterAcak(JmlKar)
temp = "" ‘variabel temp adalah dummy variabel
For i = 1 To JmlKar
Randomize ‘supaya selalu random
a = Int(Rnd * (90 – 65) + 65) ‘random huruf besar
temp = temp & Chr(a) ‘gabungkan
Next i
KarakterAcak = temp ‘kembalikan hasil
End Function
jadi, uda tau kan ,,asal usulnya gimana gue bisa nge-create coding di atas . gituuuuu laaaah