Selasa, 18 Desember 2012

[belajar-excel] Digest Number 1975

15 New Messages

Digest #1975
1a
Bls: [belajar-excel] Konversi Data Teks ke Angka by "ghozi alkatiri" ghozialkatiri
2b
Re: Menghitung rata2 sisa activity by "Mr. Kid" nmkid.family@ymail.com
2d
Re: Menghitung rata2 sisa activity by "Mr. Kid" nmkid.family@ymail.com
2f
Re: Menghitung rata2 sisa activity by "Mr. Kid" nmkid.family@ymail.com
3a
membuat ranking kelas by "Husnul Faizin" husnulfaizin
3b
Re: membuat ranking kelas by "Mr. Kid" nmkid.family@ymail.com
4a
modifikasi function open file by "rodhy hakim" odhyz83_assasaky
4b
Re: modifikasi function open file by "Mr. Kid" nmkid.family@ymail.com
4c
Re: modifikasi function open file by "odhyz83_assasaky@yahoo.com" odhyz83_assasaky
4d
Re: modifikasi function open file by "Mr. Kid" nmkid.family@ymail.com
4e
Re: modifikasi function open file by "odhyz83_assasaky@yahoo.com" odhyz83_assasaky
4f
Re: modifikasi function open file by "Mr. Kid" nmkid.family@ymail.com

Messages

Mon Dec 17, 2012 3:16 pm (PST) . Posted by:

"ghozi alkatiri" ghozialkatiri

formula di D19

=--SUBSTITUTE(D2;RIGHT(D2;3);"")
copy ke bawah

wassalam

Ghozi Alkatiri

________________________________
Dari: ratim sugianto <ratimsugianto@yahoo.co.id>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Senin, 17 Desember 2012 22:21
Judul: [belajar-excel] Konversi Data Teks ke Angka


 
Dear Be-Exceler
Bagaimana membuat rumus/formula konversi data teks ke angka dari file terlampir.
terimakasih atas bantuannya

salam
Sugianto

Mon Dec 17, 2012 7:48 pm (PST) . Posted by:

"Tony Bexcel"

Dear Pakar Yang Budiman,
 
Saya sangat membutuhkan bantuan solusi dan penerjemahan yang memudahkan saya mempelajari maksud dari Mr.Kid untuk pengisian pada cell M-1 dan M3.
Bila para pakar bersedia meluangkan waktu dan ilmu pamungkasnya, saya ucapkan banyak terimakasih yang tak terhingga karena data ini akan dipakai untuk kepentingan banyak orang.
Sekali lagi mohon maaf bila ada kata2 yang kurang berkenan dan salah dalam penyampaian nya.
 
Salam,
Tony

--- Pada Sen, 17/12/12, Tony Bexcel <tonybexcel@yahoo.co.id> menulis:

Dari: Tony Bexcel <tonybexcel@yahoo.co.id>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 3:16 PM

 

Dear Pakar yang Budiman,
 
Terimakasih Mr.Kid atas penjelasan rincinya..dan sudah bisa teratasi namun untuk M2 dan M sekian nya masih gak ngerti penjabaran nya..hadeuuh...maaf beribu maaf terlalu bodoh saya Mr.Kid..tolong banget ya penjabaran nya..
 
 
Salam,
Tony

--- Pada Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 12:26 PM

 

Pak Tony,

coba kalau bacanya urut.
di bagian awal sudah ada kalimat yang bunyinya :
'----------------------------------------------------------'
Formula-formula berikut meminta syarat :
1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks bulan apapun)
2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
3. data selalu dimulai dari week 1
'----------------------------------------------------------'

Coba penuhi dulu syaratnya, baru baca bagian formulanya.

Wassalam,
Kid.

2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Mr.Kid
 
Terlampir file nya ya Pak..pada M-1 di Cell yang diberi warna kuning.
Mohon maaf merepotkan ya Pak..
 
 
Salam,
Tony

--- Pada Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 10:04 AM

 

Coba disertakan contoh usahanya. Bisa jadi akan mempermudah penelusuran penyebab kosongnya.

Wassalam,
Kid.

2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Pakar yang Budiman,
 
Selamat Pagi teman2..Terimakasih Mr.Kid sudah membantu solusinya dan meluangkan waktunya,tapi saya mohon bantuan nya lagi..mungkin memang disini kelemahan saya dalam menrjemahkan kasus karena terbiasa melihat dan mengurutkan formula langsung dari soal nya.Saya sudah coba berulang tapi hasil nya tetap kosong walau sudah menggunakan Ctrl+Shift+Enter.
Sekali lagi saya mohon bantuannya ya Temans..
 
 
Salam,
Tony

--- Pada Ming, 16/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Minggu, 16 Desember, 2012, 1:22 AM

 

Belum ada yang reply ya...

Formula-formula berikut meminta syarat :
1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks bulan apapun)
2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
3. data selalu dimulai dari week 1

Bahasa manusia untuk semua formula dibawah sana :
"Reratakan nilai data yang angka bulan di baris 3 adalah sama dengan angka bulan di-week pertama setelah week akhir proses"

Formula untuk M-1 : (misal baris 6)
>> pakai logat xl2007 ke atas
=AVERAGEIF( $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 )
Formula ini akan menghasilkan error value ketika akhir proses adalah pada bulan terakhir yang ada. Untuk itu perlu penambahan trap error dengan IFError.
=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

>> pakai logat ilmiah (array formula) yang dimengerti semua versi  (jangan lupa untuk mengakhiri penulisan formula dengan CTRL  SHIFT  ENTER)
=AVERAGE(   IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0  , $F6:$BB6 )   )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

Catatan :
1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
2. Jika kriteria lebih dari 1, maka
     >> pada logat xl2007 ganti AverageIF dengan AverageIFs dan sesuaikan bagian kriteria agar diperoleh nilai-nilai data yang akan direrata.
     >> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika perbandingan kriteria-kriteria yang digunakan.
3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
4. Jika akan mencari M pada angka bulan week pertama sebelum week awal proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.

Wassalam,
Kid.

2012/12/14 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear All Pakar yang budiman,
 
Terlampir adalah file sebelum nya namun disini masih ada kasus yang butuh bantuan untuk menghitung rata2 di 3 bulan kedepan akhir dari activity.
Dalam penyampaian kasus mungkin saya kurang baik, untuk itu saya lampirkan file terlampir.
Atas bantuan dan waktunya saya ucapkan terimakasih.
 
 
Salam,
Tony

_

Mon Dec 17, 2012 11:00 pm (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Pak Tony,

Pada formula sudah disertakan penjelasan singkatnya sebagai berikut :
*=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
Bagian-bagian formula :
$F6:$BB6 *:: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah week
akhir proses
*$B6*:: kolom bantu posisi week akhir proses yang berupa formula
=MID(E6,FIND("#",E6,9)+1,2)
*+0* :: penambah angka bulan setelah week akhir proses

*Coba perhatikan.
*INDEX($F$3:$BB$3,*$B6+1*) menghasilkan nilai bulan week pertama setelah
week terakhir proses.
Misal week akhir proses adalah di week 36, maka hasil Index adalah pada
kolom milik week 37
Setelah si formula tahu dimana kolom yang harus dipakai (yaitu kolom week
37), maka dia akan mengambill nilai bulan (yang ada di baris 3 nya).
Anggap saja week 36 itu bulannya 9 dan week 37 sudah masuk bulan 10. Hasil
Index adalah angka 10 tersebut.
Angka 10 itu kan yang Anda maksud M-1.

Kemudian, setelah bagian Index ada penambahan dengan 0 (latar kuning)
INDEX($F$3:$BB$3,*$B6+1*)*+0*
Karena tadi hasil Index adalah 10 kemudian ditambah 0, maka hasilnya tetap
10, maka masih benar sebagai M-1. Sampai sini setuju gak ?
Kalau setuju, berarti keterangan :
* +0 :: penambah angka bulan setelah week akhir proses
*adalah penjelasan yang logis untuk memudahkan Anda mengubah sesuai
keinginan agar menjadi M-1 (untuk 0) atau M..M.. lainnya sesuai selera.
Lagipula, untuk apa ada +0 dalam formula, bukannya malah bikin formula
tambah panjang tuh. Aneh kan...
Karena memang maksudnya adalah untuk keterangan bahwa bagian itu yang
diubah untuk mendapatkan nilai-nilai bulan setelahnya yang dibutuhkan.

Wassalam,
Kid.

2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id>

> **
>
>
> Dear Pakar Yang Budiman,
>
> Saya sangat membutuhkan bantuan solusi dan penerjemahan yang memudahkan
> saya mempelajari maksud dari Mr.Kid untuk pengisian pada cell M-1 dan M3.
> Bila para pakar bersedia meluangkan waktu dan ilmu pamungkasnya, saya
> ucapkan banyak terimakasih yang tak terhingga karena data ini akan dipakai
> untuk kepentingan banyak orang.
> Sekali lagi mohon maaf bila ada kata2 yang kurang berkenan dan salah dalam
> penyampaian nya.
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Tony Bexcel <tonybexcel@yahoo.co.id>* menulis:
>
>
> Dari: Tony Bexcel <tonybexcel@yahoo.co.id>
>
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com
> Tanggal: Senin, 17 Desember, 2012, 3:16 PM
>
>
>
> Dear Pakar yang Budiman,
>
> Terimakasih Mr.Kid atas penjelasan rincinya..dan sudah bisa teratasi namun
> untuk M2 dan M sekian nya masih gak ngerti penjabaran nya..hadeuuh...maaf
> beribu maaf terlalu bodoh saya Mr.Kid..tolong banget ya penjabaran nya..
>
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com>* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com>
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com
> Tanggal: Senin, 17 Desember, 2012, 12:26 PM
>
>
> Pak Tony,
>
> coba kalau bacanya urut.
> di bagian awal sudah ada kalimat yang bunyinya :
> '----------------------------------------------------------'
> *Formula-formula berikut meminta syarat :
> 1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks
> bulan apapun)
> 2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus
> ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
> 3. data selalu dimulai dari week 1*
> '----------------------------------------------------------'
>
> Coba penuhi dulu syaratnya, baru baca bagian formulanya.
>
> Wassalam,
> Kid.
>
> 2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Mr.Kid
>
> Terlampir file nya ya Pak..pada M-1 di Cell yang diberi warna kuning.
> Mohon maaf merepotkan ya Pak..
>
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 10:04 AM
>
>
>
> Coba disertakan contoh usahanya. Bisa jadi akan mempermudah penelusuran
> penyebab kosongnya.
>
> Wassalam,
> Kid.
>
> 2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Pakar yang Budiman,
>
> Selamat Pagi teman2..Terimakasih Mr.Kid sudah membantu solusinya dan
> meluangkan waktunya,tapi saya mohon bantuan nya lagi..mungkin memang disini
> kelemahan saya dalam menrjemahkan kasus karena terbiasa melihat dan
> mengurutkan formula langsung dari soal nya.Saya sudah coba berulang tapi
> hasil nya tetap kosong walau sudah menggunakan Ctrl+Shift+Enter.
> Sekali lagi saya mohon bantuannya ya Temans..
>
>
> Salam,
> Tony
>
> --- Pada *Ming, 16/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Minggu, 16 Desember, 2012, 1:22 AM
>
>
>
> Belum ada yang reply ya...
>
> Formula-formula berikut meminta syarat :
> 1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks
> bulan apapun)
> 2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus
> ini, berarti kolom *BB*) mulai dari baris 3 sampai baris terakhir data.
> 3. data selalu dimulai dari week 1
>
> Bahasa manusia untuk semua formula dibawah sana :
> "Reratakan nilai data yang angka bulan di baris 3 adalah sama dengan angka
> bulan di-week pertama setelah week akhir proses"
>
> Formula untuk M-1 : (misal baris 6)
> >> pakai logat xl2007 ke atas
> *=AVERAGEIF( $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 )
> *Formula ini akan menghasilkan error value ketika akhir proses adalah
> pada bulan terakhir yang ada. Untuk itu perlu penambahan trap error dengan
> IFError.
> *=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> >> pakai logat ilmiah (array formula) yang dimengerti semua versi (jangan
> lupa untuk mengakhiri penulisan formula dengan CTRL SHIFT ENTER)
> *=AVERAGE( IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 ) )
> Bagian-bagian formula :
> **$F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> *Catatan :
> *1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
> 2. Jika kriteria lebih dari 1, maka
> >> pada logat xl2007 ganti AverageIF dengan AverageIF*s* dan
> sesuaikan bagian kriteria agar diperoleh nilai-nilai data yang akan
> direrata.
> >> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika
> perbandingan kriteria-kriteria yang digunakan.
> 3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week
> akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
> 4. Jika akan mencari M pada angka bulan week pertama sebelum week awal
> proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.
>
> Wassalam,
> Kid.
>
> 2012/12/14 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear All Pakar yang budiman,
>
> Terlampir adalah file sebelum nya namun disini masih ada kasus yang butuh
> bantuan untuk menghitung rata2 di 3 bulan kedepan akhir dari activity.
> Dalam penyampaian kasus mungkin saya kurang baik, untuk itu saya lampirkan
> file terlampir.
> Atas bantuan dan waktunya saya ucapkan terimakasih.
>
>
> Salam,
> Tony
>
>
>
> _
>
>
>
>

Tue Dec 18, 2012 12:33 am (PST) . Posted by:

"Tony Bexcel"

Dear Pakar yang Budiman,
 
Terimakasih atas segala penjelasan yang sangat detail dari Mr.Kid,namun dari awal saya baca sampai sekarang masih terkesima dan benar2 tidak bisa berbuat apa2..mungkin krn keterbatasan kemampuan mencerna penjabaran seperti ini sangat sulit dibanding melihat dari urutan pada file nya.( Maklum Faktor U..hehehe..)
Tapi tidak apa2 bila cukup seperti itu penyampaian nya ,tetap saya sangat berterima kasih atas segala perhatian nya, semoga bermanfaat  buat teman2 Exceller lain nya.
 
Salam,
Tony

--- Pada Sel, 18/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Selasa, 18 Desember, 2012, 1:59 PM

 

Pak Tony,

Pada formula sudah disertakan penjelasan singkatnya sebagai berikut :
=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

Coba perhatikan.
INDEX($F$3:$BB$3,$B6+1) menghasilkan nilai bulan week pertama setelah week terakhir proses.
Misal week akhir proses adalah di week 36, maka hasil Index adalah pada kolom milik week 37
Setelah si formula tahu dimana kolom yang harus dipakai (yaitu kolom week 37), maka dia akan mengambill nilai bulan (yang ada di baris 3 nya).
Anggap saja week 36 itu bulannya 9 dan week 37 sudah masuk bulan 10. Hasil Index adalah angka 10 tersebut.
Angka 10 itu kan yang Anda maksud M-1.

Kemudian, setelah bagian Index ada penambahan dengan 0 (latar kuning)
INDEX($F$3:$BB$3,$B6+1)+0
Karena tadi hasil Index adalah 10 kemudian ditambah 0, maka hasilnya tetap 10, maka masih benar sebagai M-1. Sampai sini setuju gak ?
Kalau setuju, berarti keterangan :
     +0 :: penambah angka bulan setelah week akhir proses 
adalah penjelasan yang logis untuk memudahkan Anda mengubah sesuai keinginan agar menjadi M-1 (untuk 0) atau M..M.. lainnya sesuai selera.
Lagipula, untuk apa ada +0 dalam formula, bukannya malah bikin formula tambah panjang tuh. Aneh kan...
Karena memang maksudnya adalah untuk keterangan bahwa bagian itu yang diubah untuk mendapatkan nilai-nilai bulan setelahnya yang dibutuhkan.

Wassalam,
Kid.

2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Pakar Yang Budiman,
 
Saya sangat membutuhkan bantuan solusi dan penerjemahan yang memudahkan saya mempelajari maksud dari Mr.Kid untuk pengisian pada cell M-1 dan M3.
Bila para pakar bersedia meluangkan waktu dan ilmu pamungkasnya, saya ucapkan banyak terimakasih yang tak terhingga karena data ini akan dipakai untuk kepentingan banyak orang.
Sekali lagi mohon maaf bila ada kata2 yang kurang berkenan dan salah dalam penyampaian nya.
 
Salam,
Tony

--- Pada Sen, 17/12/12, Tony Bexcel <tonybexcel@yahoo.co.id> menulis:

Dari: Tony Bexcel <tonybexcel@yahoo.co.id>

Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 3:16 PM

 

Dear Pakar yang Budiman,
 
Terimakasih Mr.Kid atas penjelasan rincinya..dan sudah bisa teratasi namun untuk M2 dan M sekian nya masih gak ngerti penjabaran nya..hadeuuh...maaf beribu maaf terlalu bodoh saya Mr.Kid..tolong banget ya penjabaran nya..
 
 
Salam,
Tony

--- Pada Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 12:26 PM

 

Pak Tony,

coba kalau bacanya urut.
di bagian awal sudah ada kalimat yang bunyinya :
'----------------------------------------------------------'
Formula-formula berikut meminta syarat :
1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks bulan apapun)
2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
3. data selalu dimulai dari week 1
'----------------------------------------------------------'

Coba penuhi dulu syaratnya, baru baca bagian formulanya.

Wassalam,
Kid.

2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Mr.Kid
 
Terlampir file nya ya Pak..pada M-1 di Cell yang diberi warna kuning.
Mohon maaf merepotkan ya Pak..
 
 
Salam,
Tony

--- Pada Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 10:04 AM

 

Coba disertakan contoh usahanya. Bisa jadi akan mempermudah penelusuran penyebab kosongnya.

Wassalam,
Kid.

2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Pakar yang Budiman,
 
Selamat Pagi teman2..Terimakasih Mr.Kid sudah membantu solusinya dan meluangkan waktunya,tapi saya mohon bantuan nya lagi..mungkin memang disini kelemahan saya dalam menrjemahkan kasus karena terbiasa melihat dan mengurutkan formula langsung dari soal nya.Saya sudah coba berulang tapi hasil nya tetap kosong walau sudah menggunakan Ctrl+Shift+Enter.
Sekali lagi saya mohon bantuannya ya Temans..
 
 
Salam,
Tony

--- Pada Ming, 16/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Minggu, 16 Desember, 2012, 1:22 AM

 

Belum ada yang reply ya...

Formula-formula berikut meminta syarat :
1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks bulan apapun)
2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
3. data selalu dimulai dari week 1

Bahasa manusia untuk semua formula dibawah sana :
"Reratakan nilai data yang angka bulan di baris 3 adalah sama dengan angka bulan di-week pertama setelah week akhir proses"

Formula untuk M-1 : (misal baris 6)
>> pakai logat xl2007 ke atas
=AVERAGEIF( $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 )
Formula ini akan menghasilkan error value ketika akhir proses adalah pada bulan terakhir yang ada. Untuk itu perlu penambahan trap error dengan IFError.
=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

>> pakai logat ilmiah (array formula) yang dimengerti semua versi  (jangan lupa untuk mengakhiri penulisan formula dengan CTRL  SHIFT  ENTER)
=AVERAGE(   IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0  , $F6:$BB6 )   )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

Catatan :
1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
2. Jika kriteria lebih dari 1, maka
     >> pada logat xl2007 ganti AverageIF dengan AverageIFs dan sesuaikan bagian kriteria agar diperoleh nilai-nilai data yang akan direrata.
     >> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika perbandingan kriteria-kriteria yang digunakan.
3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
4. Jika akan mencari M pada angka bulan week pertama sebelum week awal proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.

Wassalam,
Kid.

2012/12/14 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear All Pakar yang budiman,
 
Terlampir adalah file sebelum nya namun disini masih ada kasus yang butuh bantuan untuk menghitung rata2 di 3 bulan kedepan akhir dari activity.
Dalam penyampaian kasus mungkin saya kurang baik, untuk itu saya lampirkan file terlampir.
Atas bantuan dan waktunya saya ucapkan terimakasih.
 
 
Salam,
Tony

_

Tue Dec 18, 2012 12:37 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

hehehe... kenapa tidak dicoba saja dengan bekal nekad, ganti +0 jadi +1 +2
atau + berapa aja, lalu ganti juga dengan -1, -2 atau berapa saja. Lalu
bandingkan nilainya sesuai yang mana. Dan apa efek setiap penambahan
tersebut.

Wassalam,
Kid.

2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id>

> **
>
>
> Dear Pakar yang Budiman,
>
> Terimakasih atas segala penjelasan yang sangat detail dari Mr.Kid,namun
> dari awal saya baca sampai sekarang masih terkesima dan benar2 tidak bisa
> berbuat apa2..mungkin krn keterbatasan kemampuan mencerna penjabaran
> seperti ini sangat sulit dibanding melihat dari urutan pada file nya.(
> Maklum Faktor U..hehehe..)
> Tapi tidak apa2 bila cukup seperti itu penyampaian nya ,tetap saya sangat
> berterima kasih atas segala perhatian nya, semoga bermanfaat buat teman2
> Exceller lain nya.
>
> Salam,
> Tony
>
> --- Pada *Sel, 18/12/12, Mr. Kid <mr.nmkid@gmail.com>* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com>
> Judul: Re: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com
> Tanggal: Selasa, 18 Desember, 2012, 1:59 PM
>
>
>
> Pak Tony,
>
> Pada formula sudah disertakan penjelasan singkatnya sebagai berikut :
> *=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> *Coba perhatikan.
> *INDEX($F$3:$BB$3,*$B6+1*) menghasilkan nilai bulan week pertama setelah
> week terakhir proses.
> Misal week akhir proses adalah di week 36, maka hasil Index adalah pada
> kolom milik week 37
> Setelah si formula tahu dimana kolom yang harus dipakai (yaitu kolom week
> 37), maka dia akan mengambill nilai bulan (yang ada di baris 3 nya).
> Anggap saja week 36 itu bulannya 9 dan week 37 sudah masuk bulan 10. Hasil
> Index adalah angka 10 tersebut.
> Angka 10 itu kan yang Anda maksud M-1.
>
> Kemudian, setelah bagian Index ada penambahan dengan 0 (latar kuning)
> INDEX($F$3:$BB$3,*$B6+1*)*+0*
> Karena tadi hasil Index adalah 10 kemudian ditambah 0, maka hasilnya tetap
> 10, maka masih benar sebagai M-1. Sampai sini setuju gak ?
> Kalau setuju, berarti keterangan :
> * +0 :: penambah angka bulan setelah week akhir proses
> *adalah penjelasan yang logis untuk memudahkan Anda mengubah sesuai
> keinginan agar menjadi M-1 (untuk 0) atau M..M.. lainnya sesuai selera.
> Lagipula, untuk apa ada +0 dalam formula, bukannya malah bikin formula
> tambah panjang tuh. Aneh kan...
> Karena memang maksudnya adalah untuk keterangan bahwa bagian itu yang
> diubah untuk mendapatkan nilai-nilai bulan setelahnya yang dibutuhkan.
>
> Wassalam,
> Kid.
>
> 2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Pakar Yang Budiman,
>
> Saya sangat membutuhkan bantuan solusi dan penerjemahan yang memudahkan
> saya mempelajari maksud dari Mr.Kid untuk pengisian pada cell M-1 dan M3.
> Bila para pakar bersedia meluangkan waktu dan ilmu pamungkasnya, saya
> ucapkan banyak terimakasih yang tak terhingga karena data ini akan dipakai
> untuk kepentingan banyak orang.
> Sekali lagi mohon maaf bila ada kata2 yang kurang berkenan dan salah dalam
> penyampaian nya.
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >* menulis:
>
>
> Dari: Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>>
>
>
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 3:16 PM
>
>
>
> Dear Pakar yang Budiman,
>
> Terimakasih Mr.Kid atas penjelasan rincinya..dan sudah bisa teratasi namun
> untuk M2 dan M sekian nya masih gak ngerti penjabaran nya..hadeuuh...maaf
> beribu maaf terlalu bodoh saya Mr.Kid..tolong banget ya penjabaran nya..
>
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 12:26 PM
>
>
> Pak Tony,
>
> coba kalau bacanya urut.
> di bagian awal sudah ada kalimat yang bunyinya :
> '----------------------------------------------------------'
> *Formula-formula berikut meminta syarat :
> 1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks
> bulan apapun)
> 2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus
> ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
> 3. data selalu dimulai dari week 1*
> '----------------------------------------------------------'
>
> Coba penuhi dulu syaratnya, baru baca bagian formulanya.
>
> Wassalam,
> Kid.
>
> 2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Mr.Kid
>
> Terlampir file nya ya Pak..pada M-1 di Cell yang diberi warna kuning.
> Mohon maaf merepotkan ya Pak..
>
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 10:04 AM
>
>
>
> Coba disertakan contoh usahanya. Bisa jadi akan mempermudah penelusuran
> penyebab kosongnya.
>
> Wassalam,
> Kid.
>
> 2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Pakar yang Budiman,
>
> Selamat Pagi teman2..Terimakasih Mr.Kid sudah membantu solusinya dan
> meluangkan waktunya,tapi saya mohon bantuan nya lagi..mungkin memang disini
> kelemahan saya dalam menrjemahkan kasus karena terbiasa melihat dan
> mengurutkan formula langsung dari soal nya.Saya sudah coba berulang tapi
> hasil nya tetap kosong walau sudah menggunakan Ctrl+Shift+Enter.
> Sekali lagi saya mohon bantuannya ya Temans..
>
>
> Salam,
> Tony
>
> --- Pada *Ming, 16/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Minggu, 16 Desember, 2012, 1:22 AM
>
>
>
> Belum ada yang reply ya...
>
> Formula-formula berikut meminta syarat :
> 1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks
> bulan apapun)
> 2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus
> ini, berarti kolom *BB*) mulai dari baris 3 sampai baris terakhir data.
> 3. data selalu dimulai dari week 1
>
> Bahasa manusia untuk semua formula dibawah sana :
> "Reratakan nilai data yang angka bulan di baris 3 adalah sama dengan angka
> bulan di-week pertama setelah week akhir proses"
>
> Formula untuk M-1 : (misal baris 6)
> >> pakai logat xl2007 ke atas
> *=AVERAGEIF( $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 )
> *Formula ini akan menghasilkan error value ketika akhir proses adalah
> pada bulan terakhir yang ada. Untuk itu perlu penambahan trap error dengan
> IFError.
> *=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> >> pakai logat ilmiah (array formula) yang dimengerti semua versi (jangan
> lupa untuk mengakhiri penulisan formula dengan CTRL SHIFT ENTER)
> *=AVERAGE( IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 ) )
> Bagian-bagian formula :
> **$F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> *Catatan :
> *1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
> 2. Jika kriteria lebih dari 1, maka
> >> pada logat xl2007 ganti AverageIF dengan AverageIF*s* dan
> sesuaikan bagian kriteria agar diperoleh nilai-nilai data yang akan
> direrata.
> >> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika
> perbandingan kriteria-kriteria yang digunakan.
> 3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week
> akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
> 4. Jika akan mencari M pada angka bulan week pertama sebelum week awal
> proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.
>
> Wassalam,
> Kid.
>
> 2012/12/14 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear All Pakar yang budiman,
>
> Terlampir adalah file sebelum nya namun disini masih ada kasus yang butuh
> bantuan untuk menghitung rata2 di 3 bulan kedepan akhir dari activity.
> Dalam penyampaian kasus mungkin saya kurang baik, untuk itu saya lampirkan
> file terlampir.
> Atas bantuan dan waktunya saya ucapkan terimakasih.
>
>
> Salam,
> Tony
>
>
>
> _
>
>
>
>
>

Tue Dec 18, 2012 3:39 am (PST) . Posted by:

"Tony Bexcel"

Dear Pakar yang budiman..
 
Terimakasih Mr.Kid..akhir nya ketemu juga yang dimaksud..iya benar hanya mengganti +0 menjadi +1 atau +2..
Akan tetapi kenapa masih ada hasil yang salah pada M-1 bila saya hitung dengan cara manual?
Berikut saya lampirkan file nya ya temans..
 
Salam,
Tony

--- Pada Sel, 18/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Selasa, 18 Desember, 2012, 3:36 PM

 

hehehe... kenapa tidak dicoba saja dengan bekal nekad, ganti +0 jadi +1 +2 atau + berapa aja, lalu ganti juga dengan -1, -2 atau berapa saja. Lalu bandingkan nilainya sesuai yang mana. Dan apa efek setiap penambahan tersebut.

Wassalam,
Kid.

2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Pakar yang Budiman,
 
Terimakasih atas segala penjelasan yang sangat detail dari Mr.Kid,namun dari awal saya baca sampai sekarang masih terkesima dan benar2 tidak bisa berbuat apa2..mungkin krn keterbatasan kemampuan mencerna penjabaran seperti ini sangat sulit dibanding melihat dari urutan pada file nya.( Maklum Faktor U..hehehe..)
Tapi tidak apa2 bila cukup seperti itu penyampaian nya ,tetap saya sangat berterima kasih atas segala perhatian nya, semoga bermanfaat  buat teman2 Exceller lain nya.
 
Salam,
Tony

--- Pada Sel, 18/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Selasa, 18 Desember, 2012, 1:59 PM

 

Pak Tony,

Pada formula sudah disertakan penjelasan singkatnya sebagai berikut :
=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

Coba perhatikan.
INDEX($F$3:$BB$3,$B6+1) menghasilkan nilai bulan week pertama setelah week terakhir proses.
Misal week akhir proses adalah di week 36, maka hasil Index adalah pada kolom milik week 37
Setelah si formula tahu dimana kolom yang harus dipakai (yaitu kolom week 37), maka dia akan mengambill nilai bulan (yang ada di baris 3 nya).
Anggap saja week 36 itu bulannya 9 dan week 37 sudah masuk bulan 10. Hasil Index adalah angka 10 tersebut.
Angka 10 itu kan yang Anda maksud M-1.

Kemudian, setelah bagian Index ada penambahan dengan 0 (latar kuning)
INDEX($F$3:$BB$3,$B6+1)+0
Karena tadi hasil Index adalah 10 kemudian ditambah 0, maka hasilnya tetap 10, maka masih benar sebagai M-1. Sampai sini setuju gak ?
Kalau setuju, berarti keterangan :
     +0 :: penambah angka bulan setelah week akhir proses 
adalah penjelasan yang logis untuk memudahkan Anda mengubah sesuai keinginan agar menjadi M-1 (untuk 0) atau M..M.. lainnya sesuai selera.
Lagipula, untuk apa ada +0 dalam formula, bukannya malah bikin formula tambah panjang tuh. Aneh kan...
Karena memang maksudnya adalah untuk keterangan bahwa bagian itu yang diubah untuk mendapatkan nilai-nilai bulan setelahnya yang dibutuhkan.

Wassalam,
Kid.

2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Pakar Yang Budiman,
 
Saya sangat membutuhkan bantuan solusi dan penerjemahan yang memudahkan saya mempelajari maksud dari Mr.Kid untuk pengisian pada cell M-1 dan M3.
Bila para pakar bersedia meluangkan waktu dan ilmu pamungkasnya, saya ucapkan banyak terimakasih yang tak terhingga karena data ini akan dipakai untuk kepentingan banyak orang.
Sekali lagi mohon maaf bila ada kata2 yang kurang berkenan dan salah dalam penyampaian nya.
 
Salam,
Tony

--- Pada Sen, 17/12/12, Tony Bexcel <tonybexcel@yahoo.co.id> menulis:

Dari: Tony Bexcel <tonybexcel@yahoo.co.id>

Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 3:16 PM

 

Dear Pakar yang Budiman,
 
Terimakasih Mr.Kid atas penjelasan rincinya..dan sudah bisa teratasi namun untuk M2 dan M sekian nya masih gak ngerti penjabaran nya..hadeuuh...maaf beribu maaf terlalu bodoh saya Mr.Kid..tolong banget ya penjabaran nya..
 
 
Salam,
Tony

--- Pada Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 12:26 PM

 

Pak Tony,

coba kalau bacanya urut.
di bagian awal sudah ada kalimat yang bunyinya :
'----------------------------------------------------------'
Formula-formula berikut meminta syarat :
1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks bulan apapun)
2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
3. data selalu dimulai dari week 1
'----------------------------------------------------------'

Coba penuhi dulu syaratnya, baru baca bagian formulanya.

Wassalam,
Kid.

2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Mr.Kid
 
Terlampir file nya ya Pak..pada M-1 di Cell yang diberi warna kuning.
Mohon maaf merepotkan ya Pak..
 
 
Salam,
Tony

--- Pada Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Senin, 17 Desember, 2012, 10:04 AM

 

Coba disertakan contoh usahanya. Bisa jadi akan mempermudah penelusuran penyebab kosongnya.

Wassalam,
Kid.

2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear Pakar yang Budiman,
 
Selamat Pagi teman2..Terimakasih Mr.Kid sudah membantu solusinya dan meluangkan waktunya,tapi saya mohon bantuan nya lagi..mungkin memang disini kelemahan saya dalam menrjemahkan kasus karena terbiasa melihat dan mengurutkan formula langsung dari soal nya.Saya sudah coba berulang tapi hasil nya tetap kosong walau sudah menggunakan Ctrl+Shift+Enter.
Sekali lagi saya mohon bantuannya ya Temans..
 
 
Salam,
Tony

--- Pada Ming, 16/12/12, Mr. Kid <mr.nmkid@gmail.com> menulis:

Dari: Mr. Kid <mr.nmkid@gmail.com>
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@yahoogroups.com
Tanggal: Minggu, 16 Desember, 2012, 1:22 AM

 

Belum ada yang reply ya...

Formula-formula berikut meminta syarat :
1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks bulan apapun)
2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
3. data selalu dimulai dari week 1

Bahasa manusia untuk semua formula dibawah sana :
"Reratakan nilai data yang angka bulan di baris 3 adalah sama dengan angka bulan di-week pertama setelah week akhir proses"

Formula untuk M-1 : (misal baris 6)
>> pakai logat xl2007 ke atas
=AVERAGEIF( $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 )
Formula ini akan menghasilkan error value ketika akhir proses adalah pada bulan terakhir yang ada. Untuk itu perlu penambahan trap error dengan IFError.
=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

>> pakai logat ilmiah (array formula) yang dimengerti semua versi  (jangan lupa untuk mengakhiri penulisan formula dengan CTRL  SHIFT  ENTER)
=AVERAGE(   IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0  , $F6:$BB6 )   )
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$BB$3,$B6+1)+0 :: angka bulan pada week pertama setelah week akhir proses
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND("#",E6,9)+1,2)
+0 :: penambah angka bulan setelah week akhir proses

Catatan :
1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
2. Jika kriteria lebih dari 1, maka
     >> pada logat xl2007 ganti AverageIF dengan AverageIFs dan sesuaikan bagian kriteria agar diperoleh nilai-nilai data yang akan direrata.
     >> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika perbandingan kriteria-kriteria yang digunakan.
3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
4. Jika akan mencari M pada angka bulan week pertama sebelum week awal proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.

Wassalam,
Kid.

2012/12/14 Tony Bexcel <tonybexcel@yahoo.co.id>

 

Dear All Pakar yang budiman,
 
Terlampir adalah file sebelum nya namun disini masih ada kasus yang butuh bantuan untuk menghitung rata2 di 3 bulan kedepan akhir dari activity.
Dalam penyampaian kasus mungkin saya kurang baik, untuk itu saya lampirkan file terlampir.
Atas bantuan dan waktunya saya ucapkan terimakasih.
 
 
Salam,
Tony

_

Tue Dec 18, 2012 4:56 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

hehehehe... akhirnya sampai juga pada tahap berikutnya.

Jadi formula tahap 1 untuk bisa mendapatkan nomor bulan setelah week akhir
proses. Semua nilai bulan yang sama dengan week pertama setelah akhir
proses akan di rerata. Padahal, harusnya yang direrata hanya *week setelah
week akhir proses*.

Kriteria berikutnya :
>> nilai week yang lebih dari (>) week akhir proses (dikolom bantu kolom B)
Pada tabel ada header W1 sampai Wsekian. Header ini bertipe text karena
datanya memang bertipe text.
Data bertipe text dengan susunan yang tidak konsisten (seperti angka 17
ditulis 17 tapi angka 1 ditulis 1 bukannya 01) membuat sulitnya proses
perbandingan.
Untuk memudahkan proses, maka header week seperti w1 sampai wsekian akan
diubah menjadi numerik.
Caranya,
1. ganti W1 dengan 1, kemudian W2 dengan 2, dst. Atau lakukan replace
terhadap header itu, find what isi W lalu replace all.
2. blok header tersebut (yang sudah jadi bertipe numerik) -> klik kanan ->
format cells -> number -> custom -> tulis "W"General -> tekan OK

Sampai sini, maka formula sudah siap diubah.
1. menjabarkan kriteria tambahan secara detil sedetil-detilnya.
>> bunyi kriteria : "hanya *week setelah week akhir proses*."
>> artinya : header week lebih dari nilai week akhir di kolom B
>> logat formula : *$F$4:$bb$4* > $b6 (untuk data baris 6)
>> yang *biru *adalah *nilai yang dibandingkan*, yang di latar kuningadalah nilai
batasan alias kriteria.

Kriteria di atas kan dimasukkan ke formula yang dulu pernah dibuat.
Sebelumnya, mari kita baca ulang catatan yang pernah dituliskan di email
lalu.
Berikut ini bunyinya : (perhatikan catatan nomor 2)
*Catatan :
*1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
*2. Jika kriteria lebih dari 1, maka
>> pada logat xl2007 ganti AverageIF dengan AverageIFs dan sesuaikan
bagian kriteria agar diperoleh nilai-nilai data yang akan direrata.
>> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika
perbandingan kriteria-kriteria yang digunakan.*
3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week
akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
4. Jika akan mencari M pada angka bulan week pertama sebelum week awal
proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.

Kita mulai dengan :
*1. logat xl2007 ke atas.*
>> jika dengan AverageIF, hanya bisa untuk 1 kriteria dan bunyinya adalah :
* =IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) ,
0 )*

>> kriteria lebih dari 1 (kejadian sekarang kan), maka *ganti AverageIF
dengan AverageIFs dan sesuaikan bagian kriteria *
- cara menggunakan fungsi AVERAGEIFS menurut Excel :
*AVERAGEIFS( average_range , criteria_range1,criteria1 ,
criteria_range2,criteria2 �)*
- untuk kasus pengubahan dari IFERROR blabla di atas, maka bagian
AVERAGEIF yang harus diubah dengan AVERAGEIFS
- pengubahan dilakukan dengan menyesuaikan ulang letak-letak rujukan
inputan.

- lihat pada susunan AVERAGEIFS tapi bayangkan tabel kerja
* average_range* :: range mana yang akan di rerata ? >>
jawaban Anda ? << -- harusnya berbunyi : *$F6:$BB6*
*criteria_range1 *:: range mana yang diperbandingkan dengan
kriteria1 ? >> jawaban Anda ? << -- harusnya berbunyi : *$F$3:$BB$3*
*criteria1 *:: apa nilai kriteria1 nya ? >> tentu saja : *
INDEX($F$3:$BB$3,$B6+1)+0*
*criteria_range2 *:: range mana yang diperbandingkan dengan
kriteria2 ? -- bisa jawab sama dong, yaitu : *$F$4:$bb$4*
*criteria2 *:: apa nilai kriteria2 nya ? -- kalau jawaban yang
ini bisa jadi beda deh, yaitu : > $b6 tapi dalam bentuk text, yaitu berupa
tulisan ">" & $b6
- sekarang dipasang deh ke averageifs
*AVERAGEIFS( $F6:$BB6 , $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0
, $F$4:$bb$4 , ">" & $b6 )*
- kemudian AVERAGEIFS ini menggantikan AVERAGEIF [gak pake S] dalam
formula tahap 1 doeloe itoe, menjadi :
*=IFError( **AVERAGEIFS( $F6:$BB6 , $F$3:$BB$3 , INDEX($F$3:$BB
$3,$B6+1)+0 , $F$4:$bb$4 , ">" & $b6 ) , 0 )*

*2. logat ilmiah (array formula) untuk semua versi Excel*
>> array formula tahap 1 adalah :
*=AVERAGE( IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6) )
*
- kriteria pada array formula di atas adalah : (baru 1 kriteria kan)
*$F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0*

>> kriteria yang akan ditambahkan adalah berbunyi : (sebagai kriteria ke-2)
*$F$4:$bb$4* > $b6
wah... ternyata $b6 masih bertipe text, maka masukkan ke salon si $b6
itu biar jadi punya jambul seperti berikut ini :
*$F$4:$bb$4* > --$b6

>> kedua kriteria harus terpenuhi. Artinya, keduanya dihubungkan dengan DAN(bahasa Inggeris-nya AND) yang kalau di matematika itu setara dengan
perkalian.
Perkalian di Excel dilambangkan dengan karakter *

>> Jadi, susunan kriteria nya :
*$F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0* DAN *$F$4:$bb$4* > --
$b6
- kalau matematika ditulis seperti itu, pasti hasilnya salah, karena
ada 2 sisi yang diproses, yaitu sisi kiri DAN beserta sisi kanan DAN
supaya gak salah hitung, maka setiap sisi dikurung (biar gak lari
cari pasangan di sisi lainnya)
- jadi, kalau sudah di-pakai-in kurung jadi :
( *$F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0* ) DAN ( *$F$4:$bb$4* >
--$b6 )
- karena Excel kenalnya kata DAN itu sebagai sebuah perkalian, maka
digantilah dengan *
menjadi :
( *$F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0* ) * ( *$F$4:$bb$4* >
--$b6 )

- jadi deh susunan kriteria yang baru, yang sudah berubah dari hanya
berisi 1 kriteria menjadi ada 2 kriteria.
- lalu masukkan ke bagian kondisi (alias menggantikan bagian
*$F$3:$BB$3= INDEX(
$F$3:$BB$3,$B6+1)+0* dalam array formula tahap 1)

>> Array formula sudah lebih perlente menjadi lebih maskulin. Inilah dia
array formula nya :
*=AVERAGE( IF( **( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0 ) * (
$F$4:$bb$4 > **--$b6 ) , $F6:$BB6 ) )*

>> eh...udah ganteng seperti itu, yang ngajak kencan (user-nya) gak godain
si array formula dengan CTRL SHIFT ENTER
jiiiiaaaahhh... jadi kelihatan cupu deh si array formula.
jadi jangan lupa ya, usai menulis si formula, tekan CTRL SHIFT
ENTER
supaya gantengnya array formula bisa terpancar kemana-mana.

Oh iya, sebelum lupa...
Jadi dari semua kriteria di atas, dengan logat apapun,* tidak ada* kriteria
yang disusun berdasar faktor U ya... so ndak usah dipusingkan faktor U nya
bernilai berapa, anggap saja itu nomor urut yang gak ada efeknya pada data.
Cukup baca perlahan baris-per-baris jangan terlewatkan. Jalankan instruksi
jika baris itu memberi instruksi. Sabar dan berdoa adalah kunci.

Wassalam,
Kid.

2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id>

> **
>
>
> Dear Pakar yang budiman..
>
> Terimakasih Mr.Kid..akhir nya ketemu juga yang dimaksud..iya benar hanya
> mengganti +0 menjadi +1 atau +2..
> Akan tetapi kenapa masih ada hasil yang salah pada M-1 bila saya hitung
> dengan cara manual?
> Berikut saya lampirkan file nya ya temans..
>
> Salam,
> Tony
>
> --- Pada *Sel, 18/12/12, Mr. Kid <mr.nmkid@gmail.com>* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com>
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com
> Tanggal: Selasa, 18 Desember, 2012, 3:36 PM
>
>
>
> hehehe... kenapa tidak dicoba saja dengan bekal nekad, ganti +0 jadi +1 +2
> atau + berapa aja, lalu ganti juga dengan -1, -2 atau berapa saja. Lalu
> bandingkan nilainya sesuai yang mana. Dan apa efek setiap penambahan
> tersebut.
>
> Wassalam,
> Kid.
>
>
> 2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Pakar yang Budiman,
>
> Terimakasih atas segala penjelasan yang sangat detail dari Mr.Kid,namun
> dari awal saya baca sampai sekarang masih terkesima dan benar2 tidak bisa
> berbuat apa2..mungkin krn keterbatasan kemampuan mencerna penjabaran
> seperti ini sangat sulit dibanding melihat dari urutan pada file nya.(
> Maklum Faktor U..hehehe..)
> Tapi tidak apa2 bila cukup seperti itu penyampaian nya ,tetap saya sangat
> berterima kasih atas segala perhatian nya, semoga bermanfaat buat teman2
> Exceller lain nya.
>
> Salam,
> Tony
>
> --- Pada *Sel, 18/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Selasa, 18 Desember, 2012, 1:59 PM
>
>
>
> Pak Tony,
>
> Pada formula sudah disertakan penjelasan singkatnya sebagai berikut :
> *=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> *Coba perhatikan.
> *INDEX($F$3:$BB$3,*$B6+1*) menghasilkan nilai bulan week pertama setelah
> week terakhir proses.
> Misal week akhir proses adalah di week 36, maka hasil Index adalah pada
> kolom milik week 37
> Setelah si formula tahu dimana kolom yang harus dipakai (yaitu kolom week
> 37), maka dia akan mengambill nilai bulan (yang ada di baris 3 nya).
> Anggap saja week 36 itu bulannya 9 dan week 37 sudah masuk bulan 10. Hasil
> Index adalah angka 10 tersebut.
> Angka 10 itu kan yang Anda maksud M-1.
>
> Kemudian, setelah bagian Index ada penambahan dengan 0 (latar kuning)
> INDEX($F$3:$BB$3,*$B6+1*)*+0*
> Karena tadi hasil Index adalah 10 kemudian ditambah 0, maka hasilnya tetap
> 10, maka masih benar sebagai M-1. Sampai sini setuju gak ?
> Kalau setuju, berarti keterangan :
> * +0 :: penambah angka bulan setelah week akhir proses
> *adalah penjelasan yang logis untuk memudahkan Anda mengubah sesuai
> keinginan agar menjadi M-1 (untuk 0) atau M..M.. lainnya sesuai selera.
> Lagipula, untuk apa ada +0 dalam formula, bukannya malah bikin formula
> tambah panjang tuh. Aneh kan...
> Karena memang maksudnya adalah untuk keterangan bahwa bagian itu yang
> diubah untuk mendapatkan nilai-nilai bulan setelahnya yang dibutuhkan.
>
> Wassalam,
> Kid.
>
> 2012/12/18 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Pakar Yang Budiman,
>
> Saya sangat membutuhkan bantuan solusi dan penerjemahan yang memudahkan
> saya mempelajari maksud dari Mr.Kid untuk pengisian pada cell M-1 dan M3.
> Bila para pakar bersedia meluangkan waktu dan ilmu pamungkasnya, saya
> ucapkan banyak terimakasih yang tak terhingga karena data ini akan dipakai
> untuk kepentingan banyak orang.
> Sekali lagi mohon maaf bila ada kata2 yang kurang berkenan dan salah dalam
> penyampaian nya.
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >* menulis:
>
>
> Dari: Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>>
>
>
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 3:16 PM
>
>
>
> Dear Pakar yang Budiman,
>
> Terimakasih Mr.Kid atas penjelasan rincinya..dan sudah bisa teratasi namun
> untuk M2 dan M sekian nya masih gak ngerti penjabaran nya..hadeuuh...maaf
> beribu maaf terlalu bodoh saya Mr.Kid..tolong banget ya penjabaran nya..
>
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 12:26 PM
>
>
> Pak Tony,
>
> coba kalau bacanya urut.
> di bagian awal sudah ada kalimat yang bunyinya :
> '----------------------------------------------------------'
> *Formula-formula berikut meminta syarat :
> 1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks
> bulan apapun)
> 2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus
> ini, berarti kolom BB) mulai dari baris 3 sampai baris terakhir data.
> 3. data selalu dimulai dari week 1*
> '----------------------------------------------------------'
>
> Coba penuhi dulu syaratnya, baru baca bagian formulanya.
>
> Wassalam,
> Kid.
>
> 2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Mr.Kid
>
> Terlampir file nya ya Pak..pada M-1 di Cell yang diberi warna kuning.
> Mohon maaf merepotkan ya Pak..
>
>
> Salam,
> Tony
>
> --- Pada *Sen, 17/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Senin, 17 Desember, 2012, 10:04 AM
>
>
>
> Coba disertakan contoh usahanya. Bisa jadi akan mempermudah penelusuran
> penyebab kosongnya.
>
> Wassalam,
> Kid.
>
> 2012/12/17 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear Pakar yang Budiman,
>
> Selamat Pagi teman2..Terimakasih Mr.Kid sudah membantu solusinya dan
> meluangkan waktunya,tapi saya mohon bantuan nya lagi..mungkin memang disini
> kelemahan saya dalam menrjemahkan kasus karena terbiasa melihat dan
> mengurutkan formula langsung dari soal nya.Saya sudah coba berulang tapi
> hasil nya tetap kosong walau sudah menggunakan Ctrl+Shift+Enter.
> Sekali lagi saya mohon bantuannya ya Temans..
>
>
> Salam,
> Tony
>
> --- Pada *Ming, 16/12/12, Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=mr.nmkid@gmail.com>
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@yahoogroups.com<http://id.mc1949.mail.yahoo.com/mc/compose?to=belajar-excel@yahoogroups.com>
> Tanggal: Minggu, 16 Desember, 2012, 1:22 AM
>
>
>
> Belum ada yang reply ya...
>
> Formula-formula berikut meminta syarat :
> 1. Pada baris ke-3 diisi dengan angka bulan [1 sampai 12] (bukan teks
> bulan apapun)
> 2. sebuah kolom dikanan kolom data terkanan selalu kosong (untuk kasus
> ini, berarti kolom *BB*) mulai dari baris 3 sampai baris terakhir data.
> 3. data selalu dimulai dari week 1
>
> Bahasa manusia untuk semua formula dibawah sana :
> "Reratakan nilai data yang angka bulan di baris 3 adalah sama dengan angka
> bulan di-week pertama setelah week akhir proses"
>
> Formula untuk M-1 : (misal baris 6)
> >> pakai logat xl2007 ke atas
> *=AVERAGEIF( $F$3:$BB$3 , INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 )
> *Formula ini akan menghasilkan error value ketika akhir proses adalah
> pada bulan terakhir yang ada. Untuk itu perlu penambahan trap error dengan
> IFError.
> *=IFError( AVERAGEIF($F$3:$BB$3,INDEX($F$3:$BB$3,$B6+1)+0,$F6:$BB6) , 0 )
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> >> pakai logat ilmiah (array formula) yang dimengerti semua versi (jangan
> lupa untuk mengakhiri penulisan formula dengan CTRL SHIFT ENTER)
> *=AVERAGE( IF( $F$3:$BB$3 = INDEX($F$3:$BB$3,$B6+1)+0 , $F6:$BB6 ) )
> Bagian-bagian formula :
> **$F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$BB$3,*$B6+1*)*+0* :: angka bulan pada week pertama setelah
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND("#",E6,9)+1,2)
> *+0* :: penambah angka bulan setelah week akhir proses
>
> *Catatan :
> *1. Jika keadaan nyata tidak sama dengan asumsi, maka sesuaikan formula.
> 2. Jika kriteria lebih dari 1, maka
> >> pada logat xl2007 ganti AverageIF dengan AverageIF*s* dan
> sesuaikan bagian kriteria agar diperoleh nilai-nilai data yang akan
> direrata.
> >> pada logat ilmiah dibagian pengkondisian (IF) dijabarkan logika
> perbandingan kriteria-kriteria yang digunakan.
> 3. Pada M-2 atau M-sekian, sesuaikan penambah angka bulan setelah week
> akhir proses agar diperoleh nilai bulan yang pantas direrata nilai datanya.
> 4. Jika akan mencari M pada angka bulan week pertama sebelum week awal
> proses, sesuaikan rujukan yang berkaitan dengan range di baris 3.
>
> Wassalam,
> Kid.
>
> 2012/12/14 Tony Bexcel <tonybexcel@yahoo.co.id<http://id.mc1949.mail.yahoo.com/mc/compose?to=tonybexcel@yahoo.co.id>
> >
>
> **
>
> Dear All Pakar yang budiman,
>
> Terlampir adalah file sebelum nya namun disini masih ada kasus yang butuh
> bantuan untuk menghitung rata2 di 3 bulan kedepan akhir dari activity.
> Dalam penyampaian kasus mungkin saya kurang baik, untuk itu saya lampirkan
> file terlampir.
> Atas bantuan dan waktunya saya ucapkan terimakasih.
>
>
> Salam,
> Tony
>
>
>
> _
>
>
>
>
>
>

Mon Dec 17, 2012 9:14 pm (PST) . Posted by:

"Husnul Faizin" husnulfaizin

Dear,exceler...!
mohon
bantuannya mengerjakan penyelesaian ranking  dengan kriteria :
1.
Jika saya input nilai pada jml nilai, maka yang muncul pada kolom ranking
adalah urutan

    peringkatnya (kolom rankingnya dinamis
mengikuti jml nilai pada kolom jml nilai.
2. jika saya ingin amencari peringkat
nama siswa dengan kolom bantuan, bagaimana penyelesaiannya?
    atas bantuannya sayaucapkan terimakasih
    (permasalahan terlampir)

   

     salam
    

     faiz

Mon Dec 17, 2012 10:44 pm (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Faiz,

Untuk menyusun ranking (peringkat) bisa menggunakan fungsi Rank.
=RANK(D3,$D$3:$D$28)

Jika rank hanya menghitung yang ada nilainya saja, tambahkan pengkondisian
terhadap nilai di kolom D, menjadi :
=IF(LEN(D3),RANK(D3,$D$3:$D$28),"")

Penyusunan nomor peringkat ada banyak macam. Coba lihat
disini<http://excel-mr-kid.blogspot.com/2012/05/pemeringkatan-data-ranking.html>
.

Untuk menyusun area pencarian data, coba manfaatkan formula lookup dengan
susunan fungsi-fungsi Index dan Match.
Lookup dengan fungsi Index Match termasuk kelompok formula lookup ke segala
arah (bisa dibaca
disini<http://excel-mr-kid.blogspot.com/2011/03/lookup-ke-kiri-atau-ke-kanan-untuk-satu.html>
)
Misal di H3 adalah area user menginput nomor peringkat yang dicari, maka
pada i3 diisi formula :
=INDEX($C$3:$C$28,MATCH(H3,$E$3:$E$28,0))

Cell H3 bisa diganti dengan dropdown list dari fitur data validation dengan
jenis allow List yang berisi daftar nomor peringkat.

Dengan konsep yang sama, bisa juga mencari nomor peringkat dari nomor induk
tertentu.
Maka nomor induk yang diletakkan di kolom H (misal H3) yang berupa dropdown
list berisi daftar seluruh nomor induk.
Kemudian kolom i (misal i3) diisi formula VLookUp.

File terlampir.

Wassalam,
Kid.

2012/12/18 Husnul Faizin <husnulfaizin@yahoo.co.id>

> **
>
>
> Dear, exceler...!
> mohon bantuannya mengerjakan penyelesaian ranking dengan kriteria :
> 1. Jika saya input nilai pada jml nilai, maka yang muncul pada kolom
> ranking adalah urutan
> peringkatnya (kolom rankingnya dinamis mengikuti jml nilai pada kolom
> jml nilai.
> 2. jika saya ingin amencari peringkat nama siswa dengan kolom bantuan,
> bagaimana penyelesaiannya?
> atas bantuannya saya ucapkan terimakasih
> (permasalahan terlampir)
>
>
> salam
>
> faiz
>
> _
>
>

Mon Dec 17, 2012 10:19 pm (PST) . Posted by:

"rodhy hakim" odhyz83_assasaky

Dear Master,
Dibawah ini saya mempunyai code VBA untuk mengkopy data dari worksheet berbeda dengan menggunakan Dua Tombol, saya mengkopi data di satu worksheet tetapi dua kali kerja yaitu tombol pertama saya harus mengkopi   ITEM CODE nya, kedua saya tekan tombol yang kedua untuk mengkopi DATA nya. Nah bagaimana caranya hanya dengan menggunakan satu buah tombol untuk menyelesaikan dua pekerjaan tersebut. Kemudian pertanyaan saya yang kedua, bagaimana caranya ketika function open file, agar semua jenis file Excel bisa muncul semua, karena yang sekarang saya harus memilih versi 2003 atau 2010.
 /////////////////////////////////////////////////////////////////////////////////
Sub CopySenin()
FileTerpilih = Application.GetOpenFilename _
 ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open file", MultiSelect:=True)
    If VarType(FileTerpilih) = vbBoolean Then
        Exit Sub
    End If
    NamaFileUtama = ActiveWorkbook.Name
    JumlahFile = UBound(FileTerpilih)
    Application.DisplayAlerts = False
    For i = 1 To JumlahFile
        Workbooks.Open FileTerpilih(i)
        With ActiveWorkbook.Worksheets(1)
            Selection.AutoFilter Field:=3, Criteria1:=1000
            ActiveWorkbook.Save
            BarisTerakhirFilePilihan = .Cells(.Rows.Count, 1).End(xlUp).Row
            BarisTerakhirFileUtama = Workbooks(NamaFileUtama).Worksheets(1) _
            .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count, 1).End(xlUp).Row
            .Range("B2:B50").Copy
        End With
        With Workbooks(NamaFileUtama).Worksheets(2)
            .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True
        End With
        ActiveWorkbook.Close
    Next i
    Application.DisplayAlerts = True
End Sub
Sub CopyDataSenin()
FileTerpilih = Application.GetOpenFilename _
("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open file", MultiSelect:=True)
 
    If VarType(FileTerpilih) = vbBoolean Then
        Exit Sub
    End If
    NamaFileUtama = ActiveWorkbook.Name
    JumlahFile = UBound(FileTerpilih)
    Application.DisplayAlerts = False
    For i = 1 To JumlahFile
        Workbooks.Open FileTerpilih(i)
        With ActiveWorkbook.Worksheets(1)
           BarisTerakhirFilePilihan = .Cells(.Rows.Count, 1).End(xlUp).Row
            BarisTerakhirFileUtama = Workbooks(NamaFileUtama).Worksheets(1) _
                .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count, 1).End(xlUp).Row
            .Range("X2:X50").Copy
        End With
        With Workbooks(NamaFileUtama).Worksheets(2)
            .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True
        End With
        ActiveWorkbook.Close
    Next i
    Application.DisplayAlerts = True
End Sub
/////////////////////////////////////////////////////////////////////////////////////////////
 Atas pencerahannya saya ucapkan banyak terima kasih,
Salam,
Odhy

Mon Dec 17, 2012 11:07 pm (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Pak Rodhy,

Coba ganti proses copy di salah satu prosedur dari yang tadinya :
.Range("B2:B50").Copy
menjadi :
.Range("B2:B50,X2:X50").Copy

Coba jalankan prosedur yang sudah diganti bagian proses copy-nya. Prosedur
lainnya ndak usah dijalankan.

Wassalam,
Kid.

2012/12/18 rodhy hakim <odhyz83_assasaky@yahoo.com>

> **
>
>
> **Dear Master,****
> Dibawah ini saya mempunyai code VBA untuk mengkopy data dari worksheet
> berbeda dengan menggunakan Dua Tombol, saya mengkopi data di satu worksheet
> tetapi dua kali kerja yaitu tombol pertama saya harus mengkopi ITEM
> CODE nya, kedua saya tekan tombol yang kedua untuk mengkopi DATA nya. Nah
> bagaimana caranya hanya dengan menggunakan satu buah tombol untuk
> menyelesaikan dua pekerjaan tersebut. Kemudian pertanyaan saya yang kedua,
> bagaimana caranya ketika function open file, agar semua jenis file Excel
> bisa muncul semua, karena yang sekarang saya harus memilih versi 2003 atau
> 2010.****
> ** **
> /////////////////////////////////////////////////////////////////////////////////
> Sub CopySenin()****
> FileTerpilih = Application.GetOpenFilename _****
> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
> file", MultiSelect:=True)****
> If VarType(FileTerpilih) = vbBoolean Then****
> Exit Sub****
> End If****
> NamaFileUtama = ActiveWorkbook.Name****
> JumlahFile = UBound(FileTerpilih)****
> Application.DisplayAlerts = False****
> For i = 1 To JumlahFile****
> Workbooks.Open FileTerpilih(i)****
> With ActiveWorkbook.Worksheets(1)****
> Selection.AutoFilter Field:=3, Criteria1:=1000****
> ActiveWorkbook.Save****
> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
> 1).End(xlUp).Row****
> BarisTerakhirFileUtama =
> Workbooks(NamaFileUtama).Worksheets(1) _****
> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
> 1).End(xlUp).Row****
> .Range("B2:B50").Copy****
> End With****
> With Workbooks(NamaFileUtama).Worksheets(2)****
> .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True**
> **
> End With****
> ActiveWorkbook.Close****
> Next i****
> Application.DisplayAlerts = True****
> End Sub****
> Sub CopyDataSenin()****
> FileTerpilih = Application.GetOpenFilename _****
> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
> file", MultiSelect:=True)****
> ** **
> If VarType(FileTerpilih) = vbBoolean Then****
> Exit Sub****
> End If****
> NamaFileUtama = ActiveWorkbook.Name****
> JumlahFile = UBound(FileTerpilih)****
> Application.DisplayAlerts = False****
> For i = 1 To JumlahFile****
> Workbooks.Open FileTerpilih(i)****
> With ActiveWorkbook.Worksheets(1)****
> BarisTerakhirFilePilihan = .Cells(.Rows.Count, 1).End(xlUp).Row
> ****
> BarisTerakhirFileUtama =
> Workbooks(NamaFileUtama).Worksheets(1) _****
> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
> 1).End(xlUp).Row****
> .Range("X2:X50").Copy****
> End With****
> With Workbooks(NamaFileUtama).Worksheets(2)****
> .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True**
> **
> End With****
> ActiveWorkbook.Close****
> Next i****
> Application.DisplayAlerts = True****
> End Sub****
>
> /////////////////////////////////////////////////////////////////////////////////////////////
> ****
> ** **Atas pencerahannya saya ucapkan banyak terima kasih,****
> Salam,****
> Odhy****
> **
> ** **
>
>
>

Tue Dec 18, 2012 2:36 am (PST) . Posted by:

"odhyz83_assasaky@yahoo.com" odhyz83_assasaky

Mr.Kid,
Trus untuk pastenya gmn soalnya pastenya berbeda cell jg.

Trima kasih
Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung Teruuusss...!

-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 18 Dec 2012 14:07:07
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] modifikasi function open file

Pak Rodhy,

Coba ganti proses copy di salah satu prosedur dari yang tadinya :
.Range("B2:B50").Copy
menjadi :
.Range("B2:B50,X2:X50").Copy

Coba jalankan prosedur yang sudah diganti bagian proses copy-nya. Prosedur
lainnya ndak usah dijalankan.

Wassalam,
Kid.


2012/12/18 rodhy hakim <odhyz83_assasaky@yahoo.com>

> **
>
>
> **Dear Master,****
> Dibawah ini saya mempunyai code VBA untuk mengkopy data dari worksheet
> berbeda dengan menggunakan Dua Tombol, saya mengkopi data di satu worksheet
> tetapi dua kali kerja yaitu tombol pertama saya harus mengkopi ITEM
> CODE nya, kedua saya tekan tombol yang kedua untuk mengkopi DATA nya. Nah
> bagaimana caranya hanya dengan menggunakan satu buah tombol untuk
> menyelesaikan dua pekerjaan tersebut. Kemudian pertanyaan saya yang kedua,
> bagaimana caranya ketika function open file, agar semua jenis file Excel
> bisa muncul semua, karena yang sekarang saya harus memilih versi 2003 atau
> 2010.****
> ** **
> /////////////////////////////////////////////////////////////////////////////////
> Sub CopySenin()****
> FileTerpilih = Application.GetOpenFilename _****
> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
> file", MultiSelect:=True)****
> If VarType(FileTerpilih) = vbBoolean Then****
> Exit Sub****
> End If****
> NamaFileUtama = ActiveWorkbook.Name****
> JumlahFile = UBound(FileTerpilih)****
> Application.DisplayAlerts = False****
> For i = 1 To JumlahFile****
> Workbooks.Open FileTerpilih(i)****
> With ActiveWorkbook.Worksheets(1)****
> Selection.AutoFilter Field:=3, Criteria1:=1000****
> ActiveWorkbook.Save****
> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
> 1).End(xlUp).Row****
> BarisTerakhirFileUtama =
> Workbooks(NamaFileUtama).Worksheets(1) _****
> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
> 1).End(xlUp).Row****
> .Range("B2:B50").Copy****
> End With****
> With Workbooks(NamaFileUtama).Worksheets(2)****
> .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True**
> **
> End With****
> ActiveWorkbook.Close****
> Next i****
> Application.DisplayAlerts = True****
> End Sub****
> Sub CopyDataSenin()****
> FileTerpilih = Application.GetOpenFilename _****
> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
> file", MultiSelect:=True)****
> ** **
> If VarType(FileTerpilih) = vbBoolean Then****
> Exit Sub****
> End If****
> NamaFileUtama = ActiveWorkbook.Name****
> JumlahFile = UBound(FileTerpilih)****
> Application.DisplayAlerts = False****
> For i = 1 To JumlahFile****
> Workbooks.Open FileTerpilih(i)****
> With ActiveWorkbook.Worksheets(1)****
> BarisTerakhirFilePilihan = .Cells(.Rows.Count, 1).End(xlUp).Row
> ****
> BarisTerakhirFileUtama =
> Workbooks(NamaFileUtama).Worksheets(1) _****
> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
> 1).End(xlUp).Row****
> .Range("X2:X50").Copy****
> End With****
> With Workbooks(NamaFileUtama).Worksheets(2)****
> .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True**
> **
> End With****
> ActiveWorkbook.Close****
> Next i****
> Application.DisplayAlerts = True****
> End Sub****
>
> /////////////////////////////////////////////////////////////////////////////////////////////
> ****
> ** **Atas pencerahannya saya ucapkan banyak terima kasih,****
> Salam,****
> Odhy****
> **
> ** **
>
>
>

Tue Dec 18, 2012 2:39 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Oh belum dicoba ya...
Kalau gak salah pastenya paste values transpose kan.
Paste ke C202 dan C203. Yang kolom B masik ke C202 dan kolom X ke C203
semua menjadi horisontal alias sebanyak 49 kolom.

Setelah dicoba keluar error value apa ?

Wassalam,
Kid.

2012/12/18 <odhyz83_assasaky@yahoo.com>

> **
>
>
> ** Mr.Kid,
> Trus untuk pastenya gmn soalnya pastenya berbeda cell jg.
>
> Trima kasih
> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...!
> ------------------------------
> *From: * "Mr. Kid" <mr.nmkid@gmail.com>
> *Sender: * belajar-excel@yahoogroups.com
> *Date: *Tue, 18 Dec 2012 14:07:07 +0700
> *To: *<belajar-excel@yahoogroups.com>
> *ReplyTo: * belajar-excel@yahoogroups.com
> *Subject: *Re: [belajar-excel] modifikasi function open file
>
>
>
> Pak Rodhy,
>
> Coba ganti proses copy di salah satu prosedur dari yang tadinya :
> .Range("B2:B50").Copy
> menjadi :
> .Range("B2:B50,X2:X50").Copy
>
> Coba jalankan prosedur yang sudah diganti bagian proses copy-nya. Prosedur
> lainnya ndak usah dijalankan.
>
> Wassalam,
> Kid.
>
>
> 2012/12/18 rodhy hakim <odhyz83_assasaky@yahoo.com>
>
>> **
>>
>>
>> **Dear Master,****
>> Dibawah ini saya mempunyai code VBA untuk mengkopy data dari worksheet
>> berbeda dengan menggunakan Dua Tombol, saya mengkopi data di satu worksheet
>> tetapi dua kali kerja yaitu tombol pertama saya harus mengkopi ITEM
>> CODE nya, kedua saya tekan tombol yang kedua untuk mengkopi DATA nya. Nah
>> bagaimana caranya hanya dengan menggunakan satu buah tombol untuk
>> menyelesaikan dua pekerjaan tersebut. Kemudian pertanyaan saya yang kedua,
>> bagaimana caranya ketika function open file, agar semua jenis file Excel
>> bisa muncul semua, karena yang sekarang saya harus memilih versi 2003 atau
>> 2010.****
>> ** **
>> /////////////////////////////////////////////////////////////////////////////////
>> Sub CopySenin()****
>> FileTerpilih = Application.GetOpenFilename _****
>> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
>> file", MultiSelect:=True)****
>> If VarType(FileTerpilih) = vbBoolean Then****
>> Exit Sub****
>> End If****
>> NamaFileUtama = ActiveWorkbook.Name****
>> JumlahFile = UBound(FileTerpilih)****
>> Application.DisplayAlerts = False****
>> For i = 1 To JumlahFile****
>> Workbooks.Open FileTerpilih(i)****
>> With ActiveWorkbook.Worksheets(1)****
>> Selection.AutoFilter Field:=3, Criteria1:=1000****
>> ActiveWorkbook.Save****
>> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
>> 1).End(xlUp).Row****
>> BarisTerakhirFileUtama =
>> Workbooks(NamaFileUtama).Worksheets(1) _****
>> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
>> 1).End(xlUp).Row****
>> .Range("B2:B50").Copy****
>> End With****
>> With Workbooks(NamaFileUtama).Worksheets(2)****
>> .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True*
>> ***
>> End With****
>> ActiveWorkbook.Close****
>> Next i****
>> Application.DisplayAlerts = True****
>> End Sub****
>> Sub CopyDataSenin()****
>> FileTerpilih = Application.GetOpenFilename _****
>> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
>> file", MultiSelect:=True)****
>> ** **
>> If VarType(FileTerpilih) = vbBoolean Then****
>> Exit Sub****
>> End If****
>> NamaFileUtama = ActiveWorkbook.Name****
>> JumlahFile = UBound(FileTerpilih)****
>> Application.DisplayAlerts = False****
>> For i = 1 To JumlahFile****
>> Workbooks.Open FileTerpilih(i)****
>> With ActiveWorkbook.Worksheets(1)****
>> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
>> 1).End(xlUp).Row****
>> BarisTerakhirFileUtama =
>> Workbooks(NamaFileUtama).Worksheets(1) _****
>> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
>> 1).End(xlUp).Row****
>> .Range("X2:X50").Copy****
>> End With****
>> With Workbooks(NamaFileUtama).Worksheets(2)****
>> .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True*
>> ***
>> End With****
>> ActiveWorkbook.Close****
>> Next i****
>> Application.DisplayAlerts = True****
>> End Sub****
>>
>> /////////////////////////////////////////////////////////////////////////////////////////////
>> ****
>> ** **Atas pencerahannya saya ucapkan banyak terima kasih,****
>> Salam,****
>> Odhy****
>> **
>> ** **
>>
>>
>
>

Tue Dec 18, 2012 3:20 am (PST) . Posted by:

"odhyz83_assasaky@yahoo.com" odhyz83_assasaky

Ya pak soalnya lagi gak di depan komputer,
Pastenya sperti ini ya?:
.Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True
.Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True

digabung di satu prosedur?
Trus kalo untuk memunculkan semua type file excel saat open file bagaimana pak?

Salam,
Odhy
Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung Teruuusss...!

-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 18 Dec 2012 17:39:28
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] modifikasi function open file

Oh belum dicoba ya...
Kalau gak salah pastenya paste values transpose kan.
Paste ke C202 dan C203. Yang kolom B masik ke C202 dan kolom X ke C203
semua menjadi horisontal alias sebanyak 49 kolom.

Setelah dicoba keluar error value apa ?

Wassalam,
Kid.

2012/12/18 <odhyz83_assasaky@yahoo.com>

> **
>
>
> ** Mr.Kid,
> Trus untuk pastenya gmn soalnya pastenya berbeda cell jg.
>
> Trima kasih
> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...!
> ------------------------------
> *From: * "Mr. Kid" <mr.nmkid@gmail.com>
> *Sender: * belajar-excel@yahoogroups.com
> *Date: *Tue, 18 Dec 2012 14:07:07 +0700
> *To: *<belajar-excel@yahoogroups.com>
> *ReplyTo: * belajar-excel@yahoogroups.com
> *Subject: *Re: [belajar-excel] modifikasi function open file
>
>
>
> Pak Rodhy,
>
> Coba ganti proses copy di salah satu prosedur dari yang tadinya :
> .Range("B2:B50").Copy
> menjadi :
> .Range("B2:B50,X2:X50").Copy
>
> Coba jalankan prosedur yang sudah diganti bagian proses copy-nya. Prosedur
> lainnya ndak usah dijalankan.
>
> Wassalam,
> Kid.
>
>
> 2012/12/18 rodhy hakim <odhyz83_assasaky@yahoo.com>
>
>> **
>>
>>
>> **Dear Master,****
>> Dibawah ini saya mempunyai code VBA untuk mengkopy data dari worksheet
>> berbeda dengan menggunakan Dua Tombol, saya mengkopi data di satu worksheet
>> tetapi dua kali kerja yaitu tombol pertama saya harus mengkopi ITEM
>> CODE nya, kedua saya tekan tombol yang kedua untuk mengkopi DATA nya. Nah
>> bagaimana caranya hanya dengan menggunakan satu buah tombol untuk
>> menyelesaikan dua pekerjaan tersebut. Kemudian pertanyaan saya yang kedua,
>> bagaimana caranya ketika function open file, agar semua jenis file Excel
>> bisa muncul semua, karena yang sekarang saya harus memilih versi 2003 atau
>> 2010.****
>> ** **
>> /////////////////////////////////////////////////////////////////////////////////
>> Sub CopySenin()****
>> FileTerpilih = Application.GetOpenFilename _****
>> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
>> file", MultiSelect:=True)****
>> If VarType(FileTerpilih) = vbBoolean Then****
>> Exit Sub****
>> End If****
>> NamaFileUtama = ActiveWorkbook.Name****
>> JumlahFile = UBound(FileTerpilih)****
>> Application.DisplayAlerts = False****
>> For i = 1 To JumlahFile****
>> Workbooks.Open FileTerpilih(i)****
>> With ActiveWorkbook.Worksheets(1)****
>> Selection.AutoFilter Field:=3, Criteria1:=1000****
>> ActiveWorkbook.Save****
>> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
>> 1).End(xlUp).Row****
>> BarisTerakhirFileUtama =
>> Workbooks(NamaFileUtama).Worksheets(1) _****
>> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
>> 1).End(xlUp).Row****
>> .Range("B2:B50").Copy****
>> End With****
>> With Workbooks(NamaFileUtama).Worksheets(2)****
>> .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True*
>> ***
>> End With****
>> ActiveWorkbook.Close****
>> Next i****
>> Application.DisplayAlerts = True****
>> End Sub****
>> Sub CopyDataSenin()****
>> FileTerpilih = Application.GetOpenFilename _****
>> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
>> file", MultiSelect:=True)****
>> ** **
>> If VarType(FileTerpilih) = vbBoolean Then****
>> Exit Sub****
>> End If****
>> NamaFileUtama = ActiveWorkbook.Name****
>> JumlahFile = UBound(FileTerpilih)****
>> Application.DisplayAlerts = False****
>> For i = 1 To JumlahFile****
>> Workbooks.Open FileTerpilih(i)****
>> With ActiveWorkbook.Worksheets(1)****
>> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
>> 1).End(xlUp).Row****
>> BarisTerakhirFileUtama =
>> Workbooks(NamaFileUtama).Worksheets(1) _****
>> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
>> 1).End(xlUp).Row****
>> .Range("X2:X50").Copy****
>> End With****
>> With Workbooks(NamaFileUtama).Worksheets(2)****
>> .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True*
>> ***
>> End With****
>> ActiveWorkbook.Close****
>> Next i****
>> Application.DisplayAlerts = True****
>> End Sub****
>>
>> /////////////////////////////////////////////////////////////////////////////////////////////
>> ****
>> ** **Atas pencerahannya saya ucapkan banyak terima kasih,****
>> Salam,****
>> Odhy****
>> **
>> ** **
>>
>>
>
>

Tue Dec 18, 2012 3:25 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

loh, ndak perlu 2 kali paste di beda tempat.

Copa paste transpose :
dari 49 baris x 2 kolom menjadi 2 baris x 49 kolom
yang di copy sudah 49 baris x 2 kolom,
maka paste di pojok kiri atas range 2 baris x 49 kolom, yaitu di C202 saja.

Kan yang diganti cuma baris perintah Copy saja. ndak ada penjelasan ganti
bagian paste.

Wassalam
Kid.

2012/12/18 <odhyz83_assasaky@yahoo.com>

> **
>
>
> ** Ya pak soalnya lagi gak di depan komputer,
> Pastenya sperti ini ya?:
>
> .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True
> .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True
>
> digabung di satu prosedur?
> Trus kalo untuk memunculkan semua type file excel saat open file bagaimana
> pak?
>
> Salam,
> Odhy
> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...!
> ------------------------------
> *From: * "Mr. Kid" <mr.nmkid@gmail.com>
> *Sender: * belajar-excel@yahoogroups.com
> *Date: *Tue, 18 Dec 2012 17:39:28 +0700
> *To: *<belajar-excel@yahoogroups.com>
> *ReplyTo: * belajar-excel@yahoogroups.com
> *Subject: *Re: [belajar-excel] modifikasi function open file
>
>
>
> Oh belum dicoba ya...
> Kalau gak salah pastenya paste values transpose kan.
> Paste ke C202 dan C203. Yang kolom B masik ke C202 dan kolom X ke C203
> semua menjadi horisontal alias sebanyak 49 kolom.
>
> Setelah dicoba keluar error value apa ?
>
> Wassalam,
> Kid.
>
> 2012/12/18 <odhyz83_assasaky@yahoo.com>
>
>> **
>>
>>
>> ** Mr.Kid,
>> Trus untuk pastenya gmn soalnya pastenya berbeda cell jg.
>>
>> Trima kasih
>> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
>> Teruuusss...!
>> ------------------------------
>> *From: * "Mr. Kid" <mr.nmkid@gmail.com>
>> *Sender: * belajar-excel@yahoogroups.com
>> *Date: *Tue, 18 Dec 2012 14:07:07 +0700
>> *To: *<belajar-excel@yahoogroups.com>
>> *ReplyTo: * belajar-excel@yahoogroups.com
>> *Subject: *Re: [belajar-excel] modifikasi function open file
>>
>>
>>
>> Pak Rodhy,
>>
>> Coba ganti proses copy di salah satu prosedur dari yang tadinya :
>> .Range("B2:B50").Copy
>> menjadi :
>> .Range("B2:B50,X2:X50").Copy
>>
>> Coba jalankan prosedur yang sudah diganti bagian proses copy-nya.
>> Prosedur lainnya ndak usah dijalankan.
>>
>> Wassalam,
>> Kid.
>>
>>
>> 2012/12/18 rodhy hakim <odhyz83_assasaky@yahoo.com>
>>
>>> **
>>>
>>>
>>> **Dear Master,****
>>> Dibawah ini saya mempunyai code VBA untuk mengkopy data dari worksheet
>>> berbeda dengan menggunakan Dua Tombol, saya mengkopi data di satu worksheet
>>> tetapi dua kali kerja yaitu tombol pertama saya harus mengkopi ITEM
>>> CODE nya, kedua saya tekan tombol yang kedua untuk mengkopi DATA nya. Nah
>>> bagaimana caranya hanya dengan menggunakan satu buah tombol untuk
>>> menyelesaikan dua pekerjaan tersebut. Kemudian pertanyaan saya yang kedua,
>>> bagaimana caranya ketika function open file, agar semua jenis file Excel
>>> bisa muncul semua, karena yang sekarang saya harus memilih versi 2003 atau
>>> 2010.****
>>> ** **
>>> /////////////////////////////////////////////////////////////////////////////////
>>> Sub CopySenin()****
>>> FileTerpilih = Application.GetOpenFilename _****
>>> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
>>> file", MultiSelect:=True)****
>>> If VarType(FileTerpilih) = vbBoolean Then****
>>> Exit Sub****
>>> End If****
>>> NamaFileUtama = ActiveWorkbook.Name****
>>> JumlahFile = UBound(FileTerpilih)****
>>> Application.DisplayAlerts = False****
>>> For i = 1 To JumlahFile****
>>> Workbooks.Open FileTerpilih(i)****
>>> With ActiveWorkbook.Worksheets(1)****
>>> Selection.AutoFilter Field:=3, Criteria1:=1000****
>>> ActiveWorkbook.Save****
>>> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
>>> 1).End(xlUp).Row****
>>> BarisTerakhirFileUtama =
>>> Workbooks(NamaFileUtama).Worksheets(1) _****
>>> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
>>> 1).End(xlUp).Row****
>>> .Range("B2:B50").Copy****
>>> End With****
>>> With Workbooks(NamaFileUtama).Worksheets(2)****
>>> .Range("C202").PasteSpecial Paste:=xlValues, Transpose:=True
>>> ****
>>> End With****
>>> ActiveWorkbook.Close****
>>> Next i****
>>> Application.DisplayAlerts = True****
>>> End Sub****
>>> Sub CopyDataSenin()****
>>> FileTerpilih = Application.GetOpenFilename _****
>>> ("Excel 2010(*.xlsx),*.xlsx, Excel 2003 (*.xls),*.xls", Title:="Open
>>> file", MultiSelect:=True)****
>>> ** **
>>> If VarType(FileTerpilih) = vbBoolean Then****
>>> Exit Sub****
>>> End If****
>>> NamaFileUtama = ActiveWorkbook.Name****
>>> JumlahFile = UBound(FileTerpilih)****
>>> Application.DisplayAlerts = False****
>>> For i = 1 To JumlahFile****
>>> Workbooks.Open FileTerpilih(i)****
>>> With ActiveWorkbook.Worksheets(1)****
>>> BarisTerakhirFilePilihan = .Cells(.Rows.Count,
>>> 1).End(xlUp).Row****
>>> BarisTerakhirFileUtama =
>>> Workbooks(NamaFileUtama).Worksheets(1) _****
>>> .Cells(Workbooks(NamaFileUtama).Worksheets(1).Rows.Count,
>>> 1).End(xlUp).Row****
>>> .Range("X2:X50").Copy****
>>> End With****
>>> With Workbooks(NamaFileUtama).Worksheets(2)****
>>> .Range("C203").PasteSpecial Paste:=xlValues, Transpose:=True
>>> ****
>>> End With****
>>> ActiveWorkbook.Close****
>>> Next i****
>>> Application.DisplayAlerts = True****
>>> End Sub****
>>>
>>> /////////////////////////////////////////////////////////////////////////////////////////////
>>> ****
>>> ** **Atas pencerahannya saya ucapkan banyak terima kasih,****
>>> Salam,****
>>> Odhy****
>>> **
>>> ** **
>>>
>>>
>>
>
>
GROUP FOOTER MESSAGE
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar