ups.. ada yang ketinggalan.. variabel yang tadi dideklarasikan harus diisi dengan sebuah nilai yang berasal dari jumlah nama customer yang sama, salah satu caranya adalah dengan memanfaatkan fungsi CountIf milik worksheet yang bisa dipanggil dengan cara Application.WorksheetFunction.CountIf(range_datanya , kriterianya_dalam_hal_ini_adalah_nama_customer)
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada pooling berikut http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3 Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat berharga untuk Be-Exceler yang lain Wassalam, -Miss Jan Raisin- *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1 pertanyaan yang diajukan;* *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke [email protected];* *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan orang-orang yang sabar QS 2:153;* Pada 2 Mei 2013 16.09, Jan Raisin <[email protected]> menulis: > Hai Helsy, > > coba cara seperti ini: > > 1. deklarasikan 1 buah variabel baru bertipe Integer untuk menghitung > berapa banyak data tiap customer yang akan dikopi > 2. non aktifkan script If .Cells(i, 2).Value = .Cells(i + 1, 2) Then, dan > script penutupnya (ini berarti cuma baris If dan End If saja, tidak > termasuk script diantara keduanya) > 3. ganti nilai lData menjadi ldata = i + variabel_pada_nomor_1_di_atas - 1 > 4. sebelum message box, tambahkan script yang berbunyi i = i + > variabel_pada_nomor_1_di_atas > 5. coba jalankan lagi script yang sudah diubah > > silakan dicoba dulu, semoga langsung berhasil.. kalo gagal nanti Jan bantu > lagi deh, insya ALLAH > > # sampaikan masalah yang sering anda temui saat menggunakan Excel pada > pooling berikut > > http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3 > > Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat > berharga untuk Be-Exceler yang lain > > Wassalam, > > -Miss Jan Raisin- > > *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan > Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1 > pertanyaan yang diajukan;* > *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke > [email protected];* > *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta > dengan orang-orang yang sabar QS 2:153;* > > > Pada 2 Mei 2013 14.38, Helsy B <[email protected]> menulis: > > ** >> >> >> Assalamu'alaikum para pakar Excell, >> >> Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya >> sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang >> sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari >> Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain >> yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar >> makro dari forum ini yang sangat banyak menambah ilmu excel saya. >> >> Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih. >> >> Wassalam, >> Helsy >> >> >> > >
