15 New Messages
Digest #1972
5b
Re: menu tambahan dalam right click menu tidak tampil dalam cell "fo by "Mr. Kid" nmkid.family@ymail.com
Messages
Sun Dec 16, 2012 6:10 pm (PST) . Posted by:
"him mah"
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Sun Dec 16, 2012 6:20 pm (PST) . Posted by:
"zainul_ulum[at]yahoo[dot]com" zainul_ulum
Sharing aja..
Kalo aku sering membagi dalam beberapa modul dan class supaya rapi sehingga
mudah saat modifikasi code.
Misal saya membuat module khusus deklarasi variable, selain modul eksekusi.
Juga sering membuat class khusus untuk event handling worksheet ataupun
form.
Sedikit sharing saja dari saja.
-zainul-
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ]
On Behalf Of him mah
Sent: Monday, December 17, 2012 9:10 AM
To: belajar-excel
Subject: [belajar-excel] VBA dengan 1 modul atau lebih
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Kalo aku sering membagi dalam beberapa modul dan class supaya rapi sehingga
mudah saat modifikasi code.
Misal saya membuat module khusus deklarasi variable, selain modul eksekusi.
Juga sering membuat class khusus untuk event handling worksheet ataupun
form.
Sedikit sharing saja dari saja.
-zainul-
From: belajar-excel@
On Behalf Of him mah
Sent: Monday, December 17, 2012 9:10 AM
To: belajar-excel
Subject: [belajar-excel] VBA dengan 1 modul atau lebih
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Sun Dec 16, 2012 8:36 pm (PST) . Posted by:
"jessicapermata@yahoo.com" jessicapermata
Lalu untuk memanggil class atau module yg lain bagaimana?
Powered by Telkomsel BlackBerry®
-----Original Message-----
From: "zainul_ulum[at]yahoo[dot]com" <zainul_ulum@yahoo.com >
Sender: belajar-excel@yahoogroups.com
Date: Mon, 17 Dec 2012 09:20:35
To: <belajar-excel@yahoogroups.com >
Reply-To: belajar-excel@yahoogroups.com
Subject: RE: [belajar-excel] VBA dengan 1 modul atau lebih
Sharing aja..
Kalo aku sering membagi dalam beberapa modul dan class supaya rapi sehingga
mudah saat modifikasi code.
Misal saya membuat module khusus deklarasi variable, selain modul eksekusi.
Juga sering membuat class khusus untuk event handling worksheet ataupun
form.
Sedikit sharing saja dari saja.
-zainul-
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ]
On Behalf Of him mah
Sent: Monday, December 17, 2012 9:10 AM
To: belajar-excel
Subject: [belajar-excel] VBA dengan 1 modul atau lebih
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Powered by Telkomsel BlackBerry®
-----Original Message-----
From: "zainul_ulum[
Sender: belajar-excel@
Date: Mon, 17 Dec 2012 09:20:35
To: <belajar-excel@
Reply-To: belajar-excel@
Subject: RE: [belajar-excel] VBA dengan 1 modul atau lebih
Sharing aja..
Kalo aku sering membagi dalam beberapa modul dan class supaya rapi sehingga
mudah saat modifikasi code.
Misal saya membuat module khusus deklarasi variable, selain modul eksekusi.
Juga sering membuat class khusus untuk event handling worksheet ataupun
form.
Sedikit sharing saja dari saja.
-zainul-
From: belajar-excel@
On Behalf Of him mah
Sent: Monday, December 17, 2012 9:10 AM
To: belajar-excel
Subject: [belajar-excel] VBA dengan 1 modul atau lebih
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Sun Dec 16, 2012 9:09 pm (PST) . Posted by:
"zainul_ulum[at]yahoo[dot]com" zainul_ulum
Untuk memanggil prosedur di modul yang lain asal bersifat public bisa
diakses seperti memanggil prosedur biasa.
Contoh
Missal ada tiga modul, dan satu class
Modul1:
Public sub Procedure_1()
End sub
Modul2:
Public Sub Procedure_2()
End sub
Class1:
Sub Procedure_Class()
End sub
Modul3:
Dim cls as New class1
Sub TestProcedure()
Procedure_1'memanggil procedure di modul1
Procedure_2'memanggil procedure di modul2
Cls. Procedure_Class'memanggil procedure di
class1
End sub
Semoga membantu
-zainul-
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ]
On Behalf Of jessicapermata@yahoo.com
Sent: Monday, December 17, 2012 11:31 AM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] VBA dengan 1 modul atau lebih
Lalu untuk memanggil class atau module yg lain bagaimana?
Powered by Telkomsel BlackBerryR
_____
From: "zainul_ulum[at]yahoo[dot]com" <zainul_ulum@yahoo.com >
Sender: belajar-excel@yahoogroups.com
Date: Mon, 17 Dec 2012 09:20:35 +0700
To: <belajar-excel@yahoogroups.com >
ReplyTo: belajar-excel@yahoogroups.com
Subject: RE: [belajar-excel] VBA dengan 1 modul atau lebih
Sharing aja..
Kalo aku sering membagi dalam beberapa modul dan class supaya rapi sehingga
mudah saat modifikasi code.
Misal saya membuat module khusus deklarasi variable, selain modul eksekusi.
Juga sering membuat class khusus untuk event handling worksheet ataupun
form.
Sedikit sharing saja dari saja.
-zainul-
From: belajar-excel@yahoogroups.com <mailto:belajar-excel%40yahoogroups.com>
[mailto:belajar-excel@yahoogroups.com
<mailto:belajar-excel%40yahoogroups.com> ]
On Behalf Of him mah
Sent: Monday, December 17, 2012 9:10 AM
To: belajar-excel
Subject: [belajar-excel] VBA dengan 1 modul atau lebih
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
diakses seperti memanggil prosedur biasa.
Contoh
Missal ada tiga modul, dan satu class
Modul1:
Public sub Procedure_1(
End sub
Modul2:
Public Sub Procedure_2(
End sub
Class1:
Sub Procedure_Class(
End sub
Modul3:
Dim cls as New class1
Sub TestProcedure(
Procedure_1'
Procedure_2'
Cls. Procedure_Class'
class1
End sub
Semoga membantu
-zainul-
From: belajar-excel@
On Behalf Of jessicapermata@
Sent: Monday, December 17, 2012 11:31 AM
To: belajar-excel@
Subject: Re: [belajar-excel] VBA dengan 1 modul atau lebih
Lalu untuk memanggil class atau module yg lain bagaimana?
Powered by Telkomsel BlackBerryR
_____
From: "zainul_ulum[
Sender: belajar-excel@
Date: Mon, 17 Dec 2012 09:20:35 +0700
To: <belajar-excel@
ReplyTo: belajar-excel@
Subject: RE: [belajar-excel] VBA dengan 1 modul atau lebih
Sharing aja..
Kalo aku sering membagi dalam beberapa modul dan class supaya rapi sehingga
mudah saat modifikasi code.
Misal saya membuat module khusus deklarasi variable, selain modul eksekusi.
Juga sering membuat class khusus untuk event handling worksheet ataupun
form.
Sedikit sharing saja dari saja.
-zainul-
From: belajar-excel@
[mailto:belajar-excel@
<mailto:belajar-
On Behalf Of him mah
Sent: Monday, December 17, 2012 9:10 AM
To: belajar-excel
Subject: [belajar-excel] VBA dengan 1 modul atau lebih
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Sun Dec 16, 2012 7:02 pm (PST) . Posted by:
"Tony Bexcel"
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
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.
Dari: Mr. Kid <mr.nmkid@gmail.
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@
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:$
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$
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND(
+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:$
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND(
+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.
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
Sun Dec 16, 2012 7:04 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
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 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
>
>
>
>
penyebab kosongnya.
Wassalam,
Kid.
2012/12/17 Tony Bexcel <tonybexcel@yahoo.
> **
>
>
> 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.
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@
> 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:$
> *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$
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND(
> *+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:$
> Bagian-bagian formula :
> **$F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND(
> *+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.
> >
>
> **
>
> 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
>
>
>
>
Sun Dec 16, 2012 7:35 pm (PST) . Posted by:
"Tony Bexcel"
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
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.
Dari: Mr. Kid <mr.nmkid@gmail.
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@
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.
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.
Dari: Mr. Kid <mr.nmkid@gmail.
Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
Kepada: belajar-excel@
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:$
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$
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND(
+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:$
Bagian-bagian formula :
$F6:$BB6 :: nilai data yang direrata
$F$3:$BB$3 :: angka-angka bulan
INDEX($F$3:$
$B6:: kolom bantu posisi week akhir proses yang berupa formula =MID(E6,FIND(
+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.
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
Sun Dec 16, 2012 9:26 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
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 <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
>
>
>
> _
>
>
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.
> **
>
>
> 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.
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@
> 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.
> >
>
> **
>
> 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.
> >* menulis:
>
>
> Dari: Mr. Kid <mr.nmkid@gmail.
> >
> Judul: Re: [belajar-excel] Menghitung rata2 sisa activity
> Kepada: belajar-excel@
> 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:$
> *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$
> Bagian-bagian formula :
> $F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND(
> *+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:$
> Bagian-bagian formula :
> **$F6:$BB6 *:: nilai data yang direrata
> $F$3:$BB$3 :: angka-angka bulan
> INDEX($F$3:$
> week akhir proses
> *$B6*:: kolom bantu posisi week akhir proses yang berupa formula
> =MID(E6,FIND(
> *+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.
> >
>
> **
>
> 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
>
>
>
> _
>
>
Sun Dec 16, 2012 7:18 pm (PST) . Posted by:
"Agus Ramiyanto"
Terima kasih sebelumnya Mr. Kid, tp belum kesampaian yg saya inginkan.
Saya msh berharap ada pencerahan dari Mr. Kid jg para exceller yg lain.
Tks.
--- Mods ---
Coba lampirkan contoh file dengan bentuk hasil yang diinginkan.
Bentuk chart yang diinginkan bisa berupa gambar menggunakan shape atau apa saja yang memungkinkan.
Dengan begitu, BeExceller tidak main tebak-tebakan.
Coba apa jawaban pertanyaan berikut :
>> Chart apa yang ada di dalam sakunya si Fulan ?
------------
Pada 16 Des 2012 17.11, "Mr. Kid" <mr.nmkid@gmail.com > menulis:
> **
>
>
> Wa'alaikumussalam Wr. Wb.
>
> Pak Agus,
>
> Mungkin dengan jenis chart stacked column bisa memenuhi keinginan.
> Data yang akan diarsir dibuat dikolom tersendiri. Data yang tidak diarsir
> juga dibuat dikolom tersendiri.
> Nilai yang mestinya tidak ada dalam kolom masing-masing tersebut diganti
> dengan data bertipe selain numerik.
>
> File terlampir adalah sebuah contoh. Nilai yang mestinya tidak dikolom
> tersebut diganti dengan data teks kosong (nullstring)
>
> Wassalamu'alaikum Wr. Wb.
> Kid.
>
> 2012/12/16 Agus Ramiyanto <aramiyanto@gmail.com >
>
>> **
>>
>>
>> Assalamu alaikum wr wb
>>
>> Para pakar excel, mohon bantuannya apakah bisa dan bgmn caranya agar
>> grafik
>> excel terarsir.
>> Contoh terlampir, yg diarsir adalah area galian (grafik garis warna
>> orange).
>> Terima kasih.
>>
>> Salam
>>
>> Agus R
>>
>> --- Mods ---
>> Sepertinya si file lampiran ketinggalan.
>> fyi.
>> Posting kemilis melalui Compose email di akun email pribadi bisa
>> menyertakan file lampiran. Jika posting melalui website milis secara
>> langsung malah tidak bisa menyertakan file lampiran.
>> ------------
>>
>
>
>
Saya msh berharap ada pencerahan dari Mr. Kid jg para exceller yg lain.
Tks.
--- Mods ---
Coba lampirkan contoh file dengan bentuk hasil yang diinginkan.
Bentuk chart yang diinginkan bisa berupa gambar menggunakan shape atau apa saja yang memungkinkan.
Dengan begitu, BeExceller tidak main tebak-tebakan.
Coba apa jawaban pertanyaan berikut :
>> Chart apa yang ada di dalam sakunya si Fulan ?
------------
Pada 16 Des 2012 17.11, "Mr. Kid" <mr.nmkid@gmail.
> **
>
>
> Wa'alaikumussalam Wr. Wb.
>
> Pak Agus,
>
> Mungkin dengan jenis chart stacked column bisa memenuhi keinginan.
> Data yang akan diarsir dibuat dikolom tersendiri. Data yang tidak diarsir
> juga dibuat dikolom tersendiri.
> Nilai yang mestinya tidak ada dalam kolom masing-masing tersebut diganti
> dengan data bertipe selain numerik.
>
> File terlampir adalah sebuah contoh. Nilai yang mestinya tidak dikolom
> tersebut diganti dengan data teks kosong (nullstring)
>
> Wassalamu'alaikum Wr. Wb.
> Kid.
>
> 2012/12/16 Agus Ramiyanto <aramiyanto@gmail.
>
>> **
>>
>>
>> Assalamu alaikum wr wb
>>
>> Para pakar excel, mohon bantuannya apakah bisa dan bgmn caranya agar
>> grafik
>> excel terarsir.
>> Contoh terlampir, yg diarsir adalah area galian (grafik garis warna
>> orange).
>> Terima kasih.
>>
>> Salam
>>
>> Agus R
>>
>> --- Mods ---
>> Sepertinya si file lampiran ketinggalan.
>> fyi.
>> Posting kemilis melalui Compose email di akun email pribadi bisa
>> menyertakan file lampiran. Jika posting melalui website milis secara
>> langsung malah tidak bisa menyertakan file lampiran.
>> ------------
>>
>
>
>
Sun Dec 16, 2012 7:26 pm (PST) . Posted by:
"Jan Raisin"
Assalamu'alaikum wr. wb.,
Dear Be-Exceler,
Seorang kawan bertanya kepada Jan, bagaimana cara membuat Grant Chart (Jadwal
Kegiatan dengan bentuk Grafik) yang sederhana tanpa menggunakan formula
apalagi VBA, juga cara menampilkan kalender Hijriah di dalam Chart tersebut.
Untuk menjawab pertanyaan kawan tersebut maka Jan ingin sharing sedikit
ilmu yang dititipkan oleh Allah kepada Jan, yaitu bagaimana cara membuat
Grant Chart plus Tanggal Hijriah dengan memanfaatkan fitur Pivot Table,
semoga yang bertanya sempat untuk membaca thread ini.
Mungkin sebelumnya sudah pernah ada yang mempraktekkan, tetapi jika belum
ada semoga menjadi tambahan pengetahuan untuk kita semua.
Data sample adalah dummy, jika ada kesamaan jadwal dan nama kegiatan maka
hanya kebetulan belaka, jika ada yang ingin menyempurnakan Jan sampaikan
terima kasih sebelumnya.
Semoga bermanfaat,
Wassalamu'alaikum wr. wb.,
-Ms. Jan Raisin-
Dear Be-Exceler,
Seorang kawan bertanya kepada Jan, bagaimana cara membuat Grant Chart (Jadwal
Kegiatan dengan bentuk Grafik) yang sederhana tanpa menggunakan formula
apalagi VBA, juga cara menampilkan kalender Hijriah di dalam Chart tersebut.
Untuk menjawab pertanyaan kawan tersebut maka Jan ingin sharing sedikit
ilmu yang dititipkan oleh Allah kepada Jan, yaitu bagaimana cara membuat
Grant Chart plus Tanggal Hijriah dengan memanfaatkan fitur Pivot Table,
semoga yang bertanya sempat untuk membaca thread ini.
Mungkin sebelumnya sudah pernah ada yang mempraktekkan, tetapi jika belum
ada semoga menjadi tambahan pengetahuan untuk kita semua.
Data sample adalah dummy, jika ada kesamaan jadwal dan nama kegiatan maka
hanya kebetulan belaka, jika ada yang ingin menyempurnakan Jan sampaikan
terima kasih sebelumnya.
Semoga bermanfaat,
Wassalamu'alaikum wr. wb.,
-Ms. Jan Raisin-
Sun Dec 16, 2012 8:11 pm (PST) . Posted by:
"Imar Andre" baz.giglo
BeExceler
Saya menggunakan addins dari mba CTV
(ctv_Kalender_&_ChangeCase(V2).xla), untuk di cell tanpa "format as
Table" bisa muncul tetapi tidak sebaliknya.
Mohon pencerahannya.
Wassalam
--
imar
Saya menggunakan addins dari mba CTV
(ctv_Kalender_
Table" bisa muncul tetapi tidak sebaliknya.
Mohon pencerahannya.
Wassalam
--
imar
Sun Dec 16, 2012 9:23 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Imar,
Pop up menu untuk object dari fitur Excel Table masuk dalam kelompok
command bar list range popup.
Jadi popup menu yang harus muncul di :
- cell harus dibuat masuk kedalam kelompok command bar cell
- object excel table harus dibuat masuk kedalam kelompok command bar list
range popup
Untuk membentuk file terlampir menjadi add in, silakan di save as xla atau
xlam.
Script buatan mbake hanya perlu diubah sedikit menjadi :
>> pembuat popup menu :
Sub ctvPopMenu()
' siti Vi /KalenderPopUp /1sep08 /modif 19sep08
' modif for ChangeCase tools / 12 Jul 2011
'----------------------------------------------
'Kid :: add list range popup for listobject range
'Jakarta, 2012-12-17
'----------------------------------------------
Dim vBar As Variant, vBars As Variant, vID As Variant, lID As Long
ctvMenuReset
vBars = Array("Cell", "List Range Popup")
vID = Array("ctv ", "kid ")
lID = LBound(vID)
For Each vBar In vBars
With Application.CommandBars(vBar).Controls _
.Add(Type:=msoControlButton, Before:=1, Temporary:=True)
.Caption = vID(lID) & "Undo Set Scroll Area"
.OnAction = "UndoSetScrlArea"
End With
With Application.CommandBars(vBar).Controls _
.Add(Type:=msoControlButton, Before:=1, Temporary:=True)
.Caption = vID(lID) & "Set Scroll Area"
.OnAction = "SetScrlArea"
End With
With Application.CommandBars(vBar).Controls _
.Add(Type:=msoControlButton, Before:=1, Temporary:=True)
.Caption = vID(lID) & "Change Case"
.OnAction = "CaseChanger"
End With
With Application.CommandBars(vBar).Controls _
.Add(Type:=msoControlButton, Before:=1, Temporary:=True)
.Caption = vID(lID) & "Kalender PopUp"
.OnAction = "FrmKalenderShow"
End With
lID = lID + 1
Next vBar
End Sub
>> penghapus popup menu :
Sub ctvMenuReset()
'----------------------------------------------
'Kid :: add list range popup for listobject range
'Jakarta, 2012-12-17
'----------------------------------------------
Dim CbCtr As CommandBarControl
For Each CbCtr In Application.CommandBars("Cell").Controls
If CbCtr.Caption Like "ctv*" Then
CbCtr.Delete
End If
Next CbCtr
For Each CbCtr In Application.CommandBars("List Range Popup").Controls
If CbCtr.Caption Like "kid*" Then
CbCtr.Delete
End If
Next CbCtr
End Sub
Wassalam,
Kid.
2012/12/17 Imar Andre <imar.ap@gmail.com >
> **
>
>
> BeExceler
>
> Saya menggunakan addins dari mba CTV
> (ctv_Kalender_&_ChangeCase(V2).xla), untuk di cell tanpa "format as
> Table" bisa muncul tetapi tidak sebaliknya.
> Mohon pencerahannya.
>
> Wassalam
> --
> imar
>
>
Pop up menu untuk object dari fitur Excel Table masuk dalam kelompok
command bar list range popup.
Jadi popup menu yang harus muncul di :
- cell harus dibuat masuk kedalam kelompok command bar cell
- object excel table harus dibuat masuk kedalam kelompok command bar list
range popup
Untuk membentuk file terlampir menjadi add in, silakan di save as xla atau
xlam.
Script buatan mbake hanya perlu diubah sedikit menjadi :
>> pembuat popup menu :
Sub ctvPopMenu()
' siti Vi /KalenderPopUp /1sep08 /modif 19sep08
' modif for ChangeCase tools / 12 Jul 2011
'-----------
'Kid :: add list range popup for listobject range
'Jakarta, 2012-12-17
'-----------
Dim vBar As Variant, vBars As Variant, vID As Variant, lID As Long
ctvMenuReset
vBars = Array("Cell"
vID = Array("ctv ", "kid ")
lID = LBound(vID)
For Each vBar In vBars
With Application.
.Add(Type:=msoContr
.Caption = vID(lID) & "Undo Set Scroll Area"
.OnAction = "UndoSetScrlArea"
End With
With Application.
.Add(Type:=msoContr
.Caption = vID(lID) & "Set Scroll Area"
.OnAction = "SetScrlArea"
End With
With Application.
.Add(Type:=msoContr
.Caption = vID(lID) & "Change Case"
.OnAction = "CaseChanger"
End With
With Application.
.Add(Type:=msoContr
.Caption = vID(lID) & "Kalender PopUp"
.OnAction = "FrmKalenderShow"
End With
lID = lID + 1
Next vBar
End Sub
>> penghapus popup menu :
Sub ctvMenuReset(
'-----------
'Kid :: add list range popup for listobject range
'Jakarta, 2012-12-17
'-----------
Dim CbCtr As CommandBarControl
For Each CbCtr In Application.
If CbCtr.Caption Like "ctv*" Then
CbCtr.Delete
End If
Next CbCtr
For Each CbCtr In Application.
If CbCtr.Caption Like "kid*" Then
CbCtr.Delete
End If
Next CbCtr
End Sub
Wassalam,
Kid.
2012/12/17 Imar Andre <imar.ap@gmail.
> **
>
>
> BeExceler
>
> Saya menggunakan addins dari mba CTV
> (ctv_Kalender_
> Table" bisa muncul tetapi tidak sebaliknya.
> Mohon pencerahannya.
>
> Wassalam
> --
> imar
>
>
Sun Dec 16, 2012 9:35 pm (PST) . Posted by:
"Dian Anas" anassheva20
terima kasih atas pencerahannya, tapi ada permasahan lagi, untuk halaman input data apa bisa disheet lain, untuk update daya per baris bisa dilakukan di sheet input tidak? mohon pencerahannya.
best regads
--- On Fri, 12/14/12, Jan Raisin <miss.jan.raisin@gmail.com > wrote:
From: Jan Raisin <miss.jan.raisin@gmail.com >
Subject: Re: [belajar-excel] membuat duk pns otomatis
To: belajar-excel@yahoogroups.com
Date: Friday, December 14, 2012, 4:19 AM
Dear mbak/mas Dian,
untuk kasus ini jika ingin otomatis, maka satu-satunya cara adalah menggunakan VBA
script berikut ditulis dalam sebuah modul VBE, untuk menampilkannya tekan tombol ALT F11 >> Insert >> Module
Option Explicit
' -------------------------------------- '
' prosedur input data dan sort otomatis '' sort Descending berdasarkan : '
' Golongan, Tahun & Bulan masa kerja '' code by: Ms Jan Raisin '
' untuk millis Belajar Excel '' 14 Desember 2012 '
' -------------------------------------- '
' ini adalah nama prosedurnya
Sub InputAndSort()
' deklarasikan variabel bertipe String untuk mencari NIP pada data
Dim sCari As String ' deklarasikan variabel bertipe Range untuk menyimpan data berupa objek range
' variabel ini untuk menunjukkan apakah NIP sudah ada di data atau belum Dim Cari As Range
' deklarasikan variabel bertipe Long untuk menyimpan nomor baris data yang paling akhir
Dim idxRow As Long
' ini adalah proses pengecekan apakah NIP tersebut sudah ada di data atau belum
' simpan NIP dari cell C2 ke dalam variabel yang bernama sCari sCari = Range("c2").Value
' lakukan pencarian NIP mulai dari cell C8 sampai baris data yang paling bawah
' perhatian!!! pada contoh ini data pertama NIP ada pada cell C8 ' jika berbeda maka sesuaikan lokasinya
Set Cari = Range(Range("c8"), Range("c8").End(xlDown)).Find(sCari)
' jika ditemukan maka If Not Cari Is Nothing Then
' tampilkan pesan kepada user bahwa NIP tersebut sudah ada di data
MsgBox "NIP tersebut sudah ada", vbOKOnly + vbExclamation, "Validasi Data"
' karena sudah ada maka keluar dari prosedur Exit Sub
' ini adalah akhir dari pengecekan keberadaan NIP pada data End If
' jika sampai ke sini berarti data belum ada ' bikin 2 baris bantu, 1 sebagai header di baris 8
' dan di baris 9 adalah lokasi penulisan data ' Perhatian!!! insert baris dimulai dari baris data pertama
' jika lokasinya berbeda maka lakukan penyesuaian Range("a8:a9").EntireRow.Insert
' bikin header di setiap kolom baris bantu yang tadi sudah dibuat
Range("a8").Value = "No" Range("b8:r8").Value = Range("b1:r1").Value
' copas data input ke tabel Range("b2:r2").Copy
Range("b9").PasteSpecial xlPasteValuesAndNumberFormats Application.CutCopyMode = False
' sekarang saatnya melakukan sortir data ' pergi ke cell B8, ini adalah header dari baris bantu yang sudah dibuat
Range("B8").Select ' blok seluruh data ke arah kanan dan ke arah bawah
Range(Selection, Selection.End(xlToRight).End(xlDown)).Select
' jika ada sort sebelumnya, maka hapus dahulu sort tersebut
Sheets("ks dan guru").Sort.SortFields.Clear ' sort descending berdasarkan Golongan, headernya ada di cell D8
Sheets("ks dan guru").Sort.SortFields.Add Key:=Range("d8"), _ SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
' sort descending berdasarkan Tahun tugas, headernya ada di cell H8
ActiveWorkbook.Worksheets("ks dan guru").Sort.SortFields.Add Key:=Range("h8"), _ SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
' sort Descending berdasarkan Bulan tugas, headernya ada di cell I8
ActiveWorkbook.Worksheets("ks dan guru").Sort.SortFields.Add Key:=Range("i8"), _ SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
' sekarang bekerja pada proses sort di sheet KS dan Guru With Sheets("ks dan guru").Sort
' atur range data yang akan disort, mulai dari aktif cell (B8) ke arah kanan dan bawah .SetRange Range(ActiveCell, ActiveCell.End(xlToRight).End(xlDown))
' baris pertama adalah header data .Header = xlYes ' sort bukan berdasarkan case sensitif
.MatchCase = False ' sort dilakukan dari atas ke bawah .Orientation = xlTopToBottom
' defaultnya adalah xlPinYin .SortMethod = xlPinYin ' terapkan sort berdasarkan kriteria yang telah ditentukan
.Apply ' akhir bekerja dengan proses sort pada sheet KS dan Guru
End With ' cari nomor baris data terakhir dan simpan di variabel idxRow
idxRow = ActiveCell.End(xlDown).Row ' bikin nomor urut
Range("a9").Value = 1 Range("a10").Value = 2 Range("a9:a10").AutoFill Range(Cells(9, 1), Cells(idxRow, 1))
' hapus baris bantu Range("b8").EntireRow.Delete
' pergi ke cell A1, biar keliatan lebih cantik aja Range("a1").Select
' ini adalah akhir dari prosedur input dan simpanEnd Sub
untuk menjalankannya, buat sebuah objek berupa tombol, shape, atau mungkin kalo mau sedikit narsis boleh lah pakai foto xixixi :D
assign macro tersebut ke dalam objek tadi dengan cara klik kanan pada objek tersebut
setelah itu setiap selesai input data klik objek tersebut
file terlampir hanya disisakan 1 buah sheet saja, untuk mengurangi ukuran file, semoga OP bersedia mempelajari script tersebut sehingga untuk penerapan ke sheet yang lain akan lebih mudah
Best Regard,
-Ms. Jan Raisin-
Pada 13 Desember 2012 15:03, Mr. Kid <mr.nmkid@gmail.com > menulis:
Berhubung belum ada file susulan sebagai contoh datanya, dilampirkan file asli yang telah dikurangi jumlah datanya.
Mohon hati-hati bagi yang ne-reply, karena file sudah mendekati batas maksimal ukuran file yang ditentukan dalam peraturan milis.
Wassalam,
Kid.
2012/12/13 Dian Anas <anassheva20@yahoo.com >
para master excel yang budiman.
saya mau tanya, apakah sorting otomatis pada excel itu bisa dilakukan ketika kita memasukan data baru contohnya kalau kita memasukkan data golongan IV/a dengan masa kerja 23 tahun maka akan diatas golongan IV/a yang masa kerjanya 22 tahun. terima kasih pencerahannya.
--- Mods ---
File lampiran yang sebesar 492KB tersandera. Kita tunggu kiriman file yang lebih sesuai peraturan milis (<250KB) dari sdr/i Dian.
------------
best regads
--- On Fri, 12/14/12, Jan Raisin <miss.jan.raisin@
From: Jan Raisin <miss.jan.raisin@
Subject: Re: [belajar-excel] membuat duk pns otomatis
To: belajar-excel@
Date: Friday, December 14, 2012, 4:19 AM
Dear mbak/mas Dian,
untuk kasus ini jika ingin otomatis, maka satu-satunya cara adalah menggunakan VBA
script berikut ditulis dalam sebuah modul VBE, untuk menampilkannya tekan tombol ALT F11 >> Insert >> Module
Option Explicit
' ------------
' prosedur input data dan sort otomatis '' sort Descending berdasarkan : '
' Golongan, Tahun & Bulan masa kerja '' code by: Ms Jan Raisin '
' untuk millis Belajar Excel '' 14 Desember 2012 '
' ------------
' ini adalah nama prosedurnya
Sub InputAndSort(
' deklarasikan variabel bertipe String untuk mencari NIP pada data
Dim sCari As String ' deklarasikan variabel bertipe Range untuk menyimpan data berupa objek range
' variabel ini untuk menunjukkan apakah NIP sudah ada di data atau belum Dim Cari As Range
' deklarasikan variabel bertipe Long untuk menyimpan nomor baris data yang paling akhir
Dim idxRow As Long
' ini adalah proses pengecekan apakah NIP tersebut sudah ada di data atau belum
' simpan NIP dari cell C2 ke dalam variabel yang bernama sCari sCari = Range("c2").
' lakukan pencarian NIP mulai dari cell C8 sampai baris data yang paling bawah
' perhatian!!! pada contoh ini data pertama NIP ada pada cell C8 ' jika berbeda maka sesuaikan lokasinya
Set Cari = Range(Range(
' jika ditemukan maka If Not Cari Is Nothing Then
' tampilkan pesan kepada user bahwa NIP tersebut sudah ada di data
MsgBox "NIP tersebut sudah ada", vbOKOnly + vbExclamation, "Validasi Data"
' karena sudah ada maka keluar dari prosedur Exit Sub
' ini adalah akhir dari pengecekan keberadaan NIP pada data End If
' jika sampai ke sini berarti data belum ada ' bikin 2 baris bantu, 1 sebagai header di baris 8
' dan di baris 9 adalah lokasi penulisan data ' Perhatian!!! insert baris dimulai dari baris data pertama
' jika lokasinya berbeda maka lakukan penyesuaian Range("a8:a9"
' bikin header di setiap kolom baris bantu yang tadi sudah dibuat
Range("a8").
' copas data input ke tabel Range("b2:r2"
Range("b9").
' sekarang saatnya melakukan sortir data ' pergi ke cell B8, ini adalah header dari baris bantu yang sudah dibuat
Range("B8").
Range(Selection, Selection.End(
' jika ada sort sebelumnya, maka hapus dahulu sort tersebut
Sheets("ks dan guru").Sort.
Sheets("ks dan guru").Sort.
' sort descending berdasarkan Tahun tugas, headernya ada di cell H8
ActiveWorkbook.
' sort Descending berdasarkan Bulan tugas, headernya ada di cell I8
ActiveWorkbook.
' sekarang bekerja pada proses sort di sheet KS dan Guru With Sheets("ks dan guru").Sort
' atur range data yang akan disort, mulai dari aktif cell (B8) ke arah kanan dan bawah .SetRange Range(ActiveCell, ActiveCell.End(
' baris pertama adalah header data .Header = xlYes ' sort bukan berdasarkan case sensitif
.MatchCase = False ' sort dilakukan dari atas ke bawah .Orientation = xlTopToBottom
' defaultnya adalah xlPinYin .SortMethod = xlPinYin ' terapkan sort berdasarkan kriteria yang telah ditentukan
.Apply ' akhir bekerja dengan proses sort pada sheet KS dan Guru
End With ' cari nomor baris data terakhir dan simpan di variabel idxRow
idxRow = ActiveCell.End(
Range("a9").
' hapus baris bantu Range("b8").
' pergi ke cell A1, biar keliatan lebih cantik aja Range("a1").
' ini adalah akhir dari prosedur input dan simpanEnd Sub
untuk menjalankannya, buat sebuah objek berupa tombol, shape, atau mungkin kalo mau sedikit narsis boleh lah pakai foto xixixi :D
assign macro tersebut ke dalam objek tadi dengan cara klik kanan pada objek tersebut
setelah itu setiap selesai input data klik objek tersebut
file terlampir hanya disisakan 1 buah sheet saja, untuk mengurangi ukuran file, semoga OP bersedia mempelajari script tersebut sehingga untuk penerapan ke sheet yang lain akan lebih mudah
Best Regard,
-Ms. Jan Raisin-
Pada 13 Desember 2012 15:03, Mr. Kid <mr.nmkid@gmail.
Berhubung belum ada file susulan sebagai contoh datanya, dilampirkan file asli yang telah dikurangi jumlah datanya.
Mohon hati-hati bagi yang ne-reply, karena file sudah mendekati batas maksimal ukuran file yang ditentukan dalam peraturan milis.
Wassalam,
Kid.
2012/12/13 Dian Anas <anassheva20@
para master excel yang budiman.
saya mau tanya, apakah sorting otomatis pada excel itu bisa dilakukan ketika kita memasukan data baru contohnya kalau kita memasukkan data golongan IV/a dengan masa kerja 23 tahun maka akan diatas golongan IV/a yang masa kerjanya 22 tahun. terima kasih pencerahannya.
--- Mods ---
File lampiran yang sebesar 492KB tersandera. Kita tunggu kiriman file yang lebih sesuai peraturan milis (<250KB) dari sdr/i Dian.
------------
Sun Dec 16, 2012 10:54 pm (PST) . Posted by:
"Jan Raisin"
Jawabnya: Bisa
coba kirimkan file yang berisi:
1 buah sheet untuk inputnya, biar ada gambaran "Ini lho maunya saya"
lengkap dengan bentuk inputannya (mau ke arah bawah atau ke samping, kalo
ke bawah lebih bagus), dikasih gambar2 juga boleh :)
1 buah sheet untuk tempat datanya, contoh header kolomnya sudah disebutkan
oleh mr Kid, kalo ada tambahan yang lain coba ditambah sendiri, Header
dimulai dari cell A1 ya.. dengan beberapa baris data
1 buah sheet untuk referensi, yang ini juga sudah dicontohkan isinya oleh
mr Kid.
walau pun Jan bisa membuatnya dengan mudah, tapi Jan harap mas/mbak Dian
bersedia mengirimkan filenya dulu, biar kelihatan ada usahanya dan tidak
kelihatan asal terima jadi
Cemungud.. --alay mode:On--
-Ms. Jan Raisin-
Pada 17 Desember 2012 12:30, Dian Anas <anassheva20@yahoo.com > menulis:
> **
>
>
> terima kasih atas pencerahannya, tapi ada permasahan lagi, untuk halaman
> input data apa bisa disheet lain, untuk update daya per baris bisa
> dilakukan di sheet input tidak? mohon pencerahannya.
> best regads
>
>
>
coba kirimkan file yang berisi:
1 buah sheet untuk inputnya, biar ada gambaran "Ini lho maunya saya"
lengkap dengan bentuk inputannya (mau ke arah bawah atau ke samping, kalo
ke bawah lebih bagus), dikasih gambar2 juga boleh :)
1 buah sheet untuk tempat datanya, contoh header kolomnya sudah disebutkan
oleh mr Kid, kalo ada tambahan yang lain coba ditambah sendiri, Header
dimulai dari cell A1 ya.. dengan beberapa baris data
1 buah sheet untuk referensi, yang ini juga sudah dicontohkan isinya oleh
mr Kid.
walau pun Jan bisa membuatnya dengan mudah, tapi Jan harap mas/mbak Dian
bersedia mengirimkan filenya dulu, biar kelihatan ada usahanya dan tidak
kelihatan asal terima jadi
Cemungud.. --alay mode:On--
-Ms. Jan Raisin-
Pada 17 Desember 2012 12:30, Dian Anas <anassheva20@
> **
>
>
> terima kasih atas pencerahannya, tapi ada permasahan lagi, untuk halaman
> input data apa bisa disheet lain, untuk update daya per baris bisa
> dilakukan di sheet input tidak? mohon pencerahannya.
> best regads
>
>
>
Sun Dec 16, 2012 10:34 pm (PST) . Posted by:
"Jan Raisin"
Wa'alaikumsalam wr. wb.,
berhubung pak Ghozi belum menjawab, mungkin terhalang oleh kesibukan ybs,
izinkan Jan mencoba memberikan penjelasan mengenai alur formula dari pak
Ghozi
=IF(ROW(1:1)<=COUNTA('File-01'!$A$7:$A$40);OFFSET('File-01'!
$A$6;MOD(ROW(1:1)-1;COUNTA('File-01'!$A$7:$A$40))+1;
COLUMN()-1);OFFSET('File-02'!$A$6;ROW(1:1)-COUNTA('File-01'!
$A$7:$A$40)+1;COLUMN()-1))
untuk mudah membacanya maka formula dibagi menjadi beberapa bagian:
========================================================================================================================================================
Bagian pertama adalah formula =If (kondisi , nilai_jika_kondisi_terpenuhi ,
nilai_jika_kondisi_tidak_terpenuhi)
=IF(ROW(1:1)<=COUNTA('File-01'!$A$7:$A$40);OFFSET('File-01'!
$A$6;MOD(ROW(1:1)-1;COUNTA('File-01'!$A$7:$A$40))+1;COLUMN()-1);
OFFSET('File-02'!$A$6;ROW(1:1)-COUNTA('File-01'!$A$7:$A$40)+1;COLUMN()-1))
jika kondisi yang disorot dengan warna biru terpenuhi, maka ambil nilai
dari yang disorot dengan warna hijau, jika tidak terpenuhi maka ambil nilai
yang disorot dengan warna merah.
semoga yang bagian pertama dapat dimengerti dengan mudah, karena hal itu
dibutuhkan untuk memahami bagian berikutnya.
===================================================================================================================================================================
Bagian Kedua, beralih ke kondisi di dalam fungsi If tersebut: ROW(1:1) <=
COUNTA('File-01'!$A$7:$A$40)
ada 3 bagian di dalam kondisi ini, yaitu ROW(1:1) , <= , dan
COUNTA('File-01'!$A$7:$A$40)
Bagian yang berbunyi Row(1:1) akan menghasilkan nilai 1, jika formula
tersebut dicopy ke arah bawah akan menghasilkan formula Row(2:2), Row(3:3)
dst, dan hasilnya adalah berupa nilai mulai dari 1, 2, 3, 4, dst sesuai
dengan jumlah baris yang dipaste. Untuk pembuktian, coba tulis di suatu
cell formula berikut, =Row(1:1) lalu copy ke arah bawah dan lihat hasilnya.
Bagian yang berbunyi <= adalah operator matematika yang berfungsi untuk
membandingkan besarnya suatu nilai,
Bagian yang berbunyi Counta('File-01'!$A$7:$A$40) adalah berfungsi untuk
menghitung jumlah cell yang tidak kosong di sheet File-01, mulai dari cell
A7 sampai cell A40.
Khusus pada kasus ini: formula Counta('File-01'!$A$7:$A$40) akan
menghasilkan nilai 11, untuk pembuktian coba hitung manual pada sheet
File-01 mulai cell A7 sampai A40, ada berapa cell yang tidak kosong?
===================================================================================================================================================================
bagian KeTiga, adalah nilai yang diambil jika kondisi terpenuhi,
OFFSET('File-01'!$A$6;MOD(ROW(1:1)-1;COUNTA('File-01'!$A$7:$A$40))+1;
COLUMN()-1)
berhubung pengambilan nilai untuk kondisi terpenuhi dan tidak terpenuhi
logikanya sama, maka untuk yang diberi warna merah tidak Jan jelaskan lagi.
pada bagian ini pak Ghozi menggunakan fungsi OffSet, mari kita bahas maksud
dan tujuan penggunaan fungsi ini.
syntax OffSet adalah sebagai berikut:
=OffSet(cell_atau_range_yang_menjadi_rujukan_atau_titik_nol_atau_titik_awal_untuk_bergerak
, nomor_indeks_baris_dari_titik_awal , nomor_indeks_kolom_dari_titik_awal ,
tinggi_baris , lebar_kolom)
pada penggunaan fungsi OffSet kali ini oleh Pak Ghozi hanya memanfaatkan
Titik awall , nomer indeks baris , dan nomer indeks kolom saja, sedangkan
tinggi baris dan kolom yang bersifat opsional tidak digunakan karena hanya
nilai 1 cell yang diambil.
lihat yang diberi warna biru ('File-01'!$A$6), ini adalah titik start awal
atau titik nol, letaknya di sheet File-01 pada cell A6
untuk posisi barisnya diperoleh dari perhitungan antara sisa hasil
pembagian MOD , nilai baris setelah dikurangi dengan 1 yaitu Row(1:1)-1,
dengan jumlah data yang tidak kosong di sheet File-01 mulai cell A7 sampai
cell A40 COUNTA('File-01'!$A$7:$A$40))+1
untuk posisi kolomnya diperoleh dari pengambilan nilai kolom setelah
dikurangi 1 COLUMN()-1
Untuk lebih mudah mengerti bagian keTiga dan keEmpat, coba pelajari cara
penggunaan fungsi OffSet di dalam lembar kerja
===================================================================================================================================================================
Bagian keEmpat adalah pengambilan nilai jika kondisi If tidak terpenuhi,
logika dan penjelasannya sama dengan bagian keTiga.
Semoga penjelasan ini dapat dimengerti dan dipahami, jika ada yang kurang
jelas silakan ditanyakan kembali.
cmiiw,
-Ms. Jan Raisin-
Pada 15 Desember 2012 11:43, Mulki <mulki@aop.component.astra.co.id >menulis:
> **
>
>
> **
> Dear Pak Ghozi ...
>
> Bisa bantu cara baca/penjelasan dari formula bapak dibawah ?
>
> Terimakasih atas pencerahannya
>
> Wassalam,
> mulki
>
>
> ----- Original Message -----
> *From:* ghozi alkatiri <ghozialkatiri@yahoo.co.id >
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Friday, December 14, 2012 5:17 PM
> *Subject:* Bls: [belajar-excel] Menggabungkan 2 Data absensi ke dalam 1
> File gabung absensi
>
>
>
> tulis formula pertama di A7
>
> =IF(ROW(1:1)<=COUNTA('File-01'!$A$7:$A$40);OFFSET('File-01'!$A$6;MOD(ROW(1:1)-1;COUNTA('File-01'!$A$7:$A$40))+1;COLUMN()-1);OFFSET('File-02'!$A$6;ROW(1:1)-COUNTA('File-01'!$A$7:$A$40)+1;COLUMN()-1))
>
> copy ke kanan dan ke bawah
> pada cell berisi 0 (nol) dari tabel yang kosong dihilangkan dengan
> conditional formating opsi font no colour.
>
> selanjutnya lihat langsung di attachment sheet solusi
>
> wassalam
>
> Ghozi Alkatiri
>
> ------------------------------
> *Dari:* Rachmad HIDAYAT <rachmad.hidayat@external.total.com >
> *Kepada:* "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
> *Dikirim:* Jumat, 14 Desember 2012 15:17
> *Judul:* [belajar-excel] Menggabungkan 2 Data absensi ke dalam 1 File
> gabung absensi
>
>
> Dear Pakar Bexcel,
> Saya punya case begini nih, mohon bisa dibantu ya..,
>
> - Saya punya dua atau lebih file Absensi dengan format tabel
> yang sama, namun nama data nama,materi, absensi berbeda. (dalam case ini
> saya jadikan satu file saja, tapi faktanya ada 3 file xlsx, FILE-01.xlxs(di
> Sheet File-01),FILE-02(di sheet File-02).xlsx, GABUNG DATA.xlsx (Gabung
> data File-01dan File02)
> - Setiap akhir pekan saya pingin mengetahui berapa total
> keseluruhan yang hadir(H), tidak hadir(X)dari orang-orang tersebut
> - Ohya,Data orang bisa bertambah jadi nanti secara otomatis akan
> tergabung juga di file gabung
> - Bagaimana cara menggabungkan 2 file ini menjadi satu file
> gabungan ya ?
>
> Lebih jelasnya bisa di lihat di lampiran Saya cob pake concolidate, namun
> masih bingung cara pake dan error
> Terim kasih atas bantuan nya ya
>
> Terima Kasih,
> Rachmad Hidayat
> Inspection Method
> 3487
>
>
>
>
>
berhubung pak Ghozi belum menjawab, mungkin terhalang oleh kesibukan ybs,
izinkan Jan mencoba memberikan penjelasan mengenai alur formula dari pak
Ghozi
=IF(ROW(1:1)
$A$6;MOD(ROW(
COLUMN()-1);
$A$7:$A$40)+
untuk mudah membacanya maka formula dibagi menjadi beberapa bagian:
============
Bagian pertama adalah formula =If (kondisi , nilai_jika_kondisi_
nilai_jika_kondisi_
=IF(ROW(1:1)
$A$6;MOD(ROW(
OFFSET('File-
jika kondisi yang disorot dengan warna biru terpenuhi, maka ambil nilai
dari yang disorot dengan warna hijau, jika tidak terpenuhi maka ambil nilai
yang disorot dengan warna merah.
semoga yang bagian pertama dapat dimengerti dengan mudah, karena hal itu
dibutuhkan untuk memahami bagian berikutnya.
============
Bagian Kedua, beralih ke kondisi di dalam fungsi If tersebut: ROW(1:1) <=
COUNTA('File-
ada 3 bagian di dalam kondisi ini, yaitu ROW(1:1) , <= , dan
COUNTA('File-
Bagian yang berbunyi Row(1:1) akan menghasilkan nilai 1, jika formula
tersebut dicopy ke arah bawah akan menghasilkan formula Row(2:2), Row(3:3)
dst, dan hasilnya adalah berupa nilai mulai dari 1, 2, 3, 4, dst sesuai
dengan jumlah baris yang dipaste. Untuk pembuktian, coba tulis di suatu
cell formula berikut, =Row(1:1) lalu copy ke arah bawah dan lihat hasilnya.
Bagian yang berbunyi <= adalah operator matematika yang berfungsi untuk
membandingkan besarnya suatu nilai,
Bagian yang berbunyi Counta('File-
menghitung jumlah cell yang tidak kosong di sheet File-01, mulai dari cell
A7 sampai cell A40.
Khusus pada kasus ini: formula Counta('File-
menghasilkan nilai 11, untuk pembuktian coba hitung manual pada sheet
File-01 mulai cell A7 sampai A40, ada berapa cell yang tidak kosong?
============
bagian KeTiga, adalah nilai yang diambil jika kondisi terpenuhi,
OFFSET('File-
COLUMN()-1)
berhubung pengambilan nilai untuk kondisi terpenuhi dan tidak terpenuhi
logikanya sama, maka untuk yang diberi warna merah tidak Jan jelaskan lagi.
pada bagian ini pak Ghozi menggunakan fungsi OffSet, mari kita bahas maksud
dan tujuan penggunaan fungsi ini.
syntax OffSet adalah sebagai berikut:
=OffSet(cell_
, nomor_indeks_
tinggi_baris , lebar_kolom)
pada penggunaan fungsi OffSet kali ini oleh Pak Ghozi hanya memanfaatkan
Titik awall , nomer indeks baris , dan nomer indeks kolom saja, sedangkan
tinggi baris dan kolom yang bersifat opsional tidak digunakan karena hanya
nilai 1 cell yang diambil.
lihat yang diberi warna biru ('File-01'!$
atau titik nol, letaknya di sheet File-01 pada cell A6
untuk posisi barisnya diperoleh dari perhitungan antara sisa hasil
pembagian MOD , nilai baris setelah dikurangi dengan 1 yaitu Row(1:1)-1,
dengan jumlah data yang tidak kosong di sheet File-01 mulai cell A7 sampai
cell A40 COUNTA('File-
untuk posisi kolomnya diperoleh dari pengambilan nilai kolom setelah
dikurangi 1 COLUMN()-1
Untuk lebih mudah mengerti bagian keTiga dan keEmpat, coba pelajari cara
penggunaan fungsi OffSet di dalam lembar kerja
============
Bagian keEmpat adalah pengambilan nilai jika kondisi If tidak terpenuhi,
logika dan penjelasannya sama dengan bagian keTiga.
Semoga penjelasan ini dapat dimengerti dan dipahami, jika ada yang kurang
jelas silakan ditanyakan kembali.
cmiiw,
-Ms. Jan Raisin-
Pada 15 Desember 2012 11:43, Mulki <mulki@aop.component
> **
>
>
> **
> Dear Pak Ghozi ...
>
> Bisa bantu cara baca/penjelasan dari formula bapak dibawah ?
>
> Terimakasih atas pencerahannya
>
> Wassalam,
> mulki
>
>
> ----- Original Message -----
> *From:* ghozi alkatiri <ghozialkatiri@
> *To:* belajar-excel@
> *Sent:* Friday, December 14, 2012 5:17 PM
> *Subject:* Bls: [belajar-excel] Menggabungkan 2 Data absensi ke dalam 1
> File gabung absensi
>
>
>
> tulis formula pertama di A7
>
> =IF(ROW(1:1)
>
> copy ke kanan dan ke bawah
> pada cell berisi 0 (nol) dari tabel yang kosong dihilangkan dengan
> conditional formating opsi font no colour.
>
> selanjutnya lihat langsung di attachment sheet solusi
>
> wassalam
>
> Ghozi Alkatiri
>
> ------------
> *Dari:* Rachmad HIDAYAT <rachmad.hidayat@
> *Kepada:* "belajar-excel@
> *Dikirim:* Jumat, 14 Desember 2012 15:17
> *Judul:* [belajar-excel] Menggabungkan 2 Data absensi ke dalam 1 File
> gabung absensi
>
>
> Dear Pakar Bexcel,
> Saya punya case begini nih, mohon bisa dibantu ya..,
>
> - Saya punya dua atau lebih file Absensi dengan format tabel
> yang sama, namun nama data nama,materi, absensi berbeda. (dalam case ini
> saya jadikan satu file saja, tapi faktanya ada 3 file xlsx, FILE-01.xlxs(
> Sheet File-01),FILE-
> data File-01dan File02)
> - Setiap akhir pekan saya pingin mengetahui berapa total
> keseluruhan yang hadir(H), tidak hadir(X)dari orang-orang tersebut
> - Ohya,Data orang bisa bertambah jadi nanti secara otomatis akan
> tergabung juga di file gabung
> - Bagaimana cara menggabungkan 2 file ini menjadi satu file
> gabungan ya ?
>
> Lebih jelasnya bisa di lihat di lampiran Saya cob pake concolidate, namun
> masih bingung cara pake dan error
> Terim kasih atas bantuan nya ya
>
> Terima Kasih,
> Rachmad Hidayat
> Inspection Method
> 3487
>
>
>
>
>
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
---------------------------------------------------------------------
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