Hai Nanank, Bagaimana jika dibuat urut saja dari 1 sampai 9999.
Wassalam, Kid. 2012/12/29 Flow Nanank <flow.nan...@yahoo.co.id> > ** > > > 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 <mr.nm...@gmail.com> > *Kepada:* belajar-excel@yahoogroups.com > *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 <flow.nan...@yahoo.co.id> > > ** > > 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 > > > > > > >