Selasa, 19 Maret 2013

[belajar-excel] Digest Number 2173

15 New Messages

Digest #2173
1a
Re: formula gabungan if ,and dan vlookup by "Mr. Kid" nmkid.family@ymail.com
2a
2b
Re: Bls: [belajar-excel] Kopi Darat BeExcel by "Yusril Ramadani" yusril_rmd
2c
Re: Bls: [belajar-excel] Kopi Darat BeExcel by "Mr. Kid" nmkid.family@ymail.com
3
Bikin Kartu Stok by "A. Zainal H." urangbanua5
4a
Re: Form Data Base by "Andre Rahmaidy Teeza" andre_teeza_bn
4b
Re: Form Data Base by "hendrik karnadi" hendrikkarnadi
4c
Re: Form Data Base by "Andre Rahmaidy Teeza" andre_teeza_bn
7c
Re: Pencarian cel dengan nilai kosong by "zainul_ulum[at]yahoo[dot]com" zainul_ulum
7d
Re: Pencarian cel dengan nilai kosong by "zainul_ulum[at]yahoo[dot]com" zainul_ulum

Messages

Tue Mar 19, 2013 4:42 pm (PDT) . Posted by:

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

Formula ini :
=VLOOKUP( C3 , $B$28:$D$31 , 2 + ( D3 = "Belum" ) , 0 )

Diubah agar menggunakan IF adalah sebagai berikut :
=IF( D3 = "Belum" , VLOOKUP( C3 , $B$28:$D$31 , 3 , 0 ) , VLOOKUP( C3
, $B$28:$D$31 , 2 , 0 ) )

Wassalam,
Kid.

2013/3/20 Yosafat Candradireja <yos.can23@gmail.com>

> **
>
>
> Terima kasih Bro Kid, tapi apa bisa saya dapat yang pake if, and dan
> vlookup (formula gabungan)
>
>
> 2013/3/20 Mr. Kid <mr.nmkid@gmail.com>
>
> **
>>
>>
>> Pada cell hasil di baris 3 diberi formula :
>> =VLOOKUP( C3 , $B$28:$D$31 , 2 + ( D3 = "Belum" ) , 0 )
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>> 2013/3/19 Yosafat Candradireja <yos.can23@gmail.com>
>>
>>> **
>>>
>>>
>>> terimakasih saya lampirkan contoh tabel yang menjadikan saya mumet ngisi
>>> untuk tunjangannya, trims kalau bisa jawaban secepatnya
>>>
>>>
>>> 2013/3/19 Yosafat <yos.can23@gmail.com>
>>>
>>>> **
>>>>
>>>>
>>>> Tolong berikan contoh rumus gabungan =if(and(vlookup ......... dengan 2
>>>> persyaratan kriteria
>>>> Contoh bila golongan 2A sudah menikah gaji 300000 belum 200000
>>>> 2B sudah menikah gaji 350000 belum 250000
>>>> 2C sudah menikah gaji 400000 belum 300000
>>>> 2D sudah menikah gaji 450000 belum 350000
>>>>
>>>> --- Mods ---
>>>> Tolong lampirkan contoh data. Bila perlu, tabelkan saja semua kriteria.
>>>> Lakukan posting melalui akun email pribadi Anda (compose dari inbox)
>>>> kemudian sertakan attachment file.
>>>> Batas maksimal file lampiran berisi contoh data adalah 250KB (lihat
>>>> peraturan milis).
>>>> File lampiran akan memudahkan pihak yang diharap dapat membantu.
>>>> ------------
>>>>
>>>
>>>
>>
>
>

Tue Mar 19, 2013 5:34 pm (PDT) . Posted by:

"Aliif Akbar" aliif.akbar

Selamat pagi,

Database kopi darat yang dibuat momod ada yang dobel, momod bisa perbaiki kah?
Terimakasih.

Aliif


Sent from my BlackBerry® smartphone from Sinyal Bagus XL, Nyambung Teruuusss...!

-----Original Message-----
From: Kamirin Faqoth <kamirin_2@yahoo.co.id>
Sender: belajar-excel@yahoogroups.com
Date: Wed, 20 Mar 2013 00:22:11
To: belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Bls: [belajar-excel] Kopi Darat BeExcel

Ikut yaaaa
Kamirin
Bekasi
085716106623

Dikirim dari Yahoo! Mail pada Android



Tue Mar 19, 2013 5:59 pm (PDT) . Posted by:

"Yusril Ramadani" yusril_rmd

Ikut ya

Yusril
081586401108

2013/3/20 Aliif Akbar <aliif.akbar@yahoo.co.id>

> **
>
>
> **Selamat pagi,
>
> Database kopi darat yang dibuat momod ada yang dobel, momod bisa perbaiki
> kah?
> Terimakasih.
>
>
> Aliif
>
> Sent from my BlackBerry® smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...!
> ------------------------------
> *From: *Kamirin Faqoth <kamirin_2@yahoo.co.id>
> *Sender: *belajar-excel@yahoogroups.com
> *Date: *Wed, 20 Mar 2013 00:22:11 +0800 (SGT)
> *To: *belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
> *ReplyTo: *belajar-excel@yahoogroups.com
> *Subject: *Bls: [belajar-excel] Kopi Darat BeExcel
>
>
>
> Ikut yaaaa
> Kamirin
> Bekasi
> 085716106623
>
> Dikirim dari Yahoo! Mail pada Android
>
>
>

Tue Mar 19, 2013 6:00 pm (PDT) . Posted by:

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

Silakan entry data di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=2

2013/3/20 Yusril Ramadani <yusrilramadani@gmail.com>

> **
>
>
> Ikut ya
>
> Yusril
> 081586401108
>
>
>
>
> 2013/3/20 Aliif Akbar <aliif.akbar@yahoo.co.id>
>
>> **
>>
>>
>> **Selamat pagi,
>>
>> Database kopi darat yang dibuat momod ada yang dobel, momod bisa perbaiki
>> kah?
>> Terimakasih.
>>
>>
>> Aliif
>>
>> Sent from my BlackBerry® smartphone from Sinyal Bagus XL, Nyambung
>> Teruuusss...!
>> ------------------------------
>> *From: *Kamirin Faqoth <kamirin_2@yahoo.co.id>
>> *Sender: *belajar-excel@yahoogroups.com
>> *Date: *Wed, 20 Mar 2013 00:22:11 +0800 (SGT)
>> *To: *belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
>> *ReplyTo: *belajar-excel@yahoogroups.com
>> *Subject: *Bls: [belajar-excel] Kopi Darat BeExcel
>>
>>
>>
>> Ikut yaaaa
>> Kamirin
>> Bekasi
>> 085716106623
>>
>> Dikirim dari Yahoo! Mail pada Android
>>
>>
>
>

Tue Mar 19, 2013 6:48 pm (PDT) . Posted by:

kamirin_2

Iyah, sy kemarin login pke hp touch, jadi klo pencet delete, jd enter, maklum jempolnya kededean.
Hiks...hiks...hiks...

Salam,
Kamirin
Sent from my BlackBerry®
powered by Sinyal Kuat INDOSAT

-----Original Message-----
From: Yusril Ramadani <yusrilramadani@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Wed, 20 Mar 2013 07:57:18
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: Bls: [belajar-excel] Kopi Darat BeExcel

Ikut ya

Yusril
081586401108




2013/3/20 Aliif Akbar <aliif.akbar@yahoo.co.id>

> **
>
>
> **Selamat pagi,
>
> Database kopi darat yang dibuat momod ada yang dobel, momod bisa perbaiki
> kah?
> Terimakasih.
>
>
> Aliif
>
> Sent from my BlackBerry® smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...!
> ------------------------------
> *From: *Kamirin Faqoth <kamirin_2@yahoo.co.id>
> *Sender: *belajar-excel@yahoogroups.com
> *Date: *Wed, 20 Mar 2013 00:22:11 +0800 (SGT)
> *To: *belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
> *ReplyTo: *belajar-excel@yahoogroups.com
> *Subject: *Bls: [belajar-excel] Kopi Darat BeExcel
>
>
>
> Ikut yaaaa
> Kamirin
> Bekasi
> 085716106623
>
> Dikirim dari Yahoo! Mail pada Android
>
>
>

Tue Mar 19, 2013 5:34 pm (PDT) . Posted by:

"A. Zainal H." urangbanua5

Assalamu alaikum wr. wb.
 
Dear para Master Exceler
Mohon bantuannya untuk kasus saya ini
 
Saya newbie disini dan juga saya masih belajar tentang formula excel
Saya ingin membikin kartu stok yang berurutan sesuai tanggal
baik barang masuk maupun barang keluarnya seperti file terlampir
Mohon maaf apabila apabila ada kekeliruan atau penjelasan yang saya berikan kurang jelas
Terima kasih banyak atas bantuannya
 
Brgrds,
A. Zainal H.

Tue Mar 19, 2013 6:00 pm (PDT) . Posted by:

"Andre Rahmaidy Teeza" andre_teeza_bn

Maaf Mr.Kid filenya kelupaan di upload.. saya upload filenya.

Wassalam
Andree.
 

________________________________
From: Mr. Kid <mr.nmkid@gmail.com>
To: belajar-excel@yahoogroups.com
Sent: Tuesday, March 19, 2013 6:47 PM
Subject: Re: [belajar-excel] Form Data Base


 
Tampaknya si file lampiran ketinggalan.

Wassalam,
Kid.

2013/3/19 Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com>

> 
>Soree Beexceler
>
>
>saya mau tanya tentang coding VBA untuk form input data base khususnya untuk edit data base.. mohon bantuannya ya para master excel. file contoh terlampir
>
>
>
>
>
>
>
>
>wassalam
>
>
>
>
>andree 
>

Tue Mar 19, 2013 6:52 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Barangkali warisan si Mbah ini dikombinasikan dengan ide Historical Database dari  Mr. Kid (tambah sedikit update dari saya) ini bisa menjadi contoh untuk dikembangkan lebih lanjut.

Salam,
HK

________________________________
From: Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com>
To: "belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
Sent: Wednesday, 20 March 2013, 7:59
Subject: Re: [belajar-excel] Form Data Base


 
Maaf Mr.Kid filenya kelupaan di upload.. saya upload filenya.

Wassalam
Andree.
 

________________________________
From: Mr. Kid <mr.nmkid@gmail.com>
To: belajar-excel@yahoogroups.com
Sent: Tuesday, March 19, 2013 6:47 PM
Subject: Re: [belajar-excel] Form Data Base


 
Tampaknya si file lampiran ketinggalan.

Wassalam,
Kid.

2013/3/19 Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com>

> 
>Soree Beexceler
>
>
>saya mau tanya tentang coding VBA untuk form input data base khususnya untuk edit data base.. mohon bantuannya ya para master excel. file contoh terlampir
>
>
>
>
>
>
>
>
>wassalam
>
>
>
>
>andree 
>

Tue Mar 19, 2013 7:03 pm (PDT) . Posted by:

"Andre Rahmaidy Teeza" andre_teeza_bn

Pagii,

Thanks ya om hendrik atas infonya saya pelajari dulu om

Wassalam
Andree

________________________________
From: hendrik karnadi <hendrikkarnadi@yahoo.com>
To: "belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
Sent: Wednesday, March 20, 2013 8:51 AM
Subject: Re: [belajar-excel] Form Data Base


 
Barangkali warisan si Mbah ini dikombinasikan dengan ide Historical Database dari  Mr. Kid (tambah sedikit update dari saya) ini bisa menjadi contoh untuk dikembangkan lebih lanjut.

Salam,
HK

________________________________
From: Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com>
To: "belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
Sent: Wednesday, 20 March 2013, 7:59
Subject: Re: [belajar-excel] Form Data Base


 
Maaf Mr.Kid filenya kelupaan di upload.. saya upload filenya.

Wassalam
Andree.
 

________________________________
From: Mr. Kid <mr.nmkid@gmail.com>
To: belajar-excel@yahoogroups.com
Sent: Tuesday, March 19, 2013 6:47 PM
Subject: Re: [belajar-excel] Form Data Base


 
Tampaknya si file lampiran ketinggalan.

Wassalam,
Kid.

2013/3/19 Andre Rahmaidy Teeza <andre_teeza_bn@yahoo.com>

> 
>Soree Beexceler
>
>
>saya mau tanya tentang coding VBA untuk form input data base khususnya untuk edit data base.. mohon bantuannya ya para master excel. file contoh terlampir
>
>
>
>
>
>
>
>
>wassalam
>
>
>
>
>andree 
>

Tue Mar 19, 2013 6:08 pm (PDT) . Posted by:

"Cecep W" juragan_75

Terimakasih banyak Mr.Kid atas solusinya..
solusinya maknyusssss.....tokcer takewer-kewer pokona mah......
penjelasanya juga cetar membahana......

senangnya saya sulit diungkapkan dengan kata2 deh...
sekali lagi terimakasih banyak....

Best regards
CW

Pada 19 Maret 2013 22.49, Mr. Kid <mr.nmkid@gmail.com> menulis:

> **
>
>
> Step by step menulis formula berbunyi :
>
> =SUMPRODUCT(($A$3:$A$17=C$25)*($B$3:$B$17=$B26)*(IF($B26="Jakarta&quot;,$C$20:$F$20,$C$21:$F$21)=$A26)*$C$3:$F$17)
>
> langsung tulis di cell ya, ndak usah pakai dialog function builder biar
> gak ruwet akibat sempitnya ruang nulis.
> Jika formula bar bisa di lebarkan, lebih baik lagi jika ditulis di formula
> bar
>
> Sebelum mulai, mari perhatikan setiap penyusun formulanya :
> =SUMPRODUCT( ( $A$3:$A$17=C$25 ) * ( $B$3:$B$17=$B26 ) * ( *IF(
> $B26="Jakarta&quot; , $C$20:$F$20 , $C$21:$F$21 )* = $A26 ) * $C$3:$F$17 )
>
> Step-by-step di cell hasil (atau di formula bar di cell hasil) -> gunakan
> mouse (klik) untuk memindahkan kursor dalam proses penulisan formula
> 1. tulis =SumProduct()
> 2. beri spasi yang banyak diantara tanda kurungnya -> jadi :
> =SumProduct( )
> 3. formula punya 4 area (warna) yang dipisah dengan * [perkalian antar
> item yang setara logika AND], maka buat 4 area tersebut
> =SumProduct( * * * )
> 4. pada area pertama (urut dari kiri) akan diisi suatu perbandingan
> berbunyi : ( $A$3:$A$17=C$25 )
> A. buat sepasang kurung, karena proses perbandingan suka tinggal dalam
> kurungan
> =SumProduct( () * * * )
> B. beri spasi yang banyak di antara kurungan yang baru itu
> =SumProduct( ( ) * * * )
> C. letakkan kursor di tengah kurungan baru
> D. blok cell A3:A17 lalu tekan F4 agar menjadi referensi absloute
> =SumProduct( ( $A$3:$A$17 ) * * * )
> E. tekan tombol sama dengan dan akan tampak seperti :
> =SumProduct( ( $A$3:$A$17 = ) * * * )
> F. letakkan kursor dalam kurung tepat setelah sama dengan
> G. klik cell C25 lalu tekan F4 berulang kali agar tampilan C25 menjadi
> C$25 (absolute baris) yang akan menghasilkan bentuk :
> =SumProduct( ( $A$3:$A$17 = C$25 ) * * * )
> H. Area pertama selesai, dan letakkan kursor pada area berikutnya
> 5. lakukan seperti area pertama tadi di area kedua, yang harus
> menghasilkan ( $B$3:$B$17=$B26 )
> 6. hasil nomor 5 akan seperti :
> =SumProduct( ( $A$3:$A$17 = C$25 ) * ( $B$3:$B$17=$B26 )
> * * )
> 7. diarea ketiga ( *IF( $B26="Jakarta&quot; , $C$20:$F$20 , $C$21:$F$21 )* =
> $A26 )
> A. buat kurungan yang disertai banyak spasi
> =SumProduct( ( $A$3:$A$17 = C$25 ) * ( $B$3:$B$17=$B26 )
> * ( ) * )
> B. tulis paket fungsi IF() dan isi spasi dalam fungsi IF
> =SumProduct( ( $A$3:$A$17 = C$25 ) * ( $B$3:$B$17=$B26 )
> * ( IF( ) ) * )
> C. ketik = setelah fungsi IF dilanjutkan tunjuk cell A26 disertai
> tekan tombol F4 berulang agar absolute kolom
> =SumProduct( ( $A$3:$A$17 = C$25 ) * ( $B$3:$B$17=$B26 )
> * ( IF( ) = $A26 ) * )
> D. letakkan kursor dalam kurungnya IF dan buat area fungsi IF (3 area)
> (note : jika regional setting komputer Anda Indonesia, gunakan
> titik koma. Jika regional setting English gunakan koma)
> *** komputer saya pakai English, jadi saya pakai koma, Anda
> beradaptasi dengan komputer setempat ***
> >> fungsi IF punya 3 area, yaitu : area kondisi , area nilai
> hasil ketika kondisi benar , area nilai hasil ketika kondisi salah <<
> =SumProduct( ( $A$3:$A$17 = C$25 ) * ( $B$3:$B$17=$B26 )
> * ( IF( , , ) = $A26 ) * )
> E. letakkan kursor di area kondisi milik IF (area pertama dalam IF),
> dan blok cell B26 serta atur agar absolute kolom diikuti sama dengan dan
> teks jakarta
> *** menulis suatu konstanta bertipe teks dalam formula harus
> diapit petik dua ***
> =SumProduct( ( $A$3:$A$17 = C$25 ) * ( $B$3:$B$17=$B26 )
> * ( IF( *$B26="Jakarta"* , , ) = $A26 ) * )
> F. letakkan kursor di area kedua IF, blok area range *$C$20:$F$20*dan pastikan abokuste reference baris dan kolom
> G. lakukan juga untuk area ketiga IF yang harus terisi range *
> $C$21:$F$21*
> H. akhiri dengan meletakkan kursor di area ke 4 SumProduct
> 8. area keempat $C$3:$F$17
> A. blok area range C3:F17 dan pastikan abolute reference baris dan
> kolom
> B. tekan ENTER
> 9. kalau error, ulangi dari nomor 1 dengan lebih teliti, terutama pada
> keterangan-keterangan atau note yang ada.
>
> Wassalam,
> Kid.
>
>
>
> 2013/3/19 Kind man <ferdinan36@gmail.com>
>
>> **
>>
>>
>> Dear Mr Kid
>> mengenai rumus
>> Coba formula di C20 :
>> =SUMPRODUCT(($A$3:$A$17=C$25)
>>
>>
>> ($B$3:$B$17=$B26)*(IF($B26="Jakarta",$C$20:$F$20,$C$21:$F$21)=$A26)*$C$3:$F$17)
>>
>> jika berkenan bolehkH Mr. Kid mengajarkan cara membuatnya? karena
>> jikaditulis secara manual errornya banyak
>>
>> sy tertarik mencari tau cara menuliskannya dgn menekan tombol fungtion
>> tapi yg muncul tidak juga membingungkan spt image dibawah ini
>>
>>
>> regards
>>
>>
>> ferdinan
>>
>>
>
>

Tue Mar 19, 2013 6:28 pm (PDT) . Posted by:

"Jan Raisin"

Maaf, Jan salah ya..

ywd.. Jan minta maaf deh..

Berhubung tempat sudah tersedia.. tinggal siapa yang akan jadi Tutornya?

kalo yang expert kelihatannya mr Kid dan pak Anton, selanjutnya pak
Hendrik, lalu ada pak Super Heru (kelihatannya lokasinya di luar Jakarta),
mas Aji Mumpung (udah lama gak kelihatan) dan pak Dwint.
Mungkin ada yang lain yang belum Jan sebutkan silakan mengajukan diri.

Jan masuk urutan terakhir aja ya.

Wassalam,

-Miss Jan Raisin-

Pada 19 Maret 2013 15.36, aRghifari <arnay_ind@yahoo.com> menulis:

> **
>
>
> Sorry miss,
> Sesuatu yg baik kenapa tidak dipercepat saja. Krn sy yakin cukup banyak
> orang yg ingin belajar VBA secara mendalam, di kantor sy sj sy sdh dapat 2
> orang yg mau belajar VBA.
> Tapi semua dikembalikan ke exceller. Masalah nama belakangan, yg penting
> ilmunya. Tks. Sorry
>
>
> --- On *Tue, 3/19/13, Jan Raisin <miss.jan.raisin@gmail.com>* wrote:
>
>
> From: Jan Raisin <miss.jan.raisin@gmail.com>
> Subject: Re: Bls: [belajar-excel] Kursus VBA
> To: belajar-excel@yahoogroups.com
> Date: Tuesday, March 19, 2013, 12:41 AM
>
>
>
>
> Mungkin usulan ini sebaiknya nanti dimatangkan saja dalam acara Kopdar
> BeExcel.
>
> awalannya mungkin dari Jakarta dulu, siapa tau nanti akan terbentuk
> Chapter Depok, Tangerang, Bogor, dll sampai akhirnya terbentuk BeExcel
> SELINDO (singkatan dari Belajar Excel SEluruh INDOnesia).
>
> Wassalam,
>
> -Miss Jan Raisin-
>
> Pada 19 Maret 2013 13.34, aRghifari <arnay_ind@yahoo.comhttp://mc/compose?to=arnay_ind@yahoo.com>
> > menulis:
>
> **
>
>
> Ayo sirs n madames, siapa lg yg mau ksh alamatnya. biar kita resume. biar
> gerak cepat saja. baru 2 orang nih
>
> --- On Mon, 3/18/13, Shenly Ruchman <shenly_excelmania@yahoo.co.idhttp://mc/compose?to=shenly_excelmania%40yahoo.co.id>>
> wrote:
>
> From: Shenly Ruchman <shenly_excelmania@yahoo.co.idhttp://mc/compose?to=shenly_excelmania%40yahoo.co.id>
> >
> Subject: Bls: [belajar-excel] Kursus VBA
> To: "belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> >
> Date: Monday, March 18, 2013, 11:08 PM
>
>
>
>
> Aduuuhhh jadi ngiler niii pengen ikutan juga....
> tapi sayang posisi tidak mendukung.... hix...hix..hix...
>
> Dari: harry budiman <harbudiman@gmail.comhttp://mc/compose?to=harbudiman%40gmail.com>
> >
> Kepada: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> Dikirim: Selasa, 19 Maret 2013 13:23
> Judul: Re: [belajar-excel] Kursus VBA
>
>
>
>
> Mau ikutan juga...butuh bimbingan..lokasi Bekasi, Tambun Selatan :)
> @harbudFrom: aRghifari <arnay_ind@yahoo.comhttp://mc/compose?to=arnay_ind%40yahoo.com>
> >
> Sender: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> Date: Tue, 19 Mar 2013 10:00:06 +0800 (SGT)To: <
> belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>>ReplyTo:
> belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
>
> Subject: Re: [belajar-excel] Kursus VBA
>
>
>
> OK sirs n madames.. tks bnyk atas respon positifnya.agar bisa langsung di
> follow up. kita kirim data alamat kita agar bisa dicari kira2 tempat yg
> mudah dijangkau oleh kita semua.
>
> Sy tinggal di daerah bekasi tepatnya bekasi utara. Bgmn dgn yg lain ?
>
> --- On Mon, 3/18/13, Jan Raisin <miss.jan.raisin@gmail.comhttp://mc/compose?to=miss.jan.raisin%40gmail.com>>
> wrote:
>
> From: Jan Raisin <miss.jan.raisin@gmail.comhttp://mc/compose?to=miss.jan.raisin%40gmail.com>
> >
> Subject: Re: [belajar-excel] Kursus VBA
> To: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> Date: Monday, March 18, 2013, 6:50 PM
>
>
>
> qiqiqi.. kalo mr Kid yang jadi tutor, Jan mau deh jadi muridnya karena
> ilmu yang Jan miliki belum ada apa-apanya dibandingkan dengan ilmunya mr
> Kid.
> Kalo Jan harus ngisi kelihatannya belum sempat, dalam beberapa bulan ini
> Jan mulai jarang aktif karena kesibukan harus road show keliling pulau Jawa
> dan Sumatera.
>
> tapi untuk acara Kopdar diusahakan tetap datang. Insya ALLAH.
> Wassalam,
>
> -Miss Jan Raisin-
>
> Pada 18 Maret 2013 19.07, Mr. Kid <mr.nmkid@gmail.comhttp://mc/compose?to=mr.nmkid%40gmail.com>>
> menulis:
>
>
>
> Bagaimana kalau untuk awalan, kita kumpulkan beberapa BeExceller yang
> diminta menjadi pengisi acara workshop.
> Ada Pak Anton, Pak Hendrik, Miss Jan, Pak Eka, Pak Bagus, Pak Ghozi, dan
> masih banyak lagi. :( jadi inget mbake :(
>
> Untuk VBA, setidaknya ada Pak Anton, Pak Hendrik, dan Miss Jan yang
> biasanya urun cekrip.
> Untuk formula malah banyak sekali.
>
> Nah nanti kalau bisa dibagi materinya ke beberapa pihak kan bisa lebih
> kumplit dan penuh variasi.
>
> toh kan pengisinya bisa saling bantu, saling koreksi, saling menambahkan,
> pokoke saling berbagi dalam kebaikan dah.
>
> Insya Allah saya bisa ikutan deh (kalau kebagian), saya (dibagiin) yang
> materi dasar-dasar aja ya...
>
> 2013/3/18 <tio.adjie@ptssb.co.idhttp://mc/compose?to=tio.adjie%40ptssb.co.id>
> >
>
>
>
> Bagaimana kalau kita angkat Mr. Kid jadi trainernya ? Tinggal di tentukan
> siapa fasilitatornya ? Apa sekalian juga fasilitator tsb berikut
> fasilitator copy darat ?
>
> regards,
>
> Tio
>
> "Ferdinan"; <ferdinan36@gmail.comhttp://mc/compose?to=ferdinan36%40gmail.com>
> >
>
> Sent by: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> 03/18/2013 05:16 PM
>
> Please respond to belajar-excel
>
>
>
> To: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
>
> cc:
>
> Subject: Re: [belajar-excel] Kursus VBA
>
>
> Wah , terharu ama gagasan Mr.Kid , sy yg berasal dr tempat jauh di KalBar
> sedikit terhibur dgn ide dibuatkan dlm ebook. Sungguh2 perhatian Mr Kid
> bagi anggota mailist sgt sy apresiasi.
>
> Salam hangat selalu, GBU Mr.Kid n family jg seluruh mailist disini.
>
> God Bless You
>
> From: "Mr. Kid" <mr.nmkid@gmail.comhttp://mc/compose?to=mr.nmkid%40gmail.com>>
>
>
> Sender: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
>
> Date: Mon, 18 Mar 2013 17:02:16 +0700
>
> To: <belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
> >
>
> ReplyTo: belajar-excel@yahoogroups.comhttp://mc/compose?to=belajar-excel%40yahoogroups.com>
>
> Subject: Re: [belajar-excel] Kursus VBA
>
>
> Begini saja deh...
>
> Dari sekian buanyak BeExceller, mungkin ada yang jadi trainer disuatu
> lembaga peningkatan SDM. Anggap saja ada 5 atau lebih gitu. Dan ada juga
> yang termasuk owner lembaga tersebut.
>
> Kira-kira bisa ndak pinjem ruang khusus untuk BeExceller bisa kumpul
> sambil belajar Excel termasuk VBA-nya. Giliran saja tempatnya.
>
> Biaya pinjem ruang beserta in focus, syukur-syukur ada kopinya, silakan
> dirembug dan dibagi ke BeExceller yang berminat ikut.
>
> Mungkin materi tentang dasar VBA bisa jadi awalan kumpul belajar bersama.
> Nanti materinya bisa dikumpulken oleh BeExceller yang membentuk panitia
> untuk membuat EBook yang bisa disimpan di folder milis.
>
> Waktu pelaksanaan jangan terus setiap hari rutin, karena biasanya malah
> ndak ada yang nyanthol. Lebih baik satu pertemuan, diendapkan dan dicoba
> sambi tanya kemilis kalau ada masalah dalam mencobanya, kemudian masuk ke
> pertemuan berikut. Misal seminggu sekali, 2 minggu sekali, sebulan sekali,
> atur aja sambil jalan yang kira-kira paling efektif selang berapa lama.
> Acara dibuat sehari sekalian untuk satu pertemuan, supaya agak banyak yang
> bisa didiskusikan bersama.
>
> Gimana ? Ada para trainer dan owner lembaga pendidikan SDM yang bersedia
> mencoba untuk memfasilitasi BeExceller yang semangat kumpul sambil belajar
> ini ?
>
> Wassalam,
>
> Kid.
>
> 2013/3/18 aRghifari <arnay_ind@yahoo.comhttp://mc/compose?to=arnay_ind%40yahoo.com>
> >
>
>
>
> Dear Mr KID,
>
> Jika anda berkenan saya pribadi ingin kursus VBA excel langsung dgn bapak.
> Bagaimana Mr KID, bersediakah anda memberikan kursus kepada saya atau
> mungkin ada teman2 yg lain tertarik, bisa join. Tks be4
>
>
>
>

Tue Mar 19, 2013 7:03 pm (PDT) . Posted by:

Dear Be-Exceller,

Saya coba mencari sel yang kosong dengan meng klik Go To special -blank
dan langsung di isi dengan 0, pertanyaannya adakah cara code VBA , bila
cel yang kosong tidak process pencarian, tapi kalau ada maka process
pencarian dilakukan.

Ini code VBA yang sudah saya buat :

Dim NumberBrsStdHrsOrder As Integer
Dim rngKosong As Range

Cells.Find("Order").Activate
NumberBrsStdHrsOrder = Range(Selection, Selection.End(xlDown)).Rows.Count
+ 4
Cells(1, 1).Value = 0
Cells.Find("STD HOURS").Activate
Selection.AutoFilter
Cells(1, 1).Select
Selection.Copy
Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder, 2)).Select

Set rngKosong = Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder,
2)).SpecialCells(xlCellTypeBlanks)

If rngKosong Is Nothing Then 'Kok ini gak berhasil kenapa yah ??
MsgBox ("Tidak ada")
Else
Selection.SpecialCells(xlCellTypeBlanks).Select
ActiveSheet.Paste
End If

Terima kasih,
Wassalam,
Tio

Tue Mar 19, 2013 7:21 pm (PDT) . Posted by:

"Jan Raisin"

Mungkin begini kali ya..

pada skript ini:
Set rngKosong = Range(Cells(6, 2), Cells(*NumberBrsStdHrsOrder*,
2)).SpecialCells(xlCellTypeBlanks)

nilai baris paling bawah berasal dari sini:
*NumberBrsStdHrsOrder* = Range(Selection, Selection.End(xlDown))*.Rows.Count
* + 4

sedangkan skript yang ini:
*.Rows.Count *

akan menghasilkan nilai seluruh baris pada worksheet excel, pada excel 2003
ke bawah akan menghasilkan nilai 65.536, sedangkan di 2007 ke atas akan
menghasilkan nilai 1.048.576

coba ubah menjadi seperti ini:
NumberBrsStdHrsOrder = cells(*rows.count* , *1*).end(xlup).row

ganti nilai 1 yang berwarna merah dengan nomor kolom yang berisi data
paling akhir, maka akan menghasilkan nilai baris data yang paling bawah.

Semoga gak salah-salah amat karena gak dicoba dulu di Excel.

Wassalam,

-Miss Jan Raisin-

Pada 20 Maret 2013 08.56, <tio.adjie@ptssb.co.id> menulis:

> **
>
>
>
>
> Dear Be-Exceller,
>
> Saya coba mencari sel yang kosong dengan meng klik Go To special -blank
> dan langsung di isi dengan 0, pertanyaannya adakah cara code VBA , bila cel
> yang kosong tidak process pencarian, tapi kalau ada maka process pencarian
> dilakukan.
>
> Ini code VBA yang sudah saya buat :
>
> Dim NumberBrsStdHrsOrder As Integer
> Dim rngKosong As Range
>
> Cells.Find("Order").Activate
> NumberBrsStdHrsOrder = Range(Selection, Selection.End(xlDown)).Rows.Count
> + 4
> Cells(1, 1).Value = 0
> Cells.Find("STD HOURS").Activate
> Selection.AutoFilter
> Cells(1, 1).Select
> Selection.Copy
> Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder, 2)).Select
>
> Set rngKosong = Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder,
> 2)).SpecialCells(xlCellTypeBlanks)
>
> If rngKosong Is Nothing Then '*Kok ini gak berhasil kenapa yah ??*
> MsgBox ("Tidak ada")
> Else
> Selection.SpecialCells(xlCellTypeBlanks).Select
> ActiveSheet.Paste
> End If
>
> Terima kasih,
> Wassalam,
> Tio
>
>

Tue Mar 19, 2013 7:59 pm (PDT) . Posted by:

"zainul_ulum[at]yahoo[dot]com" zainul_ulum

Mas Tio
Bisa dicoba cara lain menggunakan sumproduct:
'=============================
Sub CekKosong()
Dim intCol As Integer, rgKolom As Integer
Dim lstRow As Integer, rgCheck As Range

Const stRow As Integer = 2
Const maxRow As Integer = 10000


intCol = 1 'misal kolom A / kolom pertama yang dicek

Set rgCheck = Range(Cells(stRow, 1), Cells(maxRow, 1).End(xlUp))
If Evaluate("=SUMPRODUCT(ISBLANK(" & rgCheck.Address & ")*1)") > 0 Then
MsgBox "Ada yang kosong"
rgCheck.SpecialCells(xlCellTypeBlanks).Select
Else
'tidak ada yang kosong
End If

End Sub
'==========================

Pada 20 Maret 2013 08.56, <tio.adjie@ptssb.co.id> menulis:
 

Dear Be-Exceller,

Saya coba mencari sel yang kosong dengan meng klik Go To special -blank dan
langsung di isi dengan 0, pertanyaannya adakah cara code VBA , bila cel yang
kosong tidak process pencarian, tapi kalau ada maka process pencarian
dilakukan.

Ini code VBA yang sudah saya buat :

Dim NumberBrsStdHrsOrder As Integer
Dim rngKosong As Range

Cells.Find("Order").Activate
NumberBrsStdHrsOrder = Range(Selection, Selection.End(xlDown)).Rows.Count +
4
Cells(1, 1).Value = 0
Cells.Find("STD HOURS").Activate
Selection.AutoFilter
Cells(1, 1).Select
Selection.Copy
Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder, 2)).Select

Set rngKosong = Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder,
2)).SpecialCells(xlCellTypeBlanks)

If rngKosong Is Nothing Then 'Kok ini gak berhasil kenapa yah ??
MsgBox ("Tidak ada")
Else
Selection.SpecialCells(xlCellTypeBlanks).Select
ActiveSheet.Paste
End If

Terima kasih,
Wassalam,
Tio

Tue Mar 19, 2013 8:02 pm (PDT) . Posted by:

"zainul_ulum[at]yahoo[dot]com" zainul_ulum

Maaf ada revisi dikit,

'=============================
Sub CekKosong()
Dim intCol As Integer,

Dim lstRow As Integer, rgCheck As Range

Const stRow As Integer = 2
Const maxRow As Integer = 10000

intCol = 1 'misal kolom A / kolom pertama yang dicek

Set rgCheck = Range(Cells(stRow, intCol), Cells(maxRow, intCol).End(xlUp))
If Evaluate("=SUMPRODUCT(ISBLANK(" & rgCheck.Address & ")*1)") > 0 Then
MsgBox "Ada yang kosong"
rgCheck.SpecialCells(xlCellTypeBlanks).Select
Else
'tidak ada yang kosong
End If

End Sub
'==========================

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of zainul_ulum[at]yahoo[dot]com
Sent: Wednesday, March 20, 2013 9:59 AM
To: belajar-excel@yahoogroups.com
Subject: RE: [belajar-excel] Pencarian cel dengan nilai kosong

Mas Tio
Bisa dicoba cara lain menggunakan sumproduct:
'=============================
Sub CekKosong()
Dim intCol As Integer, rgKolom As Integer
Dim lstRow As Integer, rgCheck As Range

Const stRow As Integer = 2
Const maxRow As Integer = 10000

intCol = 1 'misal kolom A / kolom pertama yang dicek

Set rgCheck = Range(Cells(stRow, 1), Cells(maxRow, 1).End(xlUp))
If Evaluate("=SUMPRODUCT(ISBLANK(" & rgCheck.Address & ")*1)") > 0 Then
MsgBox "Ada yang kosong"
rgCheck.SpecialCells(xlCellTypeBlanks).Select
Else
'tidak ada yang kosong
End If

End Sub
'==========================

Pada 20 Maret 2013 08.56, <tio.adjie@ptssb.co.id
<mailto:tio.adjie%40ptssb.co.id> > menulis:


Dear Be-Exceller,

Saya coba mencari sel yang kosong dengan meng klik Go To special -blank dan
langsung di isi dengan 0, pertanyaannya adakah cara code VBA , bila cel yang
kosong tidak process pencarian, tapi kalau ada maka process pencarian
dilakukan.

Ini code VBA yang sudah saya buat :

Dim NumberBrsStdHrsOrder As Integer
Dim rngKosong As Range

Cells.Find("Order").Activate
NumberBrsStdHrsOrder = Range(Selection, Selection.End(xlDown)).Rows.Count +
4
Cells(1, 1).Value = 0
Cells.Find("STD HOURS").Activate
Selection.AutoFilter
Cells(1, 1).Select
Selection.Copy
Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder, 2)).Select

Set rngKosong = Range(Cells(6, 2), Cells(NumberBrsStdHrsOrder,
2)).SpecialCells(xlCellTypeBlanks)

If rngKosong Is Nothing Then 'Kok ini gak berhasil kenapa yah ??
MsgBox ("Tidak ada")
Else
Selection.SpecialCells(xlCellTypeBlanks).Select
ActiveSheet.Paste
End If

Terima kasih,
Wassalam,
Tio

GROUP FOOTER MESSAGE
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

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

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

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

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

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 20.02

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)