Dear Mr. Kid...
Thank'z atas pencerahannya...

benar sekali Mr. Kid, jika menggunakan medote acak tanpa ada acuan brarti ada 
byk kemungkinan terjadi data yg memiliki kode kembar,,,
kenapa saya tdk kepikiran sampai ksna ya,,,

lalu bagaiaman supaya tidak terjadi kode yg terulang untuk stiap produk ???
mohon bantuannya lg yaa pak...

Thank'z...




________________________________
 Dari: Mr. Kid <[email protected]>
Kepada: [email protected] 
Dikirim: Sabtu, 29 Desember 2012 8:35
Judul: Re: [belajar-excel] Cara membuat kode produk baru dg nilai acak
 

  
Hai Nanank,

"kode produk terdiri dari 2 huruf dan angka 4 angka"
>> Dua huruf pertama adalah milik kode lama, maka bisa dengan fungsi Left( 
>> data_lama , 2 )
>> disambung dengan spasi maka formula ditambah dengan bunyi  & " "
>> diikuti selalu 4 angka acak yang artinya minimal 1 dan maksimal 9999, maka 
>> formula diberi ekspresi pembuat 4 angka :
      & text( randbetween( 1 , 9999 ) , "0000" )
>> jika menggunakan xl2003 kebawah, maka bagian RandBetween diganti dengan :
      int( rand() * 9999 + 1 )

Formula lengkap, misal data lama di A2 dan data baru di B2 :
=Left( A2 , 2 )  & " " & Text( RandBetween( 1 , 9999 ) , "0000" )              
-> xl2007 ke atas
=Left( A2 , 2 )  & " " & Text( Int( Rand() * 9999 + 1  ) , "0000" )             
    -> semua versi Excel

Penyusun acak huruf (1 huruf -> A-Z [capital]) bisa dilakukan dengan bantuan 
fungsi Char. Kode ASCII huruf A dimulai dari nomor 65, dan Z di 90
formula bisa berupa 
=Char( RandBetween( 65 , 90 )  )  -> xl2007 ke atas
=Char( Rand() * ( 90 - 65 ) + 65 )  -> semua versi :: bila ingin mendapatkan 
bilangan bulat, sertakan fungsi Int sebagai proses komputasi terhadap hasil 
Rand() blabla

Untuk menyusun 2 karakter acak : (gunakan sesuai kebutuhan dan ubah batas nilai 
acak sesuai kebutuhan)
=penyusun_karakter_1 & penyusun_karakter_2
=Char( RandBetween( 65 , 90 )  ) & Char( RandBetween( 65 , 90 )  )
=Char( Rand() * ( 90 - 65 ) + 65 ) & Char( Rand() * ( 90 - 65 ) + 65 )

Akan digabungkan dengan formula penyusun angka sebagai pengganti bagia Left 
dalam formula di atas sana :
=Char( RandBetween( 65 , 90 )  ) & Char( RandBetween( 65 , 90 )  )  & " " & 
Text( RandBetween( 1 , 9999 ) , "0000" )       -> xl2007 ke atas
=Char( Rand() * ( 90 - 65 ) + 65 ) & Char( Rand() * ( 90 - 65 ) + 65 ) & " " & 
Text( Int( Rand() * 9999 + 1  ) , "0000" )                 -> semua versi Excel

Karena kriterianya hanya acak, maka ada potensi terjadinya duplikasi antara 
data lama dengan baru maupun data baru dengan data baru lainnya.
Biasanya pengubahan kode produk dari lama ke baru diikuti dengan penyusunan 
suatu format tertentu, misal karakter pertama untuk hal tertentu, dst sampai 2 
angka terakhir menunjukkan varian produk. Dan hasil pengubahan itu akan 
membentuk sebuah peta data transformasi kode produk.

Untuk pembuatan kode produk baru, umumnya adalah mengisi area kosong yang ada. 
Jika kode produk memiliki suatu format tertentu, maka area kosong yang dimaksud 
adalah area kosong di setiap part kode produk yang sesuai.

Wassalam,
Kid.




2012/12/28 Flow Nanank <[email protected]>

 
>  
>Dear BeExceller,,
>
>
>Mohon bantuannya untuk membuat kode produk baru dg nilai acak...
>kode produk terdiri dari 2 huruf dan angka 4 angka,,
>
>
>
>
>file terlampir...
>
>
>Thank'z
>
>
>

 

Kirim email ke