15 New Messages
Digest #2286
7b
Bls: [belajar-excel] Otomatis muncul text pada kolom saat input data by "ghozi alkatiri" ghozialkatiri
Messages
Tue May 7, 2013 11:49 pm (PDT) . Posted by:
"Prodev SIMPLE PB" prodev_simple
Assalamu'alaikum Wr. Wb.
Terima kasih banyak Mr. Kid atas solusinya.
Kebingungan terjadi ketika harus memasukkan beberapa parameter batasan dalam sebuah fungsi rumus.
Alhamdulillah sudah tertolong dengan formulasi yang dituliskan oleh Mr. Kid.
Insya Alloh bermanfaat, semoga menjadi amal sholeh. Aamiin.
Wassalamu'alaikum Wr. Wb.
- prodev simple -
________________________________
Dari: Mr. Kid <mr.nmkid@gmail.com >
Kepada: BeExcel <belajar-excel@yahoogroups.com >
Dikirim: Selasa, 7 Mei 2013 22:38
Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
Wa'alaikumussalam Wr. Wb.
Jam pulang lebih awal :
>> xl2007 ke atas :
=COUNTIFS($B$5:$B$10,$D$13,$D$5:$D$10,"<"&$D$15)+COUNTIFS($B$5:$B$10,"<>"&$D$13,$D$5:$D$10,"<"&$C$15)
>> semua versi : (silakan disederhanakan)
=SUMPRODUCT(($B$5:$B$10=$D$13)*($D$5:$D$10<$D$15)*($D$5:$D$10>0))+SUMPRODUCT(($B$5:$B$10<>$D$13)*($D$5:$D$10<$C$15)*($D$5:$D$10>0))
File terlampir.
Wassalamu'alaikum Wr. Wb.
Kid.
2013/5/7 Prodev SIMPLE PB <prodev_simple@yahoo.com >
>
>Assalamu'alaikum Wr. Wb.
>
>
>Maaf, ada yang tertinggal....ada satu kendala lagi.
>Yaitu menggabungkan data yang memiliki 2 (dua) batasan yang berbeda.
>Penjelasan dalam lampiran file (blok warna kuning)
>
>
>
>Atas penjelasannya disampaikan terima kasih.
>Wassalam.
>
>- prodev simple -
>
>
>
>________________________________
> Dari: Mr. Kid <mr.nmkid@gmail.com >
>Kepada: BeExcel <belajar-excel@yahoogroups.com >
>Dikirim: Selasa, 7 Mei 2013 1:18
>Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
>
>
>Wa'alaikumussalam Wr. Wb.
>
>1. Menghitung cacah dengan 1 kriteria dapat memanfaatkan CountIF.
> =CountIF( range_data , ">" & suatu_nilai ) artinya hitung cacah data di range_data yang nilainya lebih dari suatu_nilai.
>
>2. Data bertipe datetime selalu positif. Kalkulasi durasi sesuatu adalah selisih dari nilai akhir dengan nilai awal. Karena nilai akhir dapat kurang dari nilai awal, maka durasi ditampilkan sebagai nilai absolute. Untuk membedakan kondisi antara durasi surut (nilai akhir < nilai awal) dengan kondisi maju (nilai akhir > nilai awal), maka tanda + untuk maju atau - untuk surut ditampilkan dengan fungsi IF dan nilai durasi diubah tipedatanya menjadi text.
> =IF( nilai_akhir < nilai_awal , "-" , " " ) & Text( Abs( nilai_akhir - nilai_awal ) , "[hh]:mm" )
>
>Pemberian tanda spasi untuk kondisi nilai_akhir >= nilai_awal ditujukan untuk memelihara konsistensi data bahwa karakter pertama adalah sebuah tanda (surut atau maju) dan karakter berikutnya adalah menunjukkan durasi waktu terjadinya keadaan yang diwakili oleh tanda tersebut.
>
>
>3. Pengubahan rentang waktu per hari pada suatu data durasi bertipe datetime bisa dikalkulasi dengan susunan formula
>
> =Int( durasi / rentang ) + Mod( durasi , rentang )
>bahasa manusianya :
>
>"Hitung jumlah hari dari suatu nilai durasi (bertipe datetime) menurut hitungan setiap hari senilai sebanyak rentang jam [Int( durasi / rentang )] ditambahkan dengan sisa bagi durasi dengan rentang jam [Mod( durasi , rentang )]"
>
>
>Ketika durasi memiliki kemungkinan berarti surut (negatif), maka hasil akhir diubah menjadi bertipe text seperti nomor 2.
>
>
>Wassalam,
>
>Kid.
>
>
>
>
>
>
>
>
>
>
>
>2013/5/6 Prodev SIMPLE PB <prodev_simple@yahoo.com >
>
>
>>
>>Assalamu'alaikum Wr. Wb.
>>
>>
>>Dear Para Master,
>>Mohon pencerahan atas kasus 'sederhana' berikut :)
>>Sebagaimana file terlampir.
>>Atas perhatiannya dan solusinya disampaikan terima kasih.
>>
>>
>>Wassalam.
>>
>>- prodev simple -
>>
>
>
>
Terima kasih banyak Mr. Kid atas solusinya.
Kebingungan terjadi ketika harus memasukkan beberapa parameter batasan dalam sebuah fungsi rumus.
Alhamdulillah sudah tertolong dengan formulasi yang dituliskan oleh Mr. Kid.
Insya Alloh bermanfaat, semoga menjadi amal sholeh. Aamiin.
Wassalamu'
- prodev simple -
____________
Dari: Mr. Kid <mr.nmkid@gmail.
Kepada: BeExcel <belajar-excel@
Dikirim: Selasa, 7 Mei 2013 22:38
Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
Wa'alaikumussal
Jam pulang lebih awal :
>> xl2007 ke atas :
=COUNTIFS($B$
>> semua versi : (silakan disederhanakan)
=SUMPRODUCT(
File terlampir.
Wassalamu'
Kid.
2013/5/7 Prodev SIMPLE PB <prodev_simple@
>
>Assalamu&#
>
>
>Maaf, ada yang tertinggal..
>Yaitu menggabungkan data yang memiliki 2 (dua) batasan yang berbeda.
>Penjelasan dalam lampiran file (blok warna kuning)
>
>
>
>Atas penjelasannya disampaikan terima kasih.
>Wassalam.
>
>- prodev simple -
>
>
>
>________
> Dari: Mr. Kid <mr.nmkid@gmail.
>Kepada: BeExcel <belajar-excel@
>Dikirim: Selasa, 7 Mei 2013 1:18
>Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
>
>
>Wa'alaikumu
>
>1. Menghitung cacah dengan 1 kriteria dapat memanfaatkan CountIF.
> =CountIF( range_data , ">" & suatu_nilai ) artinya hitung cacah data di range_data yang nilainya lebih dari suatu_nilai.
>
>2. Data bertipe datetime selalu positif. Kalkulasi durasi sesuatu adalah selisih dari nilai akhir dengan nilai awal. Karena nilai akhir dapat kurang dari nilai awal, maka durasi ditampilkan sebagai nilai absolute. Untuk membedakan kondisi antara durasi surut (nilai akhir < nilai awal) dengan kondisi maju (nilai akhir > nilai awal), maka tanda + untuk maju atau - untuk surut ditampilkan dengan fungsi IF dan nilai durasi diubah tipedatanya menjadi text.
> =IF( nilai_akhir < nilai_awal , "-" , " " ) & Text( Abs( nilai_akhir - nilai_awal ) , "[hh]:mm" )
>
>Pemberian tanda spasi untuk kondisi nilai_akhir >= nilai_awal ditujukan untuk memelihara konsistensi data bahwa karakter pertama adalah sebuah tanda (surut atau maju) dan karakter berikutnya adalah menunjukkan durasi waktu terjadinya keadaan yang diwakili oleh tanda tersebut.
>
>
>3. Pengubahan rentang waktu per hari pada suatu data durasi bertipe datetime bisa dikalkulasi dengan susunan formula
>
> =Int( durasi / rentang ) + Mod( durasi , rentang )
>bahasa manusianya :
>
>"Hitung jumlah hari dari suatu nilai durasi (bertipe datetime) menurut hitungan setiap hari senilai sebanyak rentang jam [Int( durasi / rentang )] ditambahkan dengan sisa bagi durasi dengan rentang jam [Mod( durasi , rentang )]"
>
>
>Ketika durasi memiliki kemungkinan berarti surut (negatif), maka hasil akhir diubah menjadi bertipe text seperti nomor 2.
>
>
>Wassalam,
>
>Kid.
>
>
>
>
>
>
>
>
>
>
>
>2013/5/6 Prodev SIMPLE PB <prodev_simple@
>
>
>>
>>Assalamu&#
>>
>>
>>Dear Para Master,
>>Mohon pencerahan atas kasus 'sederhana&#
>>Sebagaimana file terlampir.
>>Atas perhatiannya dan solusinya disampaikan terima kasih.
>>
>>
>>Wassalam.
>>
>>- prodev simple -
>>
>
>
>
Tue May 7, 2013 11:51 pm (PDT) . Posted by:
"Prodev SIMPLE PB" prodev_simple
Assalamu'alaikum Wr. Wb.
Maaf Mr. Kid dan member yang lain...
Masih ada yang 'mengganjal' nih :) --"maaf kalau banyak nanya"
Ada sedikit kekurang pas-an ketika di kolom 'Selisih jam kerja bulan ini' yang masih menggunakan batasan durasi jam kerja adalah 7 jam (7:00)
karena untuk hari Sabtu, batasan jam kerja hanya 5 jam kerja - 1 jam istirahat = 4 jam (4:00)
Kira2 bagaimana rumus untuk menggabungkannya pada kolom 'Selisih jam kerja bulan ini' agar hasilnya tepat.
Rumus sebelumnya :
=IF($R$25<"7:00"*$R$24;"-";" ")&TEXT(ABS(INT(($R$25-"7:00"*$R$24)/"7:00")+MOD($R$25-"7:00"*$R$24;"7:00"));"d ""hari"" hh:mm")
Terima kasih buanyaaak atas penjelasannya.
Wassalamu'alaikum Wr. Wb.
- prodev simple -
________________________________
Dari: Mr. Kid <mr.nmkid@gmail.com >
Kepada: BeExcel <belajar-excel@yahoogroups.com >
Dikirim: Selasa, 7 Mei 2013 22:38
Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
Wa'alaikumussalam Wr. Wb.
Jam pulang lebih awal :
>> xl2007 ke atas :
=COUNTIFS($B$5:$B$10,$D$13,$D$5:$D$10,"<"&$D$15)+COUNTIFS($B$5:$B$10,"<>"&$D$13,$D$5:$D$10,"<"&$C$15)
>> semua versi : (silakan disederhanakan)
=SUMPRODUCT(($B$5:$B$10=$D$13)*($D$5:$D$10<$D$15)*($D$5:$D$10>0))+SUMPRODUCT(($B$5:$B$10<>$D$13)*($D$5:$D$10<$C$15)*($D$5:$D$10>0))
File terlampir.
Wassalamu'alaikum Wr. Wb.
Kid.
2013/5/7 Prodev SIMPLE PB <prodev_simple@yahoo.com >
>
>Assalamu'alaikum Wr. Wb.
>
>
>Maaf, ada yang tertinggal....ada satu kendala lagi.
>Yaitu menggabungkan data yang memiliki 2 (dua) batasan yang berbeda.
>Penjelasan dalam lampiran file (blok warna kuning)
>
>
>
>Atas penjelasannya disampaikan terima kasih.
>Wassalam.
>
>- prodev simple -
>
>
>
>________________________________
> Dari: Mr. Kid <mr.nmkid@gmail.com >
>Kepada: BeExcel <belajar-excel@yahoogroups.com >
>Dikirim: Selasa, 7 Mei 2013 1:18
>Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
>
>
>Wa'alaikumussalam Wr. Wb.
>
>1. Menghitung cacah dengan 1 kriteria dapat memanfaatkan CountIF.
> =CountIF( range_data , ">" & suatu_nilai ) artinya hitung cacah data di range_data yang nilainya lebih dari suatu_nilai.
>
>2. Data bertipe datetime selalu positif. Kalkulasi durasi sesuatu adalah selisih dari nilai akhir dengan nilai awal. Karena nilai akhir dapat kurang dari nilai awal, maka durasi ditampilkan sebagai nilai absolute. Untuk membedakan kondisi antara durasi surut (nilai akhir < nilai awal) dengan kondisi maju (nilai akhir > nilai awal), maka tanda + untuk maju atau - untuk surut ditampilkan dengan fungsi IF dan nilai durasi diubah tipedatanya menjadi text.
> =IF( nilai_akhir < nilai_awal , "-" , " " ) & Text( Abs( nilai_akhir - nilai_awal ) , "[hh]:mm" )
>
>Pemberian tanda spasi untuk kondisi nilai_akhir >= nilai_awal ditujukan untuk memelihara konsistensi data bahwa karakter pertama adalah sebuah tanda (surut atau maju) dan karakter berikutnya adalah menunjukkan durasi waktu terjadinya keadaan yang diwakili oleh tanda tersebut.
>
>
>3. Pengubahan rentang waktu per hari pada suatu data durasi bertipe datetime bisa dikalkulasi dengan susunan formula
>
> =Int( durasi / rentang ) + Mod( durasi , rentang )
>bahasa manusianya :
>
>"Hitung jumlah hari dari suatu nilai durasi (bertipe datetime) menurut hitungan setiap hari senilai sebanyak rentang jam [Int( durasi / rentang )] ditambahkan dengan sisa bagi durasi dengan rentang jam [Mod( durasi , rentang )]"
>
>
>Ketika durasi memiliki kemungkinan berarti surut (negatif), maka hasil akhir diubah menjadi bertipe text seperti nomor 2.
>
>
>Wassalam,
>
>Kid.
>
>
>
>
>
>
>
>
>
>
>
>2013/5/6 Prodev SIMPLE PB <prodev_simple@yahoo.com >
>
>
>>
>>Assalamu'alaikum Wr. Wb.
>>
>>
>>Dear Para Master,
>>Mohon pencerahan atas kasus 'sederhana' berikut :)
>>Sebagaimana file terlampir.
>>Atas perhatiannya dan solusinya disampaikan terima kasih.
>>
>>
>>Wassalam.
>>
>>- prodev simple -
>>
>
>
>
Maaf Mr. Kid dan member yang lain...
Masih ada yang 'mengganjal&#
Ada sedikit kekurang pas-an ketika di kolom 'Selisih jam kerja bulan ini' yang masih menggunakan batasan durasi jam kerja adalah 7 jam (7:00)
karena untuk hari Sabtu, batasan jam kerja hanya 5 jam kerja - 1 jam istirahat = 4 jam (4:00)
Kira2 bagaimana rumus untuk menggabungkannya pada kolom 'Selisih jam kerja bulan ini' agar hasilnya tepat.
Rumus sebelumnya :
=IF($R$25<
Terima kasih buanyaaak atas penjelasannya.
Wassalamu'
- prodev simple -
____________
Dari: Mr. Kid <mr.nmkid@gmail.
Kepada: BeExcel <belajar-excel@
Dikirim: Selasa, 7 Mei 2013 22:38
Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
Wa'alaikumussal
Jam pulang lebih awal :
>> xl2007 ke atas :
=COUNTIFS($B$
>> semua versi : (silakan disederhanakan)
=SUMPRODUCT(
File terlampir.
Wassalamu'
Kid.
2013/5/7 Prodev SIMPLE PB <prodev_simple@
>
>Assalamu&#
>
>
>Maaf, ada yang tertinggal..
>Yaitu menggabungkan data yang memiliki 2 (dua) batasan yang berbeda.
>Penjelasan dalam lampiran file (blok warna kuning)
>
>
>
>Atas penjelasannya disampaikan terima kasih.
>Wassalam.
>
>- prodev simple -
>
>
>
>________
> Dari: Mr. Kid <mr.nmkid@gmail.
>Kepada: BeExcel <belajar-excel@
>Dikirim: Selasa, 7 Mei 2013 1:18
>Judul: Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
>
>
>Wa'alaikumu
>
>1. Menghitung cacah dengan 1 kriteria dapat memanfaatkan CountIF.
> =CountIF( range_data , ">" & suatu_nilai ) artinya hitung cacah data di range_data yang nilainya lebih dari suatu_nilai.
>
>2. Data bertipe datetime selalu positif. Kalkulasi durasi sesuatu adalah selisih dari nilai akhir dengan nilai awal. Karena nilai akhir dapat kurang dari nilai awal, maka durasi ditampilkan sebagai nilai absolute. Untuk membedakan kondisi antara durasi surut (nilai akhir < nilai awal) dengan kondisi maju (nilai akhir > nilai awal), maka tanda + untuk maju atau - untuk surut ditampilkan dengan fungsi IF dan nilai durasi diubah tipedatanya menjadi text.
> =IF( nilai_akhir < nilai_awal , "-" , " " ) & Text( Abs( nilai_akhir - nilai_awal ) , "[hh]:mm" )
>
>Pemberian tanda spasi untuk kondisi nilai_akhir >= nilai_awal ditujukan untuk memelihara konsistensi data bahwa karakter pertama adalah sebuah tanda (surut atau maju) dan karakter berikutnya adalah menunjukkan durasi waktu terjadinya keadaan yang diwakili oleh tanda tersebut.
>
>
>3. Pengubahan rentang waktu per hari pada suatu data durasi bertipe datetime bisa dikalkulasi dengan susunan formula
>
> =Int( durasi / rentang ) + Mod( durasi , rentang )
>bahasa manusianya :
>
>"Hitung jumlah hari dari suatu nilai durasi (bertipe datetime) menurut hitungan setiap hari senilai sebanyak rentang jam [Int( durasi / rentang )] ditambahkan dengan sisa bagi durasi dengan rentang jam [Mod( durasi , rentang )]"
>
>
>Ketika durasi memiliki kemungkinan berarti surut (negatif), maka hasil akhir diubah menjadi bertipe text seperti nomor 2.
>
>
>Wassalam,
>
>Kid.
>
>
>
>
>
>
>
>
>
>
>
>2013/5/6 Prodev SIMPLE PB <prodev_simple@
>
>
>>
>>Assalamu&#
>>
>>
>>Dear Para Master,
>>Mohon pencerahan atas kasus 'sederhana&#
>>Sebagaimana file terlampir.
>>Atas perhatiannya dan solusinya disampaikan terima kasih.
>>
>>
>>Wassalam.
>>
>>- prodev simple -
>>
>
>
>
Wed May 8, 2013 4:03 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam Wr. Wb.
File terlampir menggunakan cells bantu penentu batas awal pekan pertama dan
batas akhir pekan terakhir untuk menghitung jumlah hari sabtu dan selain
sabtu agar bisa menentukan jumlah jam kerja total.
Wassalamu'alaikum Wr. Wb.
Kid.
2013/5/8 Prodev SIMPLE PB <prodev_simple@yahoo.com >
> **
>
>
> Assalamu'alaikum Wr. Wb.
>
> Maaf Mr. Kid dan member yang lain...
> Masih ada yang 'mengganjal' nih :) --"maaf kalau banyak nanya"
> Ada sedikit kekurang pas-an ketika di kolom 'Selisih jam kerja bulan ini'
> yang masih menggunakan batasan durasi jam kerja adalah 7 jam (7:00)
> karena untuk hari Sabtu, batasan jam kerja hanya 5 jam kerja - 1 jam
> istirahat = 4 jam (4:00)
>
> Kira2 bagaimana rumus untuk menggabungkannya pada kolom 'Selisih jam kerja
> bulan ini' agar hasilnya tepat.
> Rumus sebelumnya :
> =IF($R$25<"7:00"*$R$24;"-";"
> ")&TEXT(ABS(INT(($R$25-"7:00"*$R$24)/"7:00")+MOD($R$25-"7:00"*$R$24;"7:00"));"d
> ""hari"" hh:mm")
>
> Terima kasih buanyaaak atas penjelasannya.
>
> Wassalamu'alaikum Wr. Wb.
>
> - prodev simple -
>
> ------------------------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.com >
> *Kepada:* BeExcel <belajar-excel@yahoogroups.com >
> *Dikirim:* Selasa, 7 Mei 2013 22:38
>
> *Judul:* Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
> Wa'alaikumussalam Wr. Wb.
>
> Jam pulang lebih awal :
> >> xl2007 ke atas :
>
> =COUNTIFS($B$5:$B$10,$D$13,$D$5:$D$10,"<"&$D$15)+COUNTIFS($B$5:$B$10,"<>"&$D$13,$D$5:$D$10,"<"&$C$15)
>
> >> semua versi : (silakan disederhanakan)
>
> =SUMPRODUCT(($B$5:$B$10=$D$13)*($D$5:$D$10<$D$15)*($D$5:$D$10>0))+SUMPRODUCT(($B$5:$B$10<>$D$13)*($D$5:$D$10<$C$15)*($D$5:$D$10>0))
>
> File terlampir.
>
> Wassalamu'alaikum Wr. Wb.
> Kid.
>
>
>
>
>
> 2013/5/7 Prodev SIMPLE PB <prodev_simple@yahoo.com >
>
> **
>
> Assalamu'alaikum Wr. Wb.
>
> Maaf, ada yang tertinggal....ada satu kendala lagi.
> Yaitu menggabungkan data yang memiliki 2 (dua) batasan yang berbeda.
> Penjelasan dalam lampiran file (blok warna kuning)
>
> Atas penjelasannya disampaikan terima kasih.
> Wassalam.
> - prodev simple -
>
> ------------------------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.com >
> *Kepada:* BeExcel <belajar-excel@yahoogroups.com >
> *Dikirim:* Selasa, 7 Mei 2013 1:18
> *Judul:* Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
> Wa'alaikumussalam Wr. Wb.
>
> 1. Menghitung cacah dengan 1 kriteria dapat memanfaatkan CountIF.
> =CountIF( range_data , ">" & suatu_nilai ) artinya hitung cacah data
> di range_data yang nilainya lebih dari suatu_nilai.
>
> 2. Data bertipe datetime selalu positif. Kalkulasi durasi sesuatu adalah
> selisih dari nilai akhir dengan nilai awal. Karena nilai akhir dapat kurang
> dari nilai awal, maka durasi ditampilkan sebagai nilai absolute. Untuk
> membedakan kondisi antara durasi surut (nilai akhir < nilai awal) dengan
> kondisi maju (nilai akhir > nilai awal), maka tanda + untuk maju atau -
> untuk surut ditampilkan dengan fungsi IF dan nilai durasi diubah
> tipedatanya menjadi text.
> =IF( nilai_akhir < nilai_awal , "-" , " " ) & Text( Abs( nilai_akhir
> - nilai_awal ) , "[hh]:mm" )
> Pemberian tanda spasi untuk kondisi nilai_akhir >= nilai_awal ditujukan
> untuk memelihara konsistensi data bahwa karakter pertama adalah sebuah
> tanda (surut atau maju) dan karakter berikutnya adalah menunjukkan durasi
> waktu terjadinya keadaan yang diwakili oleh tanda tersebut.
>
> 3. Pengubahan rentang waktu per hari pada suatu data durasi bertipe
> datetime bisa dikalkulasi dengan susunan formula
> =*Int*( *durasi */ *rentang *) + Mod( *durasi *, *rentang *)
> bahasa manusianya :
> "Hitung *jumlah hari* dari suatu nilai *durasi *(bertipe datetime)
> menurut hitungan setiap hari senilai sebanyak *rentang *jam [*Int*( *durasi
> */ *rentang *)] ditambahkan dengan sisa bagi *durasi *dengan *rentang *jam
> [Mod( *durasi *, *rentang *)]"
>
> Ketika durasi memiliki kemungkinan berarti surut (negatif), maka hasil
> akhir diubah menjadi bertipe text seperti nomor 2.
>
> Wassalam,
> Kid.
>
>
>
>
>
>
>
> 2013/5/6 Prodev SIMPLE PB <prodev_simple@yahoo.com >
>
> **
>
> Assalamu'alaikum Wr. Wb.
>
> Dear Para Master,
> Mohon pencerahan atas kasus 'sederhana' berikut :)
> Sebagaimana file terlampir.
> Atas perhatiannya dan solusinya disampaikan terima kasih.
>
> Wassalam.
>
> - prodev simple -
>
>
>
>
>
>
>
>
>
File terlampir menggunakan cells bantu penentu batas awal pekan pertama dan
batas akhir pekan terakhir untuk menghitung jumlah hari sabtu dan selain
sabtu agar bisa menentukan jumlah jam kerja total.
Wassalamu'
Kid.
2013/5/8 Prodev SIMPLE PB <prodev_simple@
> **
>
>
> Assalamu'
>
> Maaf Mr. Kid dan member yang lain...
> Masih ada yang 'mengganjal&#
> Ada sedikit kekurang pas-an ketika di kolom 'Selisih jam kerja bulan ini'
> yang masih menggunakan batasan durasi jam kerja adalah 7 jam (7:00)
> karena untuk hari Sabtu, batasan jam kerja hanya 5 jam kerja - 1 jam
> istirahat = 4 jam (4:00)
>
> Kira2 bagaimana rumus untuk menggabungkannya pada kolom 'Selisih jam kerja
> bulan ini' agar hasilnya tepat.
> Rumus sebelumnya :
> =IF($R$25<
> ")&TEXT(
> ""
>
> Terima kasih buanyaaak atas penjelasannya.
>
> Wassalamu'
>
> - prodev simple -
>
> ------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.
> *Kepada:* BeExcel <belajar-excel@
> *Dikirim:* Selasa, 7 Mei 2013 22:38
>
> *Judul:* Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
> Wa'alaikumussal
>
> Jam pulang lebih awal :
> >> xl2007 ke atas :
>
> =COUNTIFS($B$
>
> >> semua versi : (silakan disederhanakan)
>
> =SUMPRODUCT(
>
> File terlampir.
>
> Wassalamu'
> Kid.
>
>
>
>
>
> 2013/5/7 Prodev SIMPLE PB <prodev_simple@
>
> **
>
> Assalamu'
>
> Maaf, ada yang tertinggal..
> Yaitu menggabungkan data yang memiliki 2 (dua) batasan yang berbeda.
> Penjelasan dalam lampiran file (blok warna kuning)
>
> Atas penjelasannya disampaikan terima kasih.
> Wassalam.
> - prodev simple -
>
> ------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.
> *Kepada:* BeExcel <belajar-excel@
> *Dikirim:* Selasa, 7 Mei 2013 1:18
> *Judul:* Re: [belajar-excel] Menghitung Statistik Jam Kerja
>
>
> Wa'alaikumussal
>
> 1. Menghitung cacah dengan 1 kriteria dapat memanfaatkan CountIF.
> =CountIF( range_data , ">" & suatu_nilai ) artinya hitung cacah data
> di range_data yang nilainya lebih dari suatu_nilai.
>
> 2. Data bertipe datetime selalu positif. Kalkulasi durasi sesuatu adalah
> selisih dari nilai akhir dengan nilai awal. Karena nilai akhir dapat kurang
> dari nilai awal, maka durasi ditampilkan sebagai nilai absolute. Untuk
> membedakan kondisi antara durasi surut (nilai akhir < nilai awal) dengan
> kondisi maju (nilai akhir > nilai awal), maka tanda + untuk maju atau -
> untuk surut ditampilkan dengan fungsi IF dan nilai durasi diubah
> tipedatanya menjadi text.
> =IF( nilai_akhir < nilai_awal , "-" , " " ) & Text( Abs( nilai_akhir
> - nilai_awal ) , "[hh]:mm" )
> Pemberian tanda spasi untuk kondisi nilai_akhir >= nilai_awal ditujukan
> untuk memelihara konsistensi data bahwa karakter pertama adalah sebuah
> tanda (surut atau maju) dan karakter berikutnya adalah menunjukkan durasi
> waktu terjadinya keadaan yang diwakili oleh tanda tersebut.
>
> 3. Pengubahan rentang waktu per hari pada suatu data durasi bertipe
> datetime bisa dikalkulasi dengan susunan formula
> =*Int*( *durasi */ *rentang *) + Mod( *durasi *, *rentang *)
> bahasa manusianya :
> "Hitung *jumlah hari* dari suatu nilai *durasi *(bertipe datetime)
> menurut hitungan setiap hari senilai sebanyak *rentang *jam [*Int*( *durasi
> */ *rentang *)] ditambahkan dengan sisa bagi *durasi *dengan *rentang *jam
> [Mod( *durasi *, *rentang *)]"
>
> Ketika durasi memiliki kemungkinan berarti surut (negatif), maka hasil
> akhir diubah menjadi bertipe text seperti nomor 2.
>
> Wassalam,
> Kid.
>
>
>
>
>
>
>
> 2013/5/6 Prodev SIMPLE PB <prodev_simple@
>
> **
>
> Assalamu'
>
> Dear Para Master,
> Mohon pencerahan atas kasus 'sederhana&#
> Sebagaimana file terlampir.
> Atas perhatiannya dan solusinya disampaikan terima kasih.
>
> Wassalam.
>
> - prodev simple -
>
>
>
>
>
>
>
>
>
Tue May 7, 2013 11:52 pm (PDT) . Posted by:
"Andi Saputra" aspo_cm
master, saya mau merubah menit pada kolom B kurang 7 menit pada kolom D
mohon bantuan nya master-master sekalian
mohon bantuan nya master-master sekalian
Wed May 8, 2013 12:49 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Coba formula :
=cell_jam_yang_akan_dikurangi + ( - nilai_pengurang ) / 1440
Misal A2 berisi data waktu yang akan dikurangi dan B2 berisi angka
pengurang yang berupa angka negatif
C2 diisi dengan :
=A2 + (B2)/1440
karena B2 sudah diisi angka negatif
Jika A3 berisi data time dan B3 berisi bilangan positif, maka
C3 diisi formula :
=A3 + (-B2)/1440
atau disederhanakan menjadi :
=A3 - B2/1440
Angka 1440 adalah jumlah menit dalam 24 jam (1 hari atau 1 bilangan bulat)
Wassalam,
Kid.
2013/5/8 Andi Saputra <aspo.cm@gmail.com >
> **
>
>
> master, saya mau merubah menit pada kolom B kurang 7 menit pada kolom D
> mohon bantuan nya master-master sekalian
>
>
>
=cell_jam_yang_
Misal A2 berisi data waktu yang akan dikurangi dan B2 berisi angka
pengurang yang berupa angka negatif
C2 diisi dengan :
=A2 + (B2)/1440
karena B2 sudah diisi angka negatif
Jika A3 berisi data time dan B3 berisi bilangan positif, maka
C3 diisi formula :
=A3 + (-B2)/1440
atau disederhanakan menjadi :
=A3 - B2/1440
Angka 1440 adalah jumlah menit dalam 24 jam (1 hari atau 1 bilangan bulat)
Wassalam,
Kid.
2013/5/8 Andi Saputra <aspo.cm@gmail.
> **
>
>
> master, saya mau merubah menit pada kolom B kurang 7 menit pada kolom D
> mohon bantuan nya master-master sekalian
>
>
>
Tue May 7, 2013 11:54 pm (PDT) . Posted by:
"aji mumpung"
Hai Krisan,
coba begini, drag field Bank Statement ke kotak Row Labels dan lihat apakah
sudah sesuai dengan keinginan anda atau belum.
Jika belum coba juga pindah-pindahkan ke kotak yang lain
Atau jika ingin melakukan filter, maka masukkan field kriteria ke dalam
kotak Report Filter
Jangan takut mencoba, dan amati setiap perubahan yang terjadi maka akan
anda dapatkan pemahaman yang lebih dalam.
Wassalam,
-Aji Mumpung-
Pada 8 Mei 2013 10.21, Krisan Flower <krisan_flower@rocketmail.com > menulis:
> Dear aji mumpung,
> salam kenal
>
> saya telah melakukan cara tersebut, yang td sama saja dengan menggunakan
> rumus sumif apabila dengan kriteria tertentu. tetapi apabila data yg di
> sort berdasarkan bank statement. semisal saya ingin mengesort untuk bank
> statement bca 3000 saya ingin mencari data BCA masternya berapa dan BCA
> visanya berapa begitu juga dengan yang lainnya. data aslinya sangat banyak.
> apakah ada cara lain, saya sidikit kebingungan mohon bantuannya.
> terimakasih
>
> Salam
>
> Krisan
>
>
>
> ------------------------------
> *Dari:* aji mumpung <pupung1986@gmail.com >
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Rabu, 8 Mei 2013 10:41
>
> *Judul:* Re: [belajar-excel] SUMIF UNTUK TABEL YANG TELAH DI SORT
>
>
> Hai Krosan,
>
> kasus ini mirip dengan kasus saudara Ambo, coba manfaatkan fitur
> PivotTable-nya Excel dengan langkah-langkah sbb:
> 1. Blok seluruh data mulai header sampai baris data terakhir
> [image: Gambar sisip 1]
> 2. pada ribbon, pilih Insert lalu cari tab Pivot Table
> [image: Gambar sisip 2]
>
> 3. Pastikan lokasi source data telah sesuai dan pilih lokasi penmpatan
> PivotTabel, kira-kira seperti ini:
> [image: Gambar sisip 4]
>
> 4. Klik OK, sehingga muncul dialog box seperti ini:
> [image: Gambar sisip 5]
>
> 5. Drag field TRX DESC ke kotak Column Labels
> 6. drag filed INVOICE AMOUNT ke kotak Values
>
> perhatikan setiap perubahan yang terjadi.
> Silakan dicoba juga untuk memindahkan ke kotak yang lain dan jangan takut
> jika salah, karena pasti akan selalu ada ilmu baru yang anda peroleh.
>
> Wassalam,
>
> -Aji Mumpung-
>
>
> Pada 8 Mei 2013 09.17, Krisan Flower <krisan_flower@rocketmail.com >menulis:
>
> **
>
> Dear, Mr Kid
>
> Berikut saya lampirkan datanya, silahkan lihat di file attachment
> Mohon bantuanya MR Kid.
>
> Salam
> Krisan
>
>
> ------------------------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.com >
> *Kepada:* BeExcel <belajar-excel@yahoogroups.com >
> *Dikirim:* Rabu, 8 Mei 2013 0:02
> *Judul:* Re: [belajar-excel] SUMIF UNTUK TABEL YANG TELAH DI SORT
>
>
> Hai Krisan,
>
> Coba lampirkan contoh datanya.
> Caranya :
> Lakukan posting ke milis (buka topik baru atau reply email dari milis yang
> ada di Inbox) dari akun milis yang Anda daftarkan ke milis, layaknya Anda
> mengirim email ke rekan kerja sehari-hari.
>
> Alamat email milis yang menjadi tujuan (To) saat membuat email (compose
> email) adalah :
> belajar-excel@yahoogroups.com
>
> Ukuran file maksimal sesuai peraturan milis adalah 250KB, untuk memastikan
> bahwa data tersebut adalah contoh data dan bukan data kerja asli yang bisa
> jadi sebenarnya data yang bersifat rahasia.
>
> Wassalam,
> Kid.
>
>
>
>
> 2013/5/7 Krisan Flower <krisan_flower@rocketmail.com >
>
> **
>
> Dear temen2 be exceller,
>
> saya mendapatkan kesulitan untuk menjumlahkan dengan kriteria tertentu,
> tetapi tabel telah dilakukan sort.
> saya pake rumus sumif tp bagaimana caranya agar data yg dijumlahkan adalah
> data yg telah di sort saja.
>
> Mohon bantuannya temen2 saya sangat kesulitan saya sudah mencoba dengan
> subtotal tp kok tidak bisa.
> terimakasih sebelumnya
>
>
>
> Salam
> Krisan
>
>
>
>
>
>
>
>
coba begini, drag field Bank Statement ke kotak Row Labels dan lihat apakah
sudah sesuai dengan keinginan anda atau belum.
Jika belum coba juga pindah-pindahkan ke kotak yang lain
Atau jika ingin melakukan filter, maka masukkan field kriteria ke dalam
kotak Report Filter
Jangan takut mencoba, dan amati setiap perubahan yang terjadi maka akan
anda dapatkan pemahaman yang lebih dalam.
Wassalam,
-Aji Mumpung-
Pada 8 Mei 2013 10.21, Krisan Flower <krisan_flower@
> Dear aji mumpung,
> salam kenal
>
> saya telah melakukan cara tersebut, yang td sama saja dengan menggunakan
> rumus sumif apabila dengan kriteria tertentu. tetapi apabila data yg di
> sort berdasarkan bank statement. semisal saya ingin mengesort untuk bank
> statement bca 3000 saya ingin mencari data BCA masternya berapa dan BCA
> visanya berapa begitu juga dengan yang lainnya. data aslinya sangat banyak.
> apakah ada cara lain, saya sidikit kebingungan mohon bantuannya.
> terimakasih
>
> Salam
>
> Krisan
>
>
>
> ------------
> *Dari:* aji mumpung <pupung1986@gmail.
> *Kepada:* belajar-excel@
> *Dikirim:* Rabu, 8 Mei 2013 10:41
>
> *Judul:* Re: [belajar-excel] SUMIF UNTUK TABEL YANG TELAH DI SORT
>
>
> Hai Krosan,
>
> kasus ini mirip dengan kasus saudara Ambo, coba manfaatkan fitur
> PivotTable-nya Excel dengan langkah-langkah sbb:
> 1. Blok seluruh data mulai header sampai baris data terakhir
> [image: Gambar sisip 1]
> 2. pada ribbon, pilih Insert lalu cari tab Pivot Table
> [image: Gambar sisip 2]
>
> 3. Pastikan lokasi source data telah sesuai dan pilih lokasi penmpatan
> PivotTabel, kira-kira seperti ini:
> [image: Gambar sisip 4]
>
> 4. Klik OK, sehingga muncul dialog box seperti ini:
> [image: Gambar sisip 5]
>
> 5. Drag field TRX DESC ke kotak Column Labels
> 6. drag filed INVOICE AMOUNT ke kotak Values
>
> perhatikan setiap perubahan yang terjadi.
> Silakan dicoba juga untuk memindahkan ke kotak yang lain dan jangan takut
> jika salah, karena pasti akan selalu ada ilmu baru yang anda peroleh.
>
> Wassalam,
>
> -Aji Mumpung-
>
>
> Pada 8 Mei 2013 09.17, Krisan Flower <krisan_flower@
>
> **
>
> Dear, Mr Kid
>
> Berikut saya lampirkan datanya, silahkan lihat di file attachment
> Mohon bantuanya MR Kid.
>
> Salam
> Krisan
>
>
> ------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.
> *Kepada:* BeExcel <belajar-excel@
> *Dikirim:* Rabu, 8 Mei 2013 0:02
> *Judul:* Re: [belajar-excel] SUMIF UNTUK TABEL YANG TELAH DI SORT
>
>
> Hai Krisan,
>
> Coba lampirkan contoh datanya.
> Caranya :
> Lakukan posting ke milis (buka topik baru atau reply email dari milis yang
> ada di Inbox) dari akun milis yang Anda daftarkan ke milis, layaknya Anda
> mengirim email ke rekan kerja sehari-hari.
>
> Alamat email milis yang menjadi tujuan (To) saat membuat email (compose
> email) adalah :
> belajar-excel@
>
> Ukuran file maksimal sesuai peraturan milis adalah 250KB, untuk memastikan
> bahwa data tersebut adalah contoh data dan bukan data kerja asli yang bisa
> jadi sebenarnya data yang bersifat rahasia.
>
> Wassalam,
> Kid.
>
>
>
>
> 2013/5/7 Krisan Flower <krisan_flower@
>
> **
>
> Dear temen2 be exceller,
>
> saya mendapatkan kesulitan untuk menjumlahkan dengan kriteria tertentu,
> tetapi tabel telah dilakukan sort.
> saya pake rumus sumif tp bagaimana caranya agar data yg dijumlahkan adalah
> data yg telah di sort saja.
>
> Mohon bantuannya temen2 saya sangat kesulitan saya sudah mencoba dengan
> subtotal tp kok tidak bisa.
> terimakasih sebelumnya
>
>
>
> Salam
> Krisan
>
>
>
>
>
>
>
>
Wed May 8, 2013 12:33 am (PDT) . Posted by:
"daniel_aho" daniel_aho
Dear Moderator Belajar-Excel,
Sebelumnya saya mohon maaf sekali jika sebelumnya saya menyalahi aturan di milis ini karena keteledoran saya file yang saya lampirkan terlalu besar,
( pantesan saya tunggu ko email yang saya kirim koq ga muncul2 di forum.... hehehehehe.
sekali lagi saya minta maaf :-) :-) :-) )
Berikut saya lampirkan file yang sudah saya edit sehingga sudah lebih kecil...
langsung saja ke pokok permasalahannya, bagaimana code macro vba untuk
ambil data dari file "ABSEN" dan di copy ke file "Report Bulanan"
data "ABSEN" itu sendiri diambil setiap hari dan dari data tersebut
dicopy terus menerus melanjutkan dari data hari sebelumnya, sehingga
akan menjadi sebuah data bulanan di file "Report Bulanan"
Mohon maaf jika penjelasan saya kurang dimengerti, untuk lebih jelasnya
saya lampirkan 2 file tersebut.
saya sudah coba dengan record macro tapi belum berhasil, sampai pusing
sendiri...hehehehe maklum masih awam dan baru mau belajar karena
tertarik dengan macro.
kiranya para master2 dapat membantu untuk memberikan pencerahannya,
Terima kasih,
daniel
Wed May 8, 2013 2:17 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Coba pelajari contoh file terlampir, kemudian update sesuai kebutuhan (jangan lupa tambahkan tanggal, karena tanggal tidak ada pada file Absen).
Cara kerjanya:
Extract .rar file ke suatu folder, mis. D,
buka file TesGab, kmd jalankan Macro.
Setelah memahami cara kerja macro dalam contoh tsb, coba update untuk kebutuhan anda. Jika masih sulit, coba kirimkan hasil pengetesan yang telah dilakukan.
Salam,
HK
________________________________
From: daniel_aho <daniel_aho@yahoo.co.id >
To: belajar-excel@yahoogroups.com
Sent: Wednesday, 8 May 2013, 14:08
Subject: [belajar-excel] Upload data dari file lain
Dear Moderator Belajar-Excel,
Sebelumnya saya mohon maaf sekali jika sebelumnya saya menyalahi aturan di milis ini karena keteledoran saya file yang saya lampirkan terlalu besar,
( pantesan saya tunggu ko email yang saya kirim koq ga muncul2 di forum.... hehehehehe.
sekali lagi saya minta maaf :-) :-) :-) )
Berikut saya lampirkan file yang sudah saya edit sehingga sudah lebih kecil...
langsung saja ke pokok permasalahannya, bagaimana code macro vba untuk
ambil data dari file "ABSEN" dan di copy ke file "Report Bulanan". Untuk
data "ABSEN" itu sendiri diambil setiap hari dan dari data tersebut
dicopy terus menerus melanjutkan dari data hari sebelumnya, sehingga
akan menjadi sebuah data bulanan di file "Report Bulanan".
Mohon maaf jika penjelasan saya kurang dimengerti, untuk lebih jelasnya
saya lampirkan 2 file tersebut.
saya sudah coba dengan record macro tapi belum berhasil, sampai pusing
sendiri...hehehehe maklum masih awam dan baru mau belajar karena
tertarik dengan macro.
kiranya para master2 dapat membantu untuk memberikan pencerahannya,
Terima kasih,
daniel
Cara kerjanya:
Extract .rar file ke suatu folder, mis. D,
buka file TesGab, kmd jalankan Macro.
Setelah memahami cara kerja macro dalam contoh tsb, coba update untuk kebutuhan anda. Jika masih sulit, coba kirimkan hasil pengetesan yang telah dilakukan.
Salam,
HK
____________
From: daniel_aho <daniel_aho@yahoo.
To: belajar-excel@
Sent: Wednesday, 8 May 2013, 14:08
Subject: [belajar-excel] Upload data dari file lain
Dear Moderator Belajar-Excel,
Sebelumnya saya mohon maaf sekali jika sebelumnya saya menyalahi aturan di milis ini karena keteledoran saya file yang saya lampirkan terlalu besar,
( pantesan saya tunggu ko email yang saya kirim koq ga muncul2 di forum.... hehehehehe.
sekali lagi saya minta maaf :-) :-) :-) )
Berikut saya lampirkan file yang sudah saya edit sehingga sudah lebih kecil...
langsung saja ke pokok permasalahannya, bagaimana code macro vba untuk
ambil data dari file "ABSEN" dan di copy ke file "Report Bulanan"
data "ABSEN" itu sendiri diambil setiap hari dan dari data tersebut
dicopy terus menerus melanjutkan dari data hari sebelumnya, sehingga
akan menjadi sebuah data bulanan di file "Report Bulanan"
Mohon maaf jika penjelasan saya kurang dimengerti, untuk lebih jelasnya
saya lampirkan 2 file tersebut.
saya sudah coba dengan record macro tapi belum berhasil, sampai pusing
sendiri...hehehehe maklum masih awam dan baru mau belajar karena
tertarik dengan macro.
kiranya para master2 dapat membantu untuk memberikan pencerahannya,
Terima kasih,
daniel
Wed May 8, 2013 3:04 am (PDT) . Posted by:
"dedy rauf"
minta filenya dnk
2013/5/8 Amri Salman Rizal <menxcromancer@gmail.com >
> **
>
>
> Dear Mr. Kid,,
>
> Wah malah dapet bonus penjelasan detail nih,,
> tengkyu banget Mr. Kid,,
> Mudah2an kebaikan dan ilmunya bisa bermanfaat, dibalas Allah SWT berkali2
> lipat,,
> sekali lagi Terima Kasih Mr. Kid dan rekan2 di BeExcel,,
>
> Salam,
>
> Amri Salman Rizal
>
> On 5/4/2013 9:50 PM, Mr. Kid wrote:
>
>
> Hai Amri,
>
> 1. terus yang saya belum tau untuk menentukan cell mana yang jadi target
> penyimpanan waktu itu scriptnya bagaimana
> >> di script miss jan :
> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
> range yang ditulisi adalah :
> .Offset(, 1)
> yang artinya lompat 1 kolom dari sesuatu
> nah sesuatunya itu adalah range yang didefinisikan pada baris :
> With Target
> yaitu range yang diberi nama variabel (bukan nama range dalam
> worksheet) Target.
> Variabel Target ini berisi range yang diubah isinya oleh si user
>
> >> discript yang diubah dari bunyi ,offset(blabla.... tadi menjadi :
> Range("a1").value=Now
> maka range yang ditulisi pasti selalu A1, yang didefinisikan dalam
> bunyi Range("a1")
>
> >> dari 2 hal di atas, maka definisikanlah yang Anda inginkan dan
> kembangkan 2 variasi diatas supaya sesuai kebutuhan.
>
> 2. tapi untuk yang A1 merupakan kegiatan menulis data juga sudah
> terfikirkan, tapi ngga tau juga caranya
> >> hehehe... ndak dibaca dengan lengkap bunyi :
> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1 akan
> membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
> Application.enableevents = FALSE
> lalu di baris sesudah kode penulisan diberi :
> Application.enableevents = TRUE
>
> ya wislah...
> 1. Nah, karena sudah ndak dibatasi lagi,
> karena baris dari miss Jan berbunyi ada yang dihapus (lihat bunyi)
> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2 kebawah
> yang berubah nilai
> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
> (ijin dihapus ya miss Jan)
> bagian yang dihapus bagian ini :
> if .column=4 blablabla
> dan baris
> end if
> pertama setelah baris penulisan tadi.
> yang berarti pada script miss jan di bagian blok if berbunyi :
> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
> (karena baris 1 = header) maka
> If .Column = 4 And .Row > 1 Then
>
> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
> ' dengan format cell "h:mm AM/PM"
> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>
> ' akhir pengecekan letak baris dan kolom yang berubah
> End If
> baris yang dihapus adalah yang berbunyi :
> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
> (karena baris 1 = header) maka
> If .Column = 4 And .Row > 1 Then
> dan
> ' akhir pengecekan letak baris dan kolom yang berubah
> End If
> maka bentuknya tinggal bunyi :
> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
> ' dengan format cell "h:mm AM/PM"
> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>
> 2. maka bisa jadi penulisan di A1 akan membuat masalah baru karena
> termasuk kegiatan menulis data juga.
> lalu baris yang bunyinya .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
> diganti menjadi berbunyi Range("a1").value=Now
>
> dan kegiatan inikan menulis data di range A1. Setuju gak ? kalo gak
> setuju berarti diskusi selesai disini.... jadi harus setuju...
> Kalau menulis sesuatu di sebuah range, dan nilai yang ditulis itu beda
> dengan yang sudah ada di range tersebut, artinya isi range berubah, yang
> dalam basa londo inggeris namanya change
> Akibatnya, nulis di range a1 oleh baris Range("a1").value=Now akan
> membuat prosedur itu dipangil lagi untuk disuruh kerja. Kan jadi mbulet gak
> selesai-selesai kalau isinya ganti terus.
>
> Oleh sebab itu ada nomor 3 ini :
> 3. Maka sebelum baris kode penulisan (yang baris =Now tadi) diberi : Application.enableevents
> = FALSE
> >> yang baris =Now tadi itu kan yang bunyinya :
> Range("a1").value=Now
>
> >> kalau katanya sebelumnya baris itu diberi tulisan Application.enableevents
> = FALSE
> maka jadinya :
> Application.enableevents = FALSE
> Range("a1").value=Now
>
> Lalu sampai di nomor 4 :
> 4. lalu di baris sesudah kode penulisan diberi :
> Application.enableevents = TRUE
> >> setelah bunyi Range("a1").value=Now diberi Application.enableevents =
> TRUE
> maka jadinya :
> Application.enableevents = FALSE
> Range("a1").value=Now
> Application.enableevents = TRUE
>
> Nomor 3 itu meng-off-ken ijin untuk eksekusi prosedur event (jadi nulis
> di A1 gak akan bikin si prosedur dipanggil lagi)
> Nomor 4 itu meng-on-ken ijin untuk eksekusi prosedur event (supaya
> prosedur bisa dipanggil lagi kalau ada range lain yang berubah isi)
>
> Jadi,
> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
> mbayanginnya]
> bukan sekedar karena kan cuman ganti "time" jadi "now" aja..
> tetapi cenderung untuk mengajak Anda berpartisipasi berbagi untuk
> BeExceller lain yang juga sedang belajar.
> karena partisipasi sekecil apapun dalam kebaikan menghasilkan kebaikan
> yang lebih besar dikemudian hari.
> hehehe... itu kata simbah tempo doeloe waktu ndongengin perang badr
> sebelum saya bobo di desa yang sunyi belum ada listrik.
>
> :)
> Wassalam,
> Kid.
>
>
>
>
> 2013/5/4 Amri Salman Rizal <menxcromancer@gmail.com >
>
>>
>>
>> kan cuman ganti "time" jadi "now" aja..
>>
>> oke mr Kid,, sudah sangat sesuai harapan,, hehe
>> makasi banyak ya,,
>> tadinya saya pikir 'pembatas' itu saya perbesar aja, eh ternyata di
>> hapus,,
>> terus yang saya belum tau untuk menentukan cell mana yang jadi target
>> penyimpanan waktu itu scriptnya bagaimana,, tapi untuk yang A1 merupakan
>> kegiatan menulis data juga sudah terfikirkan, tapi ngga tau juga caranya,,
>> hehe maklum masih baru merambah ke VBA,,
>> sekali lagi terima kasih banyak,,
>>
>> oya, satu lagi,
>> ada link untuk belajar VBA dari awal perkenalan??
>> untuk yang ini juga saya ucapkan terima kasih. :)
>>
>> Salam,
>>
>>
>> Amri.
>>
>>
>> On 5/3/2013 5:25 PM, Mr. Kid wrote:
>>
>>
>> hehehe...
>> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
>> mbayanginnya]
>> masih ingat baris kode yang ada bunyi Now (hasilpenggantian Time) tadi.
>> Coba ganti menjadi :
>> Range("a1").value=Now
>> lalu atur format cellnya di A1 sesuai kebutuhan.
>>
>> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2 kebawah
>> yang berubah nilai
>> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
>> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
>> (ijin dihapus ya miss Jan)
>> bagian yang dihapus bagian ini :
>> if .column=4 blablabla
>> dan baris
>> end if
>> pertama setelah baris penulisan tadi.
>>
>> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1
>> akan membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
>> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
>> Application.enableevents = FALSE
>> lalu di baris sesudah kode penulisan diberi :
>> Application.enableevents = TRUE
>>
>> Perintah Application.enableevents ini digunakan untuk mengatur status
>> tentang boleh (TRUE) tidaknya (FALSE) suatu prosedur event dijalankan oleh
>> Excel.
>>
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>> 2013/5/3 Amri Salman Rizal <menxcromancer@gmail.com >
>>
>>>
>>>
>>> oke berhasil Mr Kid,, Terima kasih,,
>>> sekarang jika saya ingin waktu update tersimpan di salah satu cell,
>>> misalkan A1
>>> dan data yang berubah bisa acak di cell mana saja, apa yang harus saya
>>> ubah Mr. Kid??
>>>
>>>
>>> On 5/3/2013 1:40 PM, Mr. Kid wrote:
>>>
>>>
>>> Coba bagian script berbunyi Time diganti dengan Now
>>>
>>> Wassalam,
>>> Kid.
>>>
>>>
>>>
>>>
>>> 2013/5/3 Amri Salman Rizal <menxcromancer@gmail.com >
>>>
>>>>
>>>>
>>>> salam,
>>>>
>>>> maaf nyelip ya Ms Jan dan Pak Yan,
>>>> saya tertarik sama topik ini,
>>>> saya coba format waktunya ditambahkan dengan tanggal yang asalnya
>>>> "hh:mm AM/PM" menjadi "dd-mmm-yy hh:mm".
>>>> nah, untuk format tanggal dan jam nya sudah sesuai keinginan, hanya
>>>> saja tanggal yang muncul bukan tanggal hari ini, melainkan 30-Dec-99.
>>>> entah mungkin saya yang kurang ilmu atau memang kurang ilmu, jadi mohon
>>>> pembelajarannya ya rekan2.
>>>> terima kasih.
>>>>
>>>>
>>>> -------- Original Message -------- Subject: Re: [belajar-excel] Isi
>>>> data waktu otomatis saat pengetikkan Date: Fri, 3 May 2013 10:52:37
>>>> +0700 From: Jan Raisin <miss.jan.raisin@gmail.com ><miss.jan.raisin@gmail.com > Reply-To:
>>>> belajar-excel@yahoogroups.com To: belajar-excel@yahoogroups.com
>>>>
>>>>
>>>>
>>>> ups.. maaf, ada yang terlewat
>>>>
>>>> 6. save as file tersebut sebagai excel macro-enabled workbook atau
>>>> excel binary workbook (ekstensi .xlsm atau .xlsb pada excel 2007 ke atas)
>>>>
>>>> # sampaikan masalah yang sering anda temui saat menggunakan Excel
>>>> pada pooling berikut
>>>>
>>>> http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
>>>>
>>>> Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut
>>>> sangat berharga untuk Be-Exceler yang lain
>>>>
>>>> Wassalam,
>>>>
>>>> -Miss Jan Raisin-
>>>>
>>>> *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak
>>>> akan Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk
>>>> setiap 1 pertanyaan yang diajukan;*
>>>> *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
>>>> belajar-excel@yahoogroups.com ;*
>>>> *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
>>>> dengan orang-orang yang sabar QS 2:153;*
>>>>
>>>>
>>>> Pada 3 Mei 2013 10.47, Jan Raisin <miss.jan.raisin@gmail.com > menulis:
>>>>
>>>>> kasus ini tidak bisa diselesaikan dengan formula, hanya bisa dengan
>>>>> menggunakan VBA
>>>>> coba cara berikut:
>>>>> 1. pada lembar kerja, tekan tombol [Alt] [F11] sehingga berpindah ke
>>>>> VBE (Visual Basic Editor)
>>>>> 2. pada VBA Project, double klik nama sheetnya
>>>>> 3. pindah ke layar sebelah kanan, pada dropdown, ganti General menjadi
>>>>> Worksheet
>>>>> 4. ganti even pada dropdown list menjadi Change
>>>>> 5. copas script berikut diatara script yang sudah terbentuk pada nomor
>>>>> 4 di atas
>>>>>
>>>>> ' bekerja pada range yang diubah isinya
>>>>> With Target
>>>>>
>>>>> ' jika jumlah cell yang berubah = 1 maka
>>>>> If .Cells.Count = 1 Then
>>>>>
>>>>> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris >
>>>>> 1 (karena baris 1 = header) maka
>>>>> If .Column = 4 And .Row > 1 Then
>>>>>
>>>>> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
>>>>> ' dengan format cell "h:mm AM/PM"
>>>>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>>>>>
>>>>> ' akhir pengecekan letak baris dan kolom yang berubah
>>>>> End If
>>>>>
>>>>> ' akhir pengecekan dari jumlah kolom yang berubah
>>>>> End If
>>>>>
>>>>> ' akhir bekerja pada range yang berubah
>>>>> End With
>>>>>
>>>>> # sampaikan masalah yang sering anda temui saat menggunakan Excel
>>>>> pada pooling berikut
>>>>>
>>>>> http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
>>>>>
>>>>> Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut
>>>>> sangat berharga untuk Be-Exceler yang lain
>>>>>
>>>>> Wassalam,
>>>>>
>>>>> -Miss Jan Raisin-
>>>>>
>>>>> *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak
>>>>> akan Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk
>>>>> setiap 1 pertanyaan yang diajukan;*
>>>>> *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
>>>>> belajar-excel@yahoogroups.com ;*
>>>>> *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
>>>>> dengan orang-orang yang sabar QS 2:153;*
>>>>>
>>>>>
>>>>> Pada 3 Mei 2013 10.24, Yan Novianto <yan.novianto@yahoo.com > menulis:
>>>>>
>>>>>
>>>>>>
>>>>>> Be excel
>>>>>>
>>>>>> Pusing jk tidak bertanya
>>>>>>
>>>>>> Misalkan begini :
>>>>>>
>>>>>> Saya mengetikkan data di colom B2 nah mau saya setiap saya
>>>>>> mengetikkan data di colom B2 sampai ke bawah, maka secara otomatis di colom
>>>>>> D2 sampai ke bawah, otomatis teridi waktu keika saya sudah menekan enter
>>>>>> Saya pernah gunakan =if(B2="","",now()):
>>>>>> Kalo saya gunakan formula itu, akan secara otomatis sih muncul, tapi
>>>>>> ya otomatis juga berubah mwngikuti waktu yang berjalan hehehe
>>>>>> Tolong di bantu biar formula yg di gunakan bisa mengisi waktu
>>>>>> otomatis tapi tdk mengikuti update :-)
>>>>>>
>>>>>> Terimakasih
>>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>
>
2013/5/8 Amri Salman Rizal <menxcromancer@
> **
>
>
> Dear Mr. Kid,,
>
> Wah malah dapet bonus penjelasan detail nih,,
> tengkyu banget Mr. Kid,,
> Mudah2an kebaikan dan ilmunya bisa bermanfaat, dibalas Allah SWT berkali2
> lipat,,
> sekali lagi Terima Kasih Mr. Kid dan rekan2 di BeExcel,,
>
> Salam,
>
> Amri Salman Rizal
>
> On 5/4/2013 9:50 PM, Mr. Kid wrote:
>
>
> Hai Amri,
>
> 1. terus yang saya belum tau untuk menentukan cell mana yang jadi target
> penyimpanan waktu itu scriptnya bagaimana
> >> di script miss jan :
> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
> range yang ditulisi adalah :
> .Offset(, 1)
> yang artinya lompat 1 kolom dari sesuatu
> nah sesuatunya itu adalah range yang didefinisikan pada baris :
> With Target
> yaitu range yang diberi nama variabel (bukan nama range dalam
> worksheet) Target.
> Variabel Target ini berisi range yang diubah isinya oleh si user
>
> >> discript yang diubah dari bunyi ,offset(blabla.
> Range("
> maka range yang ditulisi pasti selalu A1, yang didefinisikan dalam
> bunyi Range("
>
> >> dari 2 hal di atas, maka definisikanlah yang Anda inginkan dan
> kembangkan 2 variasi diatas supaya sesuai kebutuhan.
>
> 2. tapi untuk yang A1 merupakan kegiatan menulis data juga sudah
> terfikirkan, tapi ngga tau juga caranya
> >> hehehe... ndak dibaca dengan lengkap bunyi :
> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1 akan
> membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
> Application.
> lalu di baris sesudah kode penulisan diberi :
> Application.
>
> ya wislah...
> 1. Nah, karena sudah ndak dibatasi lagi,
> karena baris dari miss Jan berbunyi ada yang dihapus (lihat bunyi)
> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2 kebawah
> yang berubah nilai
> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
> (ijin dihapus ya miss Jan)
> bagian yang dihapus bagian ini :
> if .column=4 blablabla
> dan baris
> end if
> pertama setelah baris penulisan tadi.
> yang berarti pada script miss jan di bagian blok if berbunyi :
> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
> (karena baris 1 = header) maka
> If .Column = 4 And .Row > 1 Then
>
> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
> ' dengan format cell "h:mm AM/PM"
> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>
> ' akhir pengecekan letak baris dan kolom yang berubah
> End If
> baris yang dihapus adalah yang berbunyi :
> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
> (karena baris 1 = header) maka
> If .Column = 4 And .Row > 1 Then
> dan
> ' akhir pengecekan letak baris dan kolom yang berubah
> End If
> maka bentuknya tinggal bunyi :
> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
> ' dengan format cell "h:mm AM/PM"
> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>
> 2. maka bisa jadi penulisan di A1 akan membuat masalah baru karena
> termasuk kegiatan menulis data juga.
> lalu baris yang bunyinya .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
> diganti menjadi berbunyi Range("
>
> dan kegiatan inikan menulis data di range A1. Setuju gak ? kalo gak
> setuju berarti diskusi selesai disini.... jadi harus setuju...
> Kalau menulis sesuatu di sebuah range, dan nilai yang ditulis itu beda
> dengan yang sudah ada di range tersebut, artinya isi range berubah, yang
> dalam basa londo inggeris namanya change
> Akibatnya, nulis di range a1 oleh baris Range("
> membuat prosedur itu dipangil lagi untuk disuruh kerja. Kan jadi mbulet gak
> selesai-selesai kalau isinya ganti terus.
>
> Oleh sebab itu ada nomor 3 ini :
> 3. Maka sebelum baris kode penulisan (yang baris =Now tadi) diberi : Application.
> = FALSE
> >> yang baris =Now tadi itu kan yang bunyinya :
> Range("
>
> >> kalau katanya sebelumnya baris itu diberi tulisan Application.
> = FALSE
> maka jadinya :
> Application.
> Range("
>
> Lalu sampai di nomor 4 :
> 4. lalu di baris sesudah kode penulisan diberi :
> Application.
> >> setelah bunyi Range("
> TRUE
> maka jadinya :
> Application.
> Range("
> Application.
>
> Nomor 3 itu meng-off-ken ijin untuk eksekusi prosedur event (jadi nulis
> di A1 gak akan bikin si prosedur dipanggil lagi)
> Nomor 4 itu meng-on-ken ijin untuk eksekusi prosedur event (supaya
> prosedur bisa dipanggil lagi kalau ada range lain yang berubah isi)
>
> Jadi,
> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
> mbayanginnya]
> bukan sekedar karena kan cuman ganti "time" jadi "now" aja..
> tetapi cenderung untuk mengajak Anda berpartisipasi berbagi untuk
> BeExceller lain yang juga sedang belajar.
> karena partisipasi sekecil apapun dalam kebaikan menghasilkan kebaikan
> yang lebih besar dikemudian hari.
> hehehe... itu kata simbah tempo doeloe waktu ndongengin perang badr
> sebelum saya bobo di desa yang sunyi belum ada listrik.
>
> :)
> Wassalam,
> Kid.
>
>
>
>
> 2013/5/4 Amri Salman Rizal <menxcromancer@
>
>>
>>
>> kan cuman ganti "time" jadi "now" aja..
>>
>> oke mr Kid,, sudah sangat sesuai harapan,, hehe
>> makasi banyak ya,,
>> tadinya saya pikir 'pembatas&#
>> hapus,,
>> terus yang saya belum tau untuk menentukan cell mana yang jadi target
>> penyimpanan waktu itu scriptnya bagaimana,, tapi untuk yang A1 merupakan
>> kegiatan menulis data juga sudah terfikirkan, tapi ngga tau juga caranya,,
>> hehe maklum masih baru merambah ke VBA,,
>> sekali lagi terima kasih banyak,,
>>
>> oya, satu lagi,
>> ada link untuk belajar VBA dari awal perkenalan??
>> untuk yang ini juga saya ucapkan terima kasih. :)
>>
>> Salam,
>>
>>
>> Amri.
>>
>>
>> On 5/3/2013 5:25 PM, Mr. Kid wrote:
>>
>>
>> hehehe...
>> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
>> mbayanginnya]
>> masih ingat baris kode yang ada bunyi Now (hasilpenggantian Time) tadi.
>> Coba ganti menjadi :
>> Range("
>> lalu atur format cellnya di A1 sesuai kebutuhan.
>>
>> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2 kebawah
>> yang berubah nilai
>> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
>> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
>> (ijin dihapus ya miss Jan)
>> bagian yang dihapus bagian ini :
>> if .column=4 blablabla
>> dan baris
>> end if
>> pertama setelah baris penulisan tadi.
>>
>> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1
>> akan membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
>> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
>> Application.
>> lalu di baris sesudah kode penulisan diberi :
>> Application.
>>
>> Perintah Application.
>> tentang boleh (TRUE) tidaknya (FALSE) suatu prosedur event dijalankan oleh
>> Excel.
>>
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>> 2013/5/3 Amri Salman Rizal <menxcromancer@
>>
>>>
>>>
>>> oke berhasil Mr Kid,, Terima kasih,,
>>> sekarang jika saya ingin waktu update tersimpan di salah satu cell,
>>> misalkan A1
>>> dan data yang berubah bisa acak di cell mana saja, apa yang harus saya
>>> ubah Mr. Kid??
>>>
>>>
>>> On 5/3/2013 1:40 PM, Mr. Kid wrote:
>>>
>>>
>>> Coba bagian script berbunyi Time diganti dengan Now
>>>
>>> Wassalam,
>>> Kid.
>>>
>>>
>>>
>>>
>>> 2013/5/3 Amri Salman Rizal <menxcromancer@
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>
>>
>
>
>
Wed May 8, 2013 3:37 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
File terlampir.
Pastikan security macro dipilih Enable
Wassalam,
Kid.
2013/5/8 dedy rauf <dedy.rauf@gmail.com >
> **
>
>
> minta filenya dnk
>
>
> 2013/5/8 Amri Salman Rizal <menxcromancer@gmail.com >
>
>> **
>>
>>
>> Dear Mr. Kid,,
>>
>> Wah malah dapet bonus penjelasan detail nih,,
>> tengkyu banget Mr. Kid,,
>> Mudah2an kebaikan dan ilmunya bisa bermanfaat, dibalas Allah SWT berkali2
>> lipat,,
>> sekali lagi Terima Kasih Mr. Kid dan rekan2 di BeExcel,,
>>
>> Salam,
>>
>> Amri Salman Rizal
>>
>> On 5/4/2013 9:50 PM, Mr. Kid wrote:
>>
>>
>> Hai Amri,
>>
>> 1. terus yang saya belum tau untuk menentukan cell mana yang jadi target
>> penyimpanan waktu itu scriptnya bagaimana
>> >> di script miss jan :
>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>> range yang ditulisi adalah :
>> .Offset(, 1)
>> yang artinya lompat 1 kolom dari sesuatu
>> nah sesuatunya itu adalah range yang didefinisikan pada baris :
>> With Target
>> yaitu range yang diberi nama variabel (bukan nama range dalam
>> worksheet) Target.
>> Variabel Target ini berisi range yang diubah isinya oleh si user
>>
>> >> discript yang diubah dari bunyi ,offset(blabla.... tadi menjadi :
>> Range("a1").value=Now
>> maka range yang ditulisi pasti selalu A1, yang didefinisikan dalam
>> bunyi Range("a1")
>>
>> >> dari 2 hal di atas, maka definisikanlah yang Anda inginkan dan
>> kembangkan 2 variasi diatas supaya sesuai kebutuhan.
>>
>> 2. tapi untuk yang A1 merupakan kegiatan menulis data juga sudah
>> terfikirkan, tapi ngga tau juga caranya
>> >> hehehe... ndak dibaca dengan lengkap bunyi :
>> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1 akan
>> membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
>> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
>> Application.enableevents = FALSE
>> lalu di baris sesudah kode penulisan diberi :
>> Application.enableevents = TRUE
>>
>> ya wislah...
>> 1. Nah, karena sudah ndak dibatasi lagi,
>> karena baris dari miss Jan berbunyi ada yang dihapus (lihat bunyi)
>> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2 kebawah
>> yang berubah nilai
>> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
>> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
>> (ijin dihapus ya miss Jan)
>> bagian yang dihapus bagian ini :
>> if .column=4 blablabla
>> dan baris
>> end if
>> pertama setelah baris penulisan tadi.
>> yang berarti pada script miss jan di bagian blok if berbunyi :
>> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
>> (karena baris 1 = header) maka
>> If .Column = 4 And .Row > 1 Then
>>
>> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
>> ' dengan format cell "h:mm AM/PM"
>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>>
>> ' akhir pengecekan letak baris dan kolom yang berubah
>> End If
>> baris yang dihapus adalah yang berbunyi :
>> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
>> (karena baris 1 = header) maka
>> If .Column = 4 And .Row > 1 Then
>> dan
>> ' akhir pengecekan letak baris dan kolom yang berubah
>> End If
>> maka bentuknya tinggal bunyi :
>> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
>> ' dengan format cell "h:mm AM/PM"
>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>>
>> 2. maka bisa jadi penulisan di A1 akan membuat masalah baru karena
>> termasuk kegiatan menulis data juga.
>> lalu baris yang bunyinya .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>> diganti menjadi berbunyi Range("a1").value=Now
>>
>> dan kegiatan inikan menulis data di range A1. Setuju gak ? kalo gak
>> setuju berarti diskusi selesai disini.... jadi harus setuju...
>> Kalau menulis sesuatu di sebuah range, dan nilai yang ditulis itu beda
>> dengan yang sudah ada di range tersebut, artinya isi range berubah, yang
>> dalam basa londo inggeris namanya change
>> Akibatnya, nulis di range a1 oleh baris Range("a1").value=Now akan
>> membuat prosedur itu dipangil lagi untuk disuruh kerja. Kan jadi mbulet gak
>> selesai-selesai kalau isinya ganti terus.
>>
>> Oleh sebab itu ada nomor 3 ini :
>> 3. Maka sebelum baris kode penulisan (yang baris =Now tadi) diberi : Application.enableevents
>> = FALSE
>> >> yang baris =Now tadi itu kan yang bunyinya :
>> Range("a1").value=Now
>>
>> >> kalau katanya sebelumnya baris itu diberi tulisan Application.enableevents
>> = FALSE
>> maka jadinya :
>> Application.enableevents = FALSE
>> Range("a1").value=Now
>>
>> Lalu sampai di nomor 4 :
>> 4. lalu di baris sesudah kode penulisan diberi :
>> Application.enableevents = TRUE
>> >> setelah bunyi Range("a1").value=Now diberi Application.enableevents
>> = TRUE
>> maka jadinya :
>> Application.enableevents = FALSE
>> Range("a1").value=Now
>> Application.enableevents = TRUE
>>
>> Nomor 3 itu meng-off-ken ijin untuk eksekusi prosedur event (jadi nulis
>> di A1 gak akan bikin si prosedur dipanggil lagi)
>> Nomor 4 itu meng-on-ken ijin untuk eksekusi prosedur event (supaya
>> prosedur bisa dipanggil lagi kalau ada range lain yang berubah isi)
>>
>> Jadi,
>> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
>> mbayanginnya]
>> bukan sekedar karena kan cuman ganti "time" jadi "now" aja..
>> tetapi cenderung untuk mengajak Anda berpartisipasi berbagi untuk
>> BeExceller lain yang juga sedang belajar.
>> karena partisipasi sekecil apapun dalam kebaikan menghasilkan kebaikan
>> yang lebih besar dikemudian hari.
>> hehehe... itu kata simbah tempo doeloe waktu ndongengin perang badr
>> sebelum saya bobo di desa yang sunyi belum ada listrik.
>>
>> :)
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>> 2013/5/4 Amri Salman Rizal <menxcromancer@gmail.com >
>>
>>>
>>>
>>> kan cuman ganti "time" jadi "now" aja..
>>>
>>> oke mr Kid,, sudah sangat sesuai harapan,, hehe
>>> makasi banyak ya,,
>>> tadinya saya pikir 'pembatas' itu saya perbesar aja, eh ternyata di
>>> hapus,,
>>> terus yang saya belum tau untuk menentukan cell mana yang jadi target
>>> penyimpanan waktu itu scriptnya bagaimana,, tapi untuk yang A1 merupakan
>>> kegiatan menulis data juga sudah terfikirkan, tapi ngga tau juga caranya,,
>>> hehe maklum masih baru merambah ke VBA,,
>>> sekali lagi terima kasih banyak,,
>>>
>>> oya, satu lagi,
>>> ada link untuk belajar VBA dari awal perkenalan??
>>> untuk yang ini juga saya ucapkan terima kasih. :)
>>>
>>> Salam,
>>>
>>>
>>> Amri.
>>>
>>>
>>> On 5/3/2013 5:25 PM, Mr. Kid wrote:
>>>
>>>
>>> hehehe...
>>> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
>>> mbayanginnya]
>>> masih ingat baris kode yang ada bunyi Now (hasilpenggantian Time) tadi.
>>> Coba ganti menjadi :
>>> Range("a1").value=Now
>>> lalu atur format cellnya di A1 sesuai kebutuhan.
>>>
>>> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2
>>> kebawah yang berubah nilai
>>> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
>>> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
>>> (ijin dihapus ya miss Jan)
>>> bagian yang dihapus bagian ini :
>>> if .column=4 blablabla
>>> dan baris
>>> end if
>>> pertama setelah baris penulisan tadi.
>>>
>>> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1
>>> akan membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
>>> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
>>> Application.enableevents = FALSE
>>> lalu di baris sesudah kode penulisan diberi :
>>> Application.enableevents = TRUE
>>>
>>> Perintah Application.enableevents ini digunakan untuk mengatur status
>>> tentang boleh (TRUE) tidaknya (FALSE) suatu prosedur event dijalankan oleh
>>> Excel.
>>>
>>>
>>> Wassalam,
>>> Kid.
>>>
>>>
>>>
>>> 2013/5/3 Amri Salman Rizal <menxcromancer@gmail.com >
>>>
>>>>
>>>>
>>>> oke berhasil Mr Kid,, Terima kasih,,
>>>> sekarang jika saya ingin waktu update tersimpan di salah satu cell,
>>>> misalkan A1
>>>> dan data yang berubah bisa acak di cell mana saja, apa yang harus saya
>>>> ubah Mr. Kid??
>>>>
>>>>
>>>> On 5/3/2013 1:40 PM, Mr. Kid wrote:
>>>>
>>>>
>>>> Coba bagian script berbunyi Time diganti dengan Now
>>>>
>>>> Wassalam,
>>>> Kid.
>>>>
>>>>
>>>>
>>>>
>>>> 2013/5/3 Amri Salman Rizal <menxcromancer@gmail.com >
>>>>
>>>>>
>>>>>
>>>>> salam,
>>>>>
>>>>> maaf nyelip ya Ms Jan dan Pak Yan,
>>>>> saya tertarik sama topik ini,
>>>>> saya coba format waktunya ditambahkan dengan tanggal yang asalnya
>>>>> "hh:mm AM/PM" menjadi "dd-mmm-yy hh:mm".
>>>>> nah, untuk format tanggal dan jam nya sudah sesuai keinginan, hanya
>>>>> saja tanggal yang muncul bukan tanggal hari ini, melainkan 30-Dec-99.
>>>>> entah mungkin saya yang kurang ilmu atau memang kurang ilmu, jadi
>>>>> mohon pembelajarannya ya rekan2.
>>>>> terima kasih.
>>>>>
>>>>>
>>>>> -------- Original Message -------- Subject: Re: [belajar-excel] Isi
>>>>> data waktu otomatis saat pengetikkan Date: Fri, 3 May 2013 10:52:37
>>>>> +0700 From: Jan Raisin <miss.jan.raisin@gmail.com ><miss.jan.raisin@gmail.com > Reply-To:
>>>>> belajar-excel@yahoogroups.com To: belajar-excel@yahoogroups.com
>>>>>
>>>>>
>>>>>
>>>>> ups.. maaf, ada yang terlewat
>>>>>
>>>>> 6. save as file tersebut sebagai excel macro-enabled workbook atau
>>>>> excel binary workbook (ekstensi .xlsm atau .xlsb pada excel 2007 ke atas)
>>>>>
>>>>> # sampaikan masalah yang sering anda temui saat menggunakan Excel
>>>>> pada pooling berikut
>>>>>
>>>>> http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
>>>>>
>>>>> Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut
>>>>> sangat berharga untuk Be-Exceler yang lain
>>>>>
>>>>> Wassalam,
>>>>>
>>>>> -Miss Jan Raisin-
>>>>>
>>>>> *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak
>>>>> akan Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk
>>>>> setiap 1 pertanyaan yang diajukan;*
>>>>> *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
>>>>> belajar-excel@yahoogroups.com ;*
>>>>> *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
>>>>> dengan orang-orang yang sabar QS 2:153;*
>>>>>
>>>>>
>>>>> Pada 3 Mei 2013 10.47, Jan Raisin <miss.jan.raisin@gmail.com > menulis:
>>>>>
>>>>>> kasus ini tidak bisa diselesaikan dengan formula, hanya bisa dengan
>>>>>> menggunakan VBA
>>>>>> coba cara berikut:
>>>>>> 1. pada lembar kerja, tekan tombol [Alt] [F11] sehingga berpindah ke
>>>>>> VBE (Visual Basic Editor)
>>>>>> 2. pada VBA Project, double klik nama sheetnya
>>>>>> 3. pindah ke layar sebelah kanan, pada dropdown, ganti General
>>>>>> menjadi Worksheet
>>>>>> 4. ganti even pada dropdown list menjadi Change
>>>>>> 5. copas script berikut diatara script yang sudah terbentuk pada
>>>>>> nomor 4 di atas
>>>>>>
>>>>>> ' bekerja pada range yang diubah isinya
>>>>>> With Target
>>>>>>
>>>>>> ' jika jumlah cell yang berubah = 1 maka
>>>>>> If .Cells.Count = 1 Then
>>>>>>
>>>>>> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris >
>>>>>> 1 (karena baris 1 = header) maka
>>>>>> If .Column = 4 And .Row > 1 Then
>>>>>>
>>>>>> ' 1 kolom di sebelah kanan diisi dengan waktu
>>>>>> perubahan
>>>>>> ' dengan format cell "h:mm AM/PM"
>>>>>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>>>>>>
>>>>>> ' akhir pengecekan letak baris dan kolom yang berubah
>>>>>> End If
>>>>>>
>>>>>> ' akhir pengecekan dari jumlah kolom yang berubah
>>>>>> End If
>>>>>>
>>>>>> ' akhir bekerja pada range yang berubah
>>>>>> End With
>>>>>>
>>>>>> # sampaikan masalah yang sering anda temui saat menggunakan Excel
>>>>>> pada pooling berikut
>>>>>>
>>>>>> http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
>>>>>>
>>>>>> Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut
>>>>>> sangat berharga untuk Be-Exceler yang lain
>>>>>>
>>>>>> Wassalam,
>>>>>>
>>>>>> -Miss Jan Raisin-
>>>>>>
>>>>>> *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak
>>>>>> akan Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk
>>>>>> setiap 1 pertanyaan yang diajukan;*
>>>>>> *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
>>>>>> belajar-excel@yahoogroups.com ;*
>>>>>> *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
>>>>>> dengan orang-orang yang sabar QS 2:153;*
>>>>>>
>>>>>>
>>>>>> Pada 3 Mei 2013 10.24, Yan Novianto <yan.novianto@yahoo.com >menulis:
>>>>>>
>>>>>>
>>>>>>>
>>>>>>> Be excel
>>>>>>>
>>>>>>> Pusing jk tidak bertanya
>>>>>>>
>>>>>>> Misalkan begini :
>>>>>>>
>>>>>>> Saya mengetikkan data di colom B2 nah mau saya setiap saya
>>>>>>> mengetikkan data di colom B2 sampai ke bawah, maka secara otomatis di colom
>>>>>>> D2 sampai ke bawah, otomatis teridi waktu keika saya sudah menekan enter
>>>>>>> Saya pernah gunakan =if(B2="","",now()):
>>>>>>> Kalo saya gunakan formula itu, akan secara otomatis sih muncul, tapi
>>>>>>> ya otomatis juga berubah mwngikuti waktu yang berjalan hehehe
>>>>>>> Tolong di bantu biar formula yg di gunakan bisa mengisi waktu
>>>>>>> otomatis tapi tdk mengikuti update :-)
>>>>>>>
>>>>>>> Terimakasih
>>>>>>>
>>>>>>
>>>>>>
>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>
Pastikan security macro dipilih Enable
Wassalam,
Kid.
2013/5/8 dedy rauf <dedy.rauf@gmail.
> **
>
>
> minta filenya dnk
>
>
> 2013/5/8 Amri Salman Rizal <menxcromancer@
>
>> **
>>
>>
>> Dear Mr. Kid,,
>>
>> Wah malah dapet bonus penjelasan detail nih,,
>> tengkyu banget Mr. Kid,,
>> Mudah2an kebaikan dan ilmunya bisa bermanfaat, dibalas Allah SWT berkali2
>> lipat,,
>> sekali lagi Terima Kasih Mr. Kid dan rekan2 di BeExcel,,
>>
>> Salam,
>>
>> Amri Salman Rizal
>>
>> On 5/4/2013 9:50 PM, Mr. Kid wrote:
>>
>>
>> Hai Amri,
>>
>> 1. terus yang saya belum tau untuk menentukan cell mana yang jadi target
>> penyimpanan waktu itu scriptnya bagaimana
>> >> di script miss jan :
>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>> range yang ditulisi adalah :
>> .Offset(, 1)
>> yang artinya lompat 1 kolom dari sesuatu
>> nah sesuatunya itu adalah range yang didefinisikan pada baris :
>> With Target
>> yaitu range yang diberi nama variabel (bukan nama range dalam
>> worksheet) Target.
>> Variabel Target ini berisi range yang diubah isinya oleh si user
>>
>> >> discript yang diubah dari bunyi ,offset(blabla.
>> Range("
>> maka range yang ditulisi pasti selalu A1, yang didefinisikan dalam
>> bunyi Range("
>>
>> >> dari 2 hal di atas, maka definisikanlah yang Anda inginkan dan
>> kembangkan 2 variasi diatas supaya sesuai kebutuhan.
>>
>> 2. tapi untuk yang A1 merupakan kegiatan menulis data juga sudah
>> terfikirkan, tapi ngga tau juga caranya
>> >> hehehe... ndak dibaca dengan lengkap bunyi :
>> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1 akan
>> membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
>> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
>> Application.
>> lalu di baris sesudah kode penulisan diberi :
>> Application.
>>
>> ya wislah...
>> 1. Nah, karena sudah ndak dibatasi lagi,
>> karena baris dari miss Jan berbunyi ada yang dihapus (lihat bunyi)
>> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2 kebawah
>> yang berubah nilai
>> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
>> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
>> (ijin dihapus ya miss Jan)
>> bagian yang dihapus bagian ini :
>> if .column=4 blablabla
>> dan baris
>> end if
>> pertama setelah baris penulisan tadi.
>> yang berarti pada script miss jan di bagian blok if berbunyi :
>> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
>> (karena baris 1 = header) maka
>> If .Column = 4 And .Row > 1 Then
>>
>> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
>> ' dengan format cell "h:mm AM/PM"
>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>>
>> ' akhir pengecekan letak baris dan kolom yang berubah
>> End If
>> baris yang dihapus adalah yang berbunyi :
>> ' jika kolom yang berubah = 4 (kolom D) dan nilai baris > 1
>> (karena baris 1 = header) maka
>> If .Column = 4 And .Row > 1 Then
>> dan
>> ' akhir pengecekan letak baris dan kolom yang berubah
>> End If
>> maka bentuknya tinggal bunyi :
>> ' 1 kolom di sebelah kanan diisi dengan waktu perubahan
>> ' dengan format cell "h:mm AM/PM"
>> .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>>
>> 2. maka bisa jadi penulisan di A1 akan membuat masalah baru karena
>> termasuk kegiatan menulis data juga.
>> lalu baris yang bunyinya .Offset(, 1).Value = Format(Time, "h:mm AM/PM")
>> diganti menjadi berbunyi Range("
>>
>> dan kegiatan inikan menulis data di range A1. Setuju gak ? kalo gak
>> setuju berarti diskusi selesai disini.... jadi harus setuju...
>> Kalau menulis sesuatu di sebuah range, dan nilai yang ditulis itu beda
>> dengan yang sudah ada di range tersebut, artinya isi range berubah, yang
>> dalam basa londo inggeris namanya change
>> Akibatnya, nulis di range a1 oleh baris Range("
>> membuat prosedur itu dipangil lagi untuk disuruh kerja. Kan jadi mbulet gak
>> selesai-selesai kalau isinya ganti terus.
>>
>> Oleh sebab itu ada nomor 3 ini :
>> 3. Maka sebelum baris kode penulisan (yang baris =Now tadi) diberi : Application.
>> = FALSE
>> >> yang baris =Now tadi itu kan yang bunyinya :
>> Range("
>>
>> >> kalau katanya sebelumnya baris itu diberi tulisan Application.
>> = FALSE
>> maka jadinya :
>> Application.
>> Range("
>>
>> Lalu sampai di nomor 4 :
>> 4. lalu di baris sesudah kode penulisan diberi :
>> Application.
>> >> setelah bunyi Range("
>> = TRUE
>> maka jadinya :
>> Application.
>> Range("
>> Application.
>>
>> Nomor 3 itu meng-off-ken ijin untuk eksekusi prosedur event (jadi nulis
>> di A1 gak akan bikin si prosedur dipanggil lagi)
>> Nomor 4 itu meng-on-ken ijin untuk eksekusi prosedur event (supaya
>> prosedur bisa dipanggil lagi kalau ada range lain yang berubah isi)
>>
>> Jadi,
>> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
>> mbayanginnya]
>> bukan sekedar karena kan cuman ganti "time" jadi "now" aja..
>> tetapi cenderung untuk mengajak Anda berpartisipasi berbagi untuk
>> BeExceller lain yang juga sedang belajar.
>> karena partisipasi sekecil apapun dalam kebaikan menghasilkan kebaikan
>> yang lebih besar dikemudian hari.
>> hehehe... itu kata simbah tempo doeloe waktu ndongengin perang badr
>> sebelum saya bobo di desa yang sunyi belum ada listrik.
>>
>> :)
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>> 2013/5/4 Amri Salman Rizal <menxcromancer@
>>
>>>
>>>
>>> kan cuman ganti "time" jadi "now" aja..
>>>
>>> oke mr Kid,, sudah sangat sesuai harapan,, hehe
>>> makasi banyak ya,,
>>> tadinya saya pikir 'pembatas&#
>>> hapus,,
>>> terus yang saya belum tau untuk menentukan cell mana yang jadi target
>>> penyimpanan waktu itu scriptnya bagaimana,, tapi untuk yang A1 merupakan
>>> kegiatan menulis data juga sudah terfikirkan, tapi ngga tau juga caranya,,
>>> hehe maklum masih baru merambah ke VBA,,
>>> sekali lagi terima kasih banyak,,
>>>
>>> oya, satu lagi,
>>> ada link untuk belajar VBA dari awal perkenalan??
>>> untuk yang ini juga saya ucapkan terima kasih. :)
>>>
>>> Salam,
>>>
>>>
>>> Amri.
>>>
>>>
>>> On 5/3/2013 5:25 PM, Mr. Kid wrote:
>>>
>>>
>>> hehehe...
>>> [oalah mbok yao di copas-ken hasil gantinya dimari kan ya enak
>>> mbayanginnya]
>>> masih ingat baris kode yang ada bunyi Now (hasilpenggantian Time) tadi.
>>> Coba ganti menjadi :
>>> Range("
>>> lalu atur format cellnya di A1 sesuai kebutuhan.
>>>
>>> script miss Jan membatasi diri untuk tulis sesuatu kalau cell D2
>>> kebawah yang berubah nilai
>>> kalau pengen nulis di A1 si saat ini tersebut (Now) akibat ada
>>> pengubahan nilai dimana saja, berarti pembatas dari miss Jan dihapus.
>>> (ijin dihapus ya miss Jan)
>>> bagian yang dihapus bagian ini :
>>> if .column=4 blablabla
>>> dan baris
>>> end if
>>> pertama setelah baris penulisan tadi.
>>>
>>> Nah, karena sudah ndak dibatasi lagi, maka bisa jadi penulisan di A1
>>> akan membuat masalah baru karena termasuk kegiatan menulis data juga. Maka
>>> sebelum baris kode penulisan (yang baris =Now tadi) diberi :
>>> Application.
>>> lalu di baris sesudah kode penulisan diberi :
>>> Application.
>>>
>>> Perintah Application.
>>> tentang boleh (TRUE) tidaknya (FALSE) suatu prosedur event dijalankan oleh
>>> Excel.
>>>
>>>
>>> Wassalam,
>>> Kid.
>>>
>>>
>>>
>>> 2013/5/3 Amri Salman Rizal <menxcromancer@
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>
>>
>
>
Wed May 8, 2013 4:04 am (PDT) . Posted by:
"Amri Salman Rizal" menxcromancer
File Terlampir untuk data waktu di satu cell dan perubahan di cell acak
(dimana saja).
salam,
Amri
On 5/8/2013 5:37 PM, Mr. Kid wrote:
> File terlampir.
> Pastikan security macro dipilih Enable
>
> Wassalam,
> Kid.
>
>
> 2013/5/8 dedy rauf <dedy.rauf@gmail.com <mailto:dedy.rauf@gmail.com >>
>
> minta filenya dnk
>
>
(dimana saja).
salam,
Amri
On 5/8/2013 5:37 PM, Mr. Kid wrote:
> File terlampir.
> Pastikan security macro dipilih Enable
>
> Wassalam,
> Kid.
>
>
> 2013/5/8 dedy rauf <dedy.rauf@gmail.
>
> minta filenya dnk
>
>
Wed May 8, 2013 4:55 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
File terlampir.
Untuk sheet1, lihat script di VBE untuk object class sheet tersebut pada
prosedur event worksheet_change.
Jika data dari file pdf bisa diconvert menjadi file xls atau xlsx, maka
bisa disusun sebuah runtime untuk menyalin data dari file hasil konversi
tersebut ke sebuah sheet kerja input (misal sheet input). Kemudian di sheet
input disusun sebuah tabel kecil yang berisi seluruh nilai maupun formula
yang mengambil nilai dari hasil copas konversian tadi. Lihat sheet input.
Data dari tabel pengambilan data di sheet input ini (kolom A:J) dikirim ke
sheet data pada baris kosong pertama (valuesnya saja)
Kemudian dilakukan definisi ulang luasan area data di sheet Data dengan
memberi nama range yang menjadi data source output. Misal namanya _myData_
Setelah itu dilanjutkan dengan proses refresh pivot table output di sheet
output.
Nah... cerita di atas masih belum dibuat scriptnya. Silakan dicoba untuk
membuatnya jika alur proses input -> data -> output ini dirasa bisa
digunakan.
Wassalam,
Kid.
2013/5/7 lkm jktind <lkmjktind@gmail.com >
> **
>
>
> Ini pak contoh file nya . (File PDF)
>
> Salam
>
> Lukman
>
> 2013/5/6 Mr. Kid <mr.nmkid@gmail.com >
>
> > **
>
> >
> >
> > Bisa diceritakan bagaimana proses yang dilakukan, mulai dapat file
> sumber,
> > diapakan, lalu di copy atau disalin per cell atau per kolom atau per
> banyak
> > kolom ?
> > Semua cell atau hanya sebagian cell ?
> >
> > Jika file sumber berisi data untuk waktu tertentu lalu di input (entry
> > atau copas) per waktu alias bertambah kekanan, maka penyusunan data
> seperti
> > ini kurang efisien. btw, secara umum, untuk keadaan tersebut biasanya
> > dengan sebuah tombol lalu lakukan proses copy dari sheet atau workbook
> lain
> > yang berisi sumber data, kemudian paste ke lokasi tujuan di file
> > penyimpanan data. Artinya, selalu diusahakan mendapatkan suatu file
> sumber
> > yang sebisa mungkin berupa excel workbook (seapesnya, bisa berupa text
> > file).
> >
> > Wassalam,
> > Kid.
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
>
>
>
Untuk sheet1, lihat script di VBE untuk object class sheet tersebut pada
prosedur event worksheet_change.
Jika data dari file pdf bisa diconvert menjadi file xls atau xlsx, maka
bisa disusun sebuah runtime untuk menyalin data dari file hasil konversi
tersebut ke sebuah sheet kerja input (misal sheet input). Kemudian di sheet
input disusun sebuah tabel kecil yang berisi seluruh nilai maupun formula
yang mengambil nilai dari hasil copas konversian tadi. Lihat sheet input.
Data dari tabel pengambilan data di sheet input ini (kolom A:J) dikirim ke
sheet data pada baris kosong pertama (valuesnya saja)
Kemudian dilakukan definisi ulang luasan area data di sheet Data dengan
memberi nama range yang menjadi data source output. Misal namanya _myData_
Setelah itu dilanjutkan dengan proses refresh pivot table output di sheet
output.
Nah... cerita di atas masih belum dibuat scriptnya. Silakan dicoba untuk
membuatnya jika alur proses input -> data -> output ini dirasa bisa
digunakan.
Wassalam,
Kid.
2013/5/7 lkm jktind <lkmjktind@gmail.
> **
>
>
> Ini pak contoh file nya . (File PDF)
>
> Salam
>
> Lukman
>
> 2013/5/6 Mr. Kid <mr.nmkid@gmail.
>
> > **
>
> >
> >
> > Bisa diceritakan bagaimana proses yang dilakukan, mulai dapat file
> sumber,
> > diapakan, lalu di copy atau disalin per cell atau per kolom atau per
> banyak
> > kolom ?
> > Semua cell atau hanya sebagian cell ?
> >
> > Jika file sumber berisi data untuk waktu tertentu lalu di input (entry
> > atau copas) per waktu alias bertambah kekanan, maka penyusunan data
> seperti
> > ini kurang efisien. btw, secara umum, untuk keadaan tersebut biasanya
> > dengan sebuah tombol lalu lakukan proses copy dari sheet atau workbook
> lain
> > yang berisi sumber data, kemudian paste ke lokasi tujuan di file
> > penyimpanan data. Artinya, selalu diusahakan mendapatkan suatu file
> sumber
> > yang sebisa mungkin berupa excel workbook (seapesnya, bisa berupa text
> > file).
> >
> > Wassalam,
> > Kid.
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
>
>
>
Wed May 8, 2013 6:54 am (PDT) . Posted by:
"Sukardi Lo" sukardilo
Dear Moderator Belajar-Excel,
Selamat Malam,
Mohon bantuannya, saat ini saya sedang membuat sebuah monitoring order yang statusnya akan berubah setelah melewati 7 hari.dari tanggal order (file terlampir). Dan setelah barang tiba, saya melakukan input tanggal kedatangan barang di kolom arrival date.
Yang menjadi pertanyaan saya, bagaimana membuat rumus agar setiap kali kolom arrival date diinput data/tanggal, maka tulisan dalam kolom status akan berubah menjadi kata "ARRIVED"
Mohon bantuannya ya.. Maaf jika ada kata-kata saya kurang jelas dan membingungkan.
Terima kasih atas bantuannya.
Best Regards,
Sukardi
Wed May 8, 2013 8:32 am (PDT) . Posted by:
"ghozi alkatiri" ghozialkatiri
ganti formula sebelumnya menjadi
=IF(LEN(E3);"ARRIVED";IF(F3>=21;"3 WEEKS ORDERED";IF(F3>=14;"2 WEEKS ORDERED";IF(F3>=7;"1 WEEKS ORDERED";"UNDER 1 WEEK"))))
wassalam
Ghozi Alkatiri
________________________________
Dari: Sukardi Lo <sukardilo@yahoo.com >
Kepada: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
Dikirim: Rabu, 8 Mei 2013 20:50
Judul: [belajar-excel] Otomatis muncul text pada kolom saat input data di cell
Dear Moderator Belajar-Excel,
Selamat Malam,
Mohon bantuannya, saat ini saya sedang membuat sebuah monitoring order yang statusnya akan berubah setelah melewati 7 hari.dari tanggal order (file terlampir). Dan setelah barang tiba, saya melakukan input tanggal kedatangan barang di kolom arrival date.
Yang menjadi pertanyaan saya, bagaimana membuat rumus agar setiap kali kolom arrival date diinput data/tanggal, maka tulisan dalam kolom status akan berubah menjadi kata "ARRIVED". Saya telah mencoba conditional formating, namun tidak bisa menampilkan text sesuai keinginan.
Mohon bantuannya ya.. Maaf jika ada kata-kata saya kurang jelas dan membingungkan.
Terima kasih atas bantuannya.
Best Regards,
Sukardi
=IF(LEN(E3);
wassalam
Ghozi Alkatiri
____________
Dari: Sukardi Lo <sukardilo@yahoo.
Kepada: "belajar-excel@
Dikirim: Rabu, 8 Mei 2013 20:50
Judul: [belajar-excel] Otomatis muncul text pada kolom saat input data di cell
Dear Moderator Belajar-Excel,
Selamat Malam,
Mohon bantuannya, saat ini saya sedang membuat sebuah monitoring order yang statusnya akan berubah setelah melewati 7 hari.dari tanggal order (file terlampir). Dan setelah barang tiba, saya melakukan input tanggal kedatangan barang di kolom arrival date.
Yang menjadi pertanyaan saya, bagaimana membuat rumus agar setiap kali kolom arrival date diinput data/tanggal, maka tulisan dalam kolom status akan berubah menjadi kata "ARRIVED"
Mohon bantuannya ya.. Maaf jika ada kata-kata saya kurang jelas dan membingungkan.
Terima kasih atas bantuannya.
Best Regards,
Sukardi
Wed May 8, 2013 11:42 am (PDT) . Posted by:
"Laode Herman Umar" mentor_umb
dear para master
tolong bantuannya untuk kasus diatas
saya agak repot dalam melakukan rekap file, diatas hanya contoh dari kasus saya.
1. yang sy inginkan rekap data dengan kriteria nama toko dan bulan
2. untuk databasex penyimpanannya sy bagi dalam 2 sheet yang berbeda (kwatir kalau jumlah columnya ndak bisa nampung data karna terdiri dari bulan)
3 tolong bantu untuk kode vb makronya (kalau bisa dengan penjelasan singkat)
4. kalau ada yang lebih simpel dari proses rekap diatas, mohon sarannya
file terlampir
terima kasih banyak sebelumnya
tolong bantuannya untuk kasus diatas
saya agak repot dalam melakukan rekap file, diatas hanya contoh dari kasus saya.
1. yang sy inginkan rekap data dengan kriteria nama toko dan bulan
2. untuk databasex penyimpanannya sy bagi dalam 2 sheet yang berbeda (kwatir kalau jumlah columnya ndak bisa nampung data karna terdiri dari bulan)
3 tolong bantu untuk kode vb makronya (kalau bisa dengan penjelasan singkat)
4. kalau ada yang lebih simpel dari proses rekap diatas, mohon sarannya
file terlampir
terima kasih banyak sebelumnya
GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
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