8 New Messages
Digest #2494
3a
Fw: [belajar-excel] Tes Looping For ... Next dan For each ... Next by "hendrik karnadi" hendrikkarnadi
Messages
Mon Aug 26, 2013 2:22 am (PDT) . Posted by:
"Jan Raisin"
æóÚóáóíúßõãõ áÓóøáÇóãõ æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
wew.. filenya besar sekali pak.. gak jadi deh dunlutnya.. ntar quaota
internet Jan habis xixixixi ^_^
biasanya sih untuk memperkecil sbb:
1. hapus baris dan kolom kosong
2. hapus image yang tidak diperlukan >> kalo ada image yang dipakai coba
cek ukuran imagenya, kalo ukurannya besar coba ganti tipe file imagenya
3. ganti formula dengan nilainya saja, >> untuk yang ini kalo masih harus
proses perhitungan maka sebaiknya pakai vba juga
4. save as ke personal woorkbook xlsb yang tipenya binary >> kalo ada
script vba untuk ambil eksternal data maka cara ini tidak bisa dilakukan
mungkin itu dulu yang Jan tau.. coba kalo sudah dilakukan dan ukuran
filenya masih juga besar.. share ulang workbooknya tapi yang sudah
dikompres.
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 26 Agustus 2013 14.57, Prazt <praztmath@gmail.com > menulis:
> **
>
>
> assalamu'alaikum....
> para master yang terhormat, mohon bantuan untuk memperkecil file excel
> berikut terlampir (
> https://www.dropbox.com/s/7hxybeibmn0e7c6/BUKU%20INDUK%20-%20SIAP%20PAKE%20-%20Copy%202013-2014.xlsm ),
> karena besar file ukuranya tidak wajar, sudah saya coba del baris dan kolom
> yang kosong (seperti yang sudah pernah dibahas di milis ini)tetapi juga
> belum bisa normal ukurannya..
> trims and wassalam...
>
wew.. filenya besar sekali pak.. gak jadi deh dunlutnya.. ntar quaota
internet Jan habis xixixixi ^_^
biasanya sih untuk memperkecil sbb:
1. hapus baris dan kolom kosong
2. hapus image yang tidak diperlukan >> kalo ada image yang dipakai coba
cek ukuran imagenya, kalo ukurannya besar coba ganti tipe file imagenya
3. ganti formula dengan nilainya saja, >> untuk yang ini kalo masih harus
proses perhitungan maka sebaiknya pakai vba juga
4. save as ke personal woorkbook xlsb yang tipenya binary >> kalo ada
script vba untuk ambil eksternal data maka cara ini tidak bisa dilakukan
mungkin itu dulu yang Jan tau.. coba kalo sudah dilakukan dan ukuran
filenya masih juga besar.. share ulang workbooknya tapi yang sudah
dikompres.
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 26 Agustus 2013 14.57, Prazt <praztmath@gmail.
> **
>
>
> assalamu'
> para master yang terhormat, mohon bantuan untuk memperkecil file excel
> berikut terlampir (
> https://www.
> karena besar file ukuranya tidak wajar, sudah saya coba del baris dan kolom
> yang kosong (seperti yang sudah pernah dibahas di milis ini)tetapi juga
> belum bisa normal ukurannya..
> trims and wassalam...
>
Mon Aug 26, 2013 2:25 am (PDT) . Posted by:
"Shenly" shenly_excelmania
Assalamualaikun Wr.Wb.
hai teman-teman dan para master beExcelr sekalia, Shenly return to ask , hihihihii...nanya terus bisanya
jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya menggunakan "IF" dengan coding sprti ini :
=IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail lebih besar","Balance"))
penjelasan
SUMMARY = Adalah total jumlah dari TABEL DETAIL
TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report Summary Lebih Besar"
padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai sprti itu yahh....
mohon penjelasannya
Terima kasih
Salam
Shenly ^^*
hai teman-teman dan para master beExcelr sekalia, Shenly return to ask , hihihihii...
jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya menggunakan "IF" dengan coding sprti ini :
=IF(H22>H23,
penjelasan
SUMMARY = Adalah total jumlah dari TABEL DETAIL
TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report Summary Lebih Besar"
padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai sprti itu yahh....
mohon penjelasannya
Terima kasih
Salam
Shenly ^^*
Mon Aug 26, 2013 2:32 am (PDT) . Posted by:
"De Premor" de.premor
Adakah contoh datanya jadi bisa sama2 nyari tau, sapa tau ada angka
desimal yang bersembunyi dibalik batu :D
On 26-08-2013 16:18, Shenly wrote:
> Assalamualaikun Wr.Wb.
> hai teman-teman dan para master beExcelr sekalia, Shenly return to ask
> , hihihihii...nanya terus bisanya *:D tersenyum lebar
> jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara
> SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya
> menggunakan "IF" dengan coding sprti ini :
> =IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail
> lebih besar","Balance"))
> penjelasan
> SUMMARY = Adalah total jumlah dari TABEL DETAIL
> TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
> nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan
> "Report Summary Lebih Besar"
> padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss,
> tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
> tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
> nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai
> sprti itu yahh....
>
> mohon penjelasannya
>
> Terima kasih
> Salam
> Shenly ^^*
>
desimal yang bersembunyi dibalik batu :D
On 26-08-2013 16:18, Shenly wrote:
> Assalamualaikun Wr.Wb.
> hai teman-teman dan para master beExcelr sekalia, Shenly return to ask
> , hihihihii...
> jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara
> SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya
> menggunakan "IF" dengan coding sprti ini :
> =IF(H22>H23,
> lebih besar",
> penjelasan
> SUMMARY = Adalah total jumlah dari TABEL DETAIL
> TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
> nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan
> "Report Summary Lebih Besar"
> padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss,
> tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
> tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
> nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai
> sprti itu yahh....
>
> mohon penjelasannya
>
> Terima kasih
> Salam
> Shenly ^^*
>
Mon Aug 26, 2013 2:35 am (PDT) . Posted by:
"Jan Raisin"
æóÚóáóíúßõãõ áÓóøáÇóãõ æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
susah juga kalo gak ada sample workbooknya..
tapi gini aja deh..
1. coba shenly ke TKP,
2. lalu tekan tombol F2
3. blok H22 dalam formula, lalu tekan tombol F9
4. blok H23 dalam formula, lalu tekan tombol F9
lihat hasilnya sama atau tidak?
coba juga cek pembulatan angka dibelakang desimal
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 26 Agustus 2013 16.18, Shenly <shenly_excelmania@yahoo.co.id > menulis:
> **
>
>
> Assalamualaikun Wr.Wb.
> hai teman-teman dan para master beExcelr sekalia, Shenly return to ask ,
> hihihihii...nanya terus bisanya [image: *:D tersenyum lebar]
> jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara
> SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya
> menggunakan "IF" dengan coding sprti ini :
> =IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail lebih
> besar","Balance"))
> penjelasan
> SUMMARY = Adalah total jumlah dari TABEL DETAIL
> TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
> nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report
> Summary Lebih Besar"
> padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi
> sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
> tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
> nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai
> sprti itu yahh....
>
> mohon penjelasannya
>
> Terima kasih
>
> Salam
> Shenly ^^*
>
>
>
susah juga kalo gak ada sample workbooknya.
tapi gini aja deh..
1. coba shenly ke TKP,
2. lalu tekan tombol F2
3. blok H22 dalam formula, lalu tekan tombol F9
4. blok H23 dalam formula, lalu tekan tombol F9
lihat hasilnya sama atau tidak?
coba juga cek pembulatan angka dibelakang desimal
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 26 Agustus 2013 16.18, Shenly <shenly_excelmania@
> **
>
>
> Assalamualaikun Wr.Wb.
> hai teman-teman dan para master beExcelr sekalia, Shenly return to ask ,
> hihihihii...
> jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara
> SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya
> menggunakan "IF" dengan coding sprti ini :
> =IF(H22>H23,
> besar",
> penjelasan
> SUMMARY = Adalah total jumlah dari TABEL DETAIL
> TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
> nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report
> Summary Lebih Besar"
> padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi
> sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
> tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
> nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai
> sprti itu yahh....
>
> mohon penjelasannya
>
> Terima kasih
>
> Salam
> Shenly ^^*
>
>
>
Mon Aug 26, 2013 3:02 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Coba juga tes pake fungsi  =Exact(x1,x2) buatan Excel.
Salam,
HK
----- Forwarded Message -----
From: Jan Raisin <miss.jan.raisin@gmail.com >
To: belajar-excel@yahoogroups.com
Sent: Monday, 26 August 2013, 2:35
Subject: Re: [belajar-excel] Hasil IF yang aneh?????
Â
 وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
susah juga kalo gak ada sample workbooknya..
tapi gini aja deh..
1. coba shenly ke TKP,
2. lalu tekan tombol F2
3. blok H22 dalam formula, lalu tekan tombol F9
4. blok H23 dalam formula, lalu tekan tombol F9
lihat hasilnya sama atau tidak?
coba juga cek pembulatan angka dibelakang desimal
وَسَÙ'لاَم٠عَلَيÙ'ÙƒÙÙ…Ù' وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
-Miss Jan Raisin-
Pada 26 Agustus 2013 16.18, Shenly <shenly_excelmania@yahoo.co.id > menulis:
>Â
>Assalamualaikun Wr.Wb.
>hai teman-teman dan para master beExcelr sekalia, Shenly return to ask , hihihihii...nanya terus bisanyaÂ
>jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya menggunakan "IF" dengan coding sprti ini :Â
>=IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail lebih besar","Balance"))
>penjelasan
>SUMMARY = Adalah total jumlah dari TABEL DETAIL
>TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
>
>nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report Summary Lebih Besar"Â
>padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
>tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,Â
>nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai sprti itu yahh....
>
>
>mohon penjelasannya
>
>
>Terima kasih
>Â
>Salam
>Shenly ^^*
>
>
Salam,
HK
----- Forwarded Message -----
From: Jan Raisin <miss.jan.raisin@
To: belajar-excel@
Sent: Monday, 26 August 2013, 2:35
Subject: Re: [belajar-excel] Hasil IF yang aneh?????
Â
 وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
susah juga kalo gak ada sample workbooknya.
tapi gini aja deh..
1. coba shenly ke TKP,
2. lalu tekan tombol F2
3. blok H22 dalam formula, lalu tekan tombol F9
4. blok H23 dalam formula, lalu tekan tombol F9
lihat hasilnya sama atau tidak?
coba juga cek pembulatan angka dibelakang desimal
وَسَÙ'لاَم٠عَلَيÙ'ÙƒÙÙ…Ù' وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
-Miss Jan Raisin-
Pada 26 Agustus 2013 16.18, Shenly <shenly_excelmania@
>Â
>Assalamualaikun Wr.Wb.
>hai teman-teman dan para master beExcelr sekalia, Shenly return to ask , hihihihii...
>jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya menggunakan "IF" dengan coding sprti ini :Â
>=IF(H22>
>penjelasan
>SUMMARY = Adalah total jumlah dari TABEL DETAIL
>TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
>
>nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report Summary Lebih Besar"Â
>padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
>tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,Â
>nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai sprti itu yahh....
>
>
>mohon penjelasannya
>
>
>Terima kasih
>Â
>Salam
>Shenly ^^*
>
>
Mon Aug 26, 2013 3:22 am (PDT) . Posted by:
"Shenly" shenly_excelmania
uuppss maaf Pk.De , lupa saya hehehe...ini file nya
Â
Salam
Shenly ^^*
________________________________
Dari: De Premor <de@premor.net>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Senin, 26 Agustus 2013 17:31
Judul: Re: [belajar-excel] Hasil IF yang aneh?????
Â
Adakah contoh datanya jadi bisa sama2 nyari tau, sapa tau ada angka desimal yang bersembunyi dibalik batu :D
On 26-08-2013 16:18, Shenly wrote:
Â
>Assalamualaikun Wr.Wb.
>hai teman-teman dan para master beExcelr sekalia, Shenly return to ask , hihihihii...nanya terus bisanyaÂ
>jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya menggunakan "IF" dengan coding sprti ini :Â
>=IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail lebih besar","Balance"))
>penjelasan
>SUMMARY = Adalah total jumlah dari TABEL DETAIL
>TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
>
>nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report Summary Lebih Besar"Â
>padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
>tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,Â
>nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai sprti itu yahh....
>
>
>mohon penjelasannya
>
>
>Terima kasih
>Â
>Salam
>Shenly ^^*
Â
Salam
Shenly ^^*
____________
Dari: De Premor <de@premor.net>
Kepada: belajar-excel@
Dikirim: Senin, 26 Agustus 2013 17:31
Judul: Re: [belajar-excel] Hasil IF yang aneh?????
Â
Adakah contoh datanya jadi bisa sama2 nyari tau, sapa tau ada angka desimal yang bersembunyi dibalik batu :D
On 26-08-2013 16:18, Shenly wrote:
Â
>Assalamualaikun Wr.Wb.
>hai teman-teman dan para master beExcelr sekalia, Shenly return to ask , hihihihii...
>jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya menggunakan "IF" dengan coding sprti ini :Â
>=IF(H22>
>penjelasan
>SUMMARY = Adalah total jumlah dari TABEL DETAIL
>TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
>
>nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report Summary Lebih Besar"Â
>padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
>tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,Â
>nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai sprti itu yahh....
>
>
>mohon penjelasannya
>
>
>Terima kasih
>Â
>Salam
>Shenly ^^*
Mon Aug 26, 2013 3:30 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wassalamu'alaikum Wr. Wb.
Biasanya kasus seperti ini disebabkan oleh adanya digit dibelakang koma ke
- lebih dari 4 yang ndak nol.
Jika ada formula berbunyi :
=IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail lebih
besar","Balance"))
coba ganti semua H22 dengan Round( H22 , 2 ) dan H23 dengan Round( H23 , 2
) jika diasumsikan bahwa cukup dibulatkan hingga 2 digit dibelakang koma
(misalnya saja nilai uang yang ketelitiannya sampai level cent)
Wassalamu'alaikum Wr. Wb.
Kid.
2013/8/26 Shenly <shenly_excelmania@yahoo.co.id >
> **
>
>
> Assalamualaikun Wr.Wb.
> hai teman-teman dan para master beExcelr sekalia, Shenly return to ask ,
> hihihihii...nanya terus bisanya [image: *:D tersenyum lebar]
> jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara
> SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya
> menggunakan "IF" dengan coding sprti ini :
> =IF(H22>H23,"Report Summary lebih besar",IF(H23>H22,"Report Detail lebih
> besar","Balance"))
> penjelasan
> SUMMARY = Adalah total jumlah dari TABEL DETAIL
> TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
> nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report
> Summary Lebih Besar"
> padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi
> sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
> tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
> nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai
> sprti itu yahh....
>
> mohon penjelasannya
>
> Terima kasih
>
> Salam
> Shenly ^^*
>
>
>
Biasanya kasus seperti ini disebabkan oleh adanya digit dibelakang koma ke
- lebih dari 4 yang ndak nol.
Jika ada formula berbunyi :
=IF(H22>H23,
besar",
coba ganti semua H22 dengan Round( H22 , 2 ) dan H23 dengan Round( H23 , 2
) jika diasumsikan bahwa cukup dibulatkan hingga 2 digit dibelakang koma
(misalnya saja nilai uang yang ketelitiannya sampai level cent)
Wassalamu'
Kid.
2013/8/26 Shenly <shenly_excelmania@
> **
>
>
> Assalamualaikun Wr.Wb.
> hai teman-teman dan para master beExcelr sekalia, Shenly return to ask ,
> hihihihii...
> jadi begini master, sya kan membuat sebuah REPORT PERBANDINGAN, antara
> SUMMARY dengan TABEL DETAIL, untuk fungsinya cukup sederhana, saya
> menggunakan "IF" dengan coding sprti ini :
> =IF(H22>H23,
> besar",
> penjelasan
> SUMMARY = Adalah total jumlah dari TABEL DETAIL
> TABEL DETIL = Adalah rincian secara detail mengenai transaki customer
>
> nah ketika saya cek REPORT PERBANDINGAN , ternyata ada keterangan "Report
> Summary Lebih Besar"
> padahal sudah sya lihat dengan mata Blotot nilainya sama perciisssss, tapi
> sesudah sya cek ulang, ternyata ada perbandingan 1 (satu)
> tapi yang anehnya ko di total SUMMARY sama TABEL DETAIL ko sama yah,
> nah yang jadi pertanyaan saya, ko Fungsi "IF" bisa menghasilkan nilai
> sprti itu yahh....
>
> mohon penjelasannya
>
> Terima kasih
>
> Salam
> Shenly ^^*
>
>
>
Mon Aug 26, 2013 2:51 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Ini sekedar tambahan variasi bahwa dengan formula (singkat) ternyata proses juga bisa cepat.
(Maaf Pak De, pinjam variabelnya).
Sub TesIseng()
Dim trow, total
trow = Timer
Range("A1:A100000").Formula = "=Row()"
total = Timer - trow
Range("B1") = total & " detik"
End Sub
Salam,
HK
----- Forwarded Message -----
From: De Premor <de@premor.net>
To: belajar-excel@yahoogroups.com
Sent: Monday, 26 August 2013, 0:10
Subject: Re: [belajar-excel] Tes Looping For ... Next dan For each ... Next
Keren Miss Jan hasilnya, berikut hasil dari tes detailnya ditempat saya setelah loop datanya ditambah sampai 1Jt row, soalnya kalau 100rb aja, nga ketahuan hasilnya loop nya saja, kecepeten :(
Setelah diubah ke 1jt berikut hasilnya
1. Loop nya saja
2. Loop ditambah Ngisi ke array
3. Loop + Ngisi Array + Ngirim Ke Worksheet
Hasilnya
On 26-08-2013 9:53, Jan Raisin wrote:
>mr Kid.. izin untuk nge-tes dan modifikasi skripnya ya ^_^
>
>biar ketularan pinternya xixixixi ^_^
>
>
>Public Sub Ikutan()
> Dim rng As Range
> Dim lArr(0 To 99999, 0 To 0) As Long, lLoop As Long
> Dim dblTime As Double
> dblTime = Timer
> Set rng = Range("z1:z100000")
> For lLoop = 1 To 100000
> lArr(lLoop - 1, 0) = lLoop
> Next lLoop
> rng.Value = lArr
> dblTime = Timer - dblTime
> MsgBox "Waktu proses : " & dblTime & " detik"
>End Sub
>
>
>skrip yang Jan edit ditandai dengan warna merah dan menghasilkan nilai yang tepat untuk 100k data
>
>
>skrip dari mr. Kid ini memberikan pencerahan kepada Jan bahwa:
>1. setiap cell pada dasarnya tersusun sebagai array multi dimensi
>2. cara menghindari proses transpose array saat akan menulis data ke cel sehingga bisa menghemat waktu komputasi dan menghindari batasan jumlah data yang bisa ditranspose.
>
>
>skrip dari mr Kid adalah yang tercepat dari semua cara yang sudah Jan coba.. Superb..
>
>
>terima kasih, untuk pak De Premor yang sudah bersedia mengetes For Each vs For To.. hasil tesnya memberikan wawasan baru untuk Jan.. biasanya Jan selalu memilih For Each.. tapi sekarang akan melihat kondisi kasusnya dulu.. karena ternyata For To lebih cepat dari For Each..
>
>
>terima kasih untuk pak Hendrik.. dengan adanya thread seperti ini sangat membantu sekali untuk mengembangkan pengetahuan Be-Exceller.. biasanya newbie yang bertanya tapi sekarang masternya yang langsung memberikan kasus.. ^_^
>
>
>salam,
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 25 Agustus 2013 01.02, hendrik karnadi <hendrikkarnadi@yahoo.com > menulis:
>
>
>>Terima kasih Mr Kid.
>>Untuk Looping 100000 waktunya hanya 0,063 detik, tapi angkanya 0 semua, bukan 1 s/d 100000.
>>
>>
>>Salam,
>>HK
>>
>>
>>
>>________________________________
>> From: Mr. Kid <mr.nmkid@gmail.com >
>>To: BeExcel <belajar-excel@yahoogroups.com >
>>Sent: Sunday, 25 August 2013, 0:44
>>
>>Subject: Re: [belajar-excel] Tes Looping For ... Next dan For each ... Next
>>
>>
>>
>>
>>Coba :
>>
Public sub Ikutan()
>>
>> dim rng as range
>>
>> dim lArr(1 to 60000,1) as long, lLoop as long
>>
>> dim dblTime as double
>>
>> dbltime=timer
>>
>> set rng=range("z1:z60000")
>>
>> for lLoop=1 to 60000
>>
>> larr(lLoop,1)=lLoop
>>
>> next lLoop
>>
>> rng.value=lArr
>>
>> dblTime=timer-dbltime
>>
>> msgbox "Waktu proses : " & dbltime & " detik"
>>
end sub
>>
>>
>>Katanya fungsi transpose Excel terbatasi array-nya sebanyak 2^16, ada yang bilang 2^24. Mungkin yang 2^16 di Office 32 bit dan 2^24 di Office 64 bit (tapi gak yakin juga kalau begitu). Yang jelas, tidak ada dokumentasi resmi tentang hal ini.
>>
>>
>>Sebuah cell pada dasarnya dibentuk sebagai array 2 dimensi (1 to 1,1 to 1)
>>
>>
>>
>>Walaupun topik ini menggunakan baris kode seperti membuat nomor urut, sebaiknya setiap pembuatan nomor urut tidak terpaku pada proses loop seperti ini saja. Untuk proses komputasi yang tidak sekedar membuat nomor urut, maka topik ini bisa menjadi sebuah wacana untuk menyusun solusi masalah yang dihadapi pada dunia nyata.
>>
>>
>>
>>Wassalam,
>>
>>Kid.
>>
>>
>>
>>2013/8/24 hendrik karnadi <hendrikkarnadi@yahoo.com >
>>
>>
>>>Terima kasih Miss Jan atas variasi codenya.
>>>
>>>
>>>Hasil tes terakhir dengan looping 60000 adalah sebagai berikut:
>>>16.81 detik<--TES1 'For ... Next dengan formula
>>>1.24 detik<--TES2 'For ... Next tanpa formula
>>>1.37 detik<--TES3 'For each ... Next tanpa formula (For each r in Rng)
>>>1.34 detik<--TES4 'For each ... Next dengan formula (For each Rng in Rng)
>>>0.05 detik<--TES5 (MJR) 'Tranpose Array
>>>
>>>
>>>Code Miss Jan saya modifikasi sbb:
>>>Sub Tes5()
>>> Dim TStart As Single
>>> Dim myArray(0 To 59999) As Long 'sebelumnya 9999
>>> Dim i As Long
>>> Dim rng As Range
>>>
>>> TStart = Timer
>>> For i = 1 To 60000 'sebelumnya 10000
>>> myArray(i - 1) = i
>>> Next i
>>> Set rng = Range("o1:o60000") 'sebelumnya 10000
>>> rng.Value = Application.WorksheetFunction.Transpose(myArray)
>>> Range("E5").Value = Format(Timer - TStart, "#,##0.0000")
>>>End Sub
>>>
>>>
>>>Jadi code Miss Jan is the best.
>>>
>>>
>>>Kesimpulannya:
>>>- Tes2 lebih cepat dari Tes3 dan Tes4 (saya sependapat dengan Miss Jan) karena ada proses pencarian r atau Rng pada code: Range("C" & r.Row) = r.Rowatau Range("D" & Rng.Row) = Rng.Row
>>>- Proses Array jauh lebih cepat, namun menyisakan satu pertanyaan .... (mengapa 100k atau bahkan 70k selalu gagal dengan pesan kesalahan "Type mismatch" pada code:
>>>rng.Value = Application.WorksheetFunction.Transpose(myArray)
>>>
>>>
>>>Salam,
>>>HK
>>>
>>>
>>>
>>>
>>>
>>>________________________________
>>> From: Jan Raisin <miss.jan.raisin@gmail.com >
>>>To: belajar-excel@yahoogroups.com
>>>Sent: Saturday, 24 August 2013, 14:10
>>>Subject: Re: [belajar-excel] Tes Looping For ... Next dan For each ... Next
>>>
>>>
>>>
>>>
>>>boleh jawab kan pak Hendrik..
>>>
>>>
>>>sepengetahuan Jan, For Each - Next bekerja lebih cepat dibandingkan dengan For To - Next, karena pada For Each tidak ada proses menghitung lebih dahulu
>>>ilustrasinya adalah begini:
>>>
>>>
>>>Di atas meja makan ada combro (kenapa combro? karena Jan senang makan combro xixixixi ^_^)
>>>
>>>
>>>perintah 1: Untuk setiap combro yang ada, makan sampai habis >> for each
>>>akan lebih cepat prosesnya jika dibandingkan dengan
>>>
>>>
>>>perintah 2: Untuk combro ke 1 sampai ke sekian makan sampai habis >> for to
>>>karena pada perintah ke-2 ada proses menghitung dahulu sebelum Be-Exceller memakan combro yang ada di atas meja
>>>
>>>
>>>Tetapi hal ini akan akan berbeda jika ada pekerjaan yang harus dijalankan lagi di dalam blok for each
>>>pekerjaannya mana? bisa dilihat dari setiap titik yang ada dalam script
>>>1 buah titik mewakili 1 buah pekerjaan atau proses
>>>
>>>
>>>misal:
>>>range("a1").select
>>>selection.value = 1
>>>
>>>
>>>akan diproses lebih lama dibandingkan script
>>>range("a1").value = 1
>>>
>>>
>>>walau pun perbedaannya di komputer sekarang hampir tidak terasa
>>>
>>>
>>>coba lihat di prosedur Tes3 dan Tes4 saat akan memasukan nilai ada 1 buah pekerjaan yang harus dilakukan dahulu yaitu mencari nilai barisnya terlebih dahulu
>>>sedangkan di prosedur Tes2 tidak ada pekerjaan tersebut
>>>
>>>
>>>oia.. Jan mau nyumbang script.. tapi minta tolong semua batasannya diturunin dari 100k baris menjadi 10k baris
>>>karena pada saat proses transpose untuk 100k selalu gagal.. mungkin nanti mr Kid atau pak Anton bisa memberikan penjelasan penyebab gagalnya transpose tersebut.
>>>
>>>
>>>prosesnya memanfaatkan array, karena proses baca tulis ke range lebih lambat dibandingkan proses baca tulis melalui array
>>>
>>>
>>>Sub Tes5()
>>> Dim TStart As Single
>>> Dim myArray(0 To 9999) As Long
>>> Dim i As Long
>>> Dim rng As Range
>>>
>>> TStart = Timer
>>> For i = 1 To 10000
>>> myArray(i - 1) = i
>>> Next i
>>> Set rng = Range("o1:o10000")
>>> rng.Value = Application.WorksheetFunction.Transpose(myArray)
>>> Range("E5").Value = Format(Timer - TStart, "#,##0.0000")
>>>End Sub
>>>
>>>
>>>silakan coba dibandingkan hasilnya, di komputer Jan script tersebut berjalan 32 x lebih cepat dibandingkan Tes2
>>>
>>>
>>>salam,
>>>
>>>
>>>
>>>
>>>-Miss Jan Raisin-
>>>
>>>
>>>Pada 24 Agustus 2013 11.25, hendrik karnadi <hendrikkarnadi@yahoo.com > menulis:
>>>
>>>
>>>>Dear Be Excellers,
>>>>Terlampir adalah hasil uji coba (tes) Looping For ... Next dan For each ... Next pake timer.
>>>>
>>>>
>>>>Pertanyaan:
>>>>Mengapa dengan menggunakan For ... Next (Tes2, tanpa formula) hasilnya lebih cepat dibandingkan dengan For each ... Next (Tes3 dan Tes 4).
>>>>
>>>>
>>>>Salam,
>>>>HK
>>>>
>>>>
>>>
>>>
>>
>>
>>
>
(Maaf Pak De, pinjam variabelnya)
Sub TesIseng()
Dim trow, total
trow = Timer
Range("
total = Timer - trow
Range("
End Sub
Salam,
HK
----- Forwarded Message -----
From: De Premor <de@premor.net>
To: belajar-excel@
Sent: Monday, 26 August 2013, 0:10
Subject: Re: [belajar-excel] Tes Looping For ... Next dan For each ... Next
Keren Miss Jan hasilnya, berikut hasil dari tes detailnya ditempat saya setelah loop datanya ditambah sampai 1Jt row, soalnya kalau 100rb aja, nga ketahuan hasilnya loop nya saja, kecepeten :(
Setelah diubah ke 1jt berikut hasilnya
1. Loop nya saja
2. Loop ditambah Ngisi ke array
3. Loop + Ngisi Array + Ngirim Ke Worksheet
Hasilnya
On 26-08-2013 9:53, Jan Raisin wrote:
>mr Kid.. izin untuk nge-tes dan modifikasi skripnya ya ^_^
>
>biar ketularan pinternya xixixixi ^_^
>
>
>Public Sub Ikutan()
> Dim rng As Range
> Dim lArr(0 To 99999, 0 To 0) As Long, lLoop As Long
> Dim dblTime As Double
> dblTime = Timer
> Set rng = Range("
> For lLoop = 1 To 100000
> lArr(lLoop - 1, 0) = lLoop
> Next lLoop
> rng.Value = lArr
> dblTime = Timer - dblTime
> MsgBox "Waktu proses : " & dblTime & " detik"
>End Sub
>
>
>skrip yang Jan edit ditandai dengan warna merah dan menghasilkan nilai yang tepat untuk 100k data
>
>
>skrip dari mr. Kid ini memberikan pencerahan kepada Jan bahwa:
>1. setiap cell pada dasarnya tersusun sebagai array multi dimensi
>2. cara menghindari proses transpose array saat akan menulis data ke cel sehingga bisa menghemat waktu komputasi dan menghindari batasan jumlah data yang bisa ditranspose.
>
>
>skrip dari mr Kid adalah yang tercepat dari semua cara yang sudah Jan coba.. Superb..
>
>
>terima kasih, untuk pak De Premor yang sudah bersedia mengetes For Each vs For To.. hasil tesnya memberikan wawasan baru untuk Jan.. biasanya Jan selalu memilih For Each.. tapi sekarang akan melihat kondisi kasusnya dulu.. karena ternyata For To lebih cepat dari For Each..
>
>
>terima kasih untuk pak Hendrik.. dengan adanya thread seperti ini sangat membantu sekali untuk mengembangkan pengetahuan Be-Exceller.
>
>
>salam,
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 25 Agustus 2013 01.02, hendrik karnadi <hendrikkarnadi@
>
>
>>Terima kasih Mr Kid.
>>Untuk Looping 100000 waktunya hanya 0,063 detik, tapi angkanya 0 semua, bukan 1 s/d 100000.
>>
>>
>>Salam,
>>HK
>>
>>
>>
>>____
>> From: Mr. Kid <mr.nmkid@gmail.
>>To: BeExcel <belajar-excel@
>>Sent: Sunday, 25 August 2013, 0:44
>>
>>Subject: Re: [belajar-excel] Tes Looping For ... Next dan For each ... Next
>>
>>
>>
>>
>>Coba :
>>
Public sub Ikutan()
>>
>> dim rng as range
>>
>> dim lArr(1 to 60000,1) as long, lLoop as long
>>
>> dim dblTime as double
>>
>> dbltime=timer
>>
>> set rng=range("
>>
>> for lLoop=1 to 60000
>>
>> larr(lLoop,1)
>>
>> next lLoop
>>
>> rng.value=lArr
>>
>> dblTime=timer-
>>
>> msgbox "Waktu proses : " & dbltime & " detik"
>>
end sub
>>
>>
>>Katanya fungsi transpose Excel terbatasi array-nya sebanyak 2^16, ada yang bilang 2^24. Mungkin yang 2^16 di Office 32 bit dan 2^24 di Office 64 bit (tapi gak yakin juga kalau begitu). Yang jelas, tidak ada dokumentasi resmi tentang hal ini.
>>
>>
>>Sebuah cell pada dasarnya dibentuk sebagai array 2 dimensi (1 to 1,1 to 1)
>>
>>
>>
>>Walaupun topik ini menggunakan baris kode seperti membuat nomor urut, sebaiknya setiap pembuatan nomor urut tidak terpaku pada proses loop seperti ini saja. Untuk proses komputasi yang tidak sekedar membuat nomor urut, maka topik ini bisa menjadi sebuah wacana untuk menyusun solusi masalah yang dihadapi pada dunia nyata.
>>
>>
>>
>>Wassalam,
>>
>>Kid.
>>
>>
>>
>>2013/
>>
>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>> Dim TStart As Single
>>> Dim myArray(0 To 59999) As Long 'sebelumnya 9999
>>> Dim i As Long
>>> Dim rng As Range
>>>
>>> TStart = Timer
>>> For i = 1 To 60000 'sebelumnya 10000
>>> myArray(i - 1) = i
>>> Next i
>>> Set rng = Range("
>>> rng.Value = Application.
>>> Range("
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>> From: Jan Raisin <miss.jan.raisin@
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>> Dim TStart As Single
>>> Dim myArray(0 To 9999) As Long
>>> Dim i As Long
>>> Dim rng As Range
>>>
>>> TStart = Timer
>>> For i = 1 To 10000
>>> myArray(i - 1) = i
>>> Next i
>>> Set rng = Range("
>>> rng.Value = Application.
>>> Range("
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>
>>
>>
>
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