Selasa, 26 Maret 2013

[belajar-excel] Digest Number 2191

8 New Messages

Digest #2191
1a
Re: format excel dalam mailmerge by "zainul_ulum[at]yahoo[dot]com" zainul_ulum
2.1
Re: Bls: Bls: [belajar-excel] Kopi darat by "aksan kurdin" aksankurdin
2.2
Re: Bls: Bls: [belajar-excel] Kopi darat by "Mr. Kid" nmkid.family@ymail.com
3a
3b
Ambil Tabel dari web ke excel dengan VBA by "zainul_ulum[at]yahoo[dot]com" zainul_ulum
3c
Re: Ambil Tabel dari web ke excel dengan VBA by "Mr. Kid" nmkid.family@ymail.com
3d
Re: Ambil Tabel dari web ke excel dengan VBA by "zainul_ulum[at]yahoo[dot]com" zainul_ulum

Messages

Tue Mar 26, 2013 2:34 am (PDT) . Posted by:

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

Misal field mailmerge rupiah adalah RP, coba format field codenya:
RP \# "#,##0.00"
Kalo dilihat dari alt+f9
{MERGEFIELD RP \# "#,##0.00"}

Semoga membanut

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of tuti andrayani
Sent: Tuesday, March 26, 2013 4:23 PM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] format excel dalam mailmerge

 
Dear All,

Mohon sharingnya, saya ingin mebuat mailmerge dengan source dari excell,
windows yg sy pakai 32 bit, sehingga tidak bisa dengan DDE.

Saya baca untuk memformat Rupiah menggunakan Alt F9, lalu #Rp#,##0,00
namun hasilnya tidak sesuai yg diinginkan. misal 540000 menjadi 540000,  0

Selain itu untuk merubah format percent bagaimana caranya ya dengan bantuan
Alt F9 tadi?
Terimakasih

Tuti

Tue Mar 26, 2013 3:11 am (PDT) . Posted by:

"aksan kurdin" aksankurdin

Sambutan yang hangat sekali Bu Raddini,
Terima kasih

Mr. Kid dan panitia, hayoo... sudah dapat support dari Microsoft via MVP
Excel
Saya yakin peserta bisa tembus lebih dari 100.

Serius rek :)
Sudah di lirik nih komunitasnya ....

aksan kurdin

On 3/26/2013 4:32 PM, Raddini Gusti Rahayu wrote:
>
> Halo semuanya :)
>
> Perkenalkan nama saya Raddini Rahayu, seperti yang dikatakan Pak Anton
> saya anggota dari milis Belajar-Excel :D hanya saja 2 tahun ke
> belakang ini saya jadi penonton saja, juga bergantinya alamat email ke
> rahayu.raddini@gmail.com <mailto:rahayu.raddini@gmail.com> (yg ini aga
> alay hehehe). Mohon maaf yaaaa
>
> Saya tau informasi kopdar milis dari Pak Hendrik yang mengontak saya
> via Linkedin. Saya sudah menghubungi pihak Microsoft mengenai event
> kopdar ini. Responnya sih baik, asalkan yang hadir 100 orang atau
> lebih dan waktunya pasti (supaya auditorium/aula bisa di booking).
> Saat ini saya masih mengusahakan dan akan saya informasikan secepatnya
> begitu ada kabar terbaru :)
> Tapi Microsoft hanya menyediakan ruangannya saja, tidak dengan coffee
> break nya yaa.
>
> Dan supaya kopdar ini bermanfaat lagi saya dan MVP lain dengan senang
> hati akan sharing dengan teman-teman mengenai update teknologi
> Microsoft khususnya Microsoft Excel 2013. Bagaimana?
>
> Best Regards,
> Raddini Rahayu
>
> Sent from Gmail for Samsung Tablet
>
> On Mar 26, 2013 9:36 AM, "summonery&quot; <summonery@yahoo.com
> <mailto:summonery@yahoo.com>> wrote:
>
> Yak mis Jan, betul betul betul,,,
>
> --- In belajar-excel@yahoogroups.com
> <mailto:belajar-excel%40yahoogroups.com>, Jan Raisin
> <miss.jan.raisin@...> wrote:
> >
> > apakah yang dimaksud itu mbak radini?
> >
> > kalo betul, mungkin kang haer atau mas aksan bisa melakukan
> pendekatan
> > dengan beliau sesuai saran pak Anton.
> >
> > Wassalam,
> >
> > -Miss Jan Raisin-
> >
> > Pada 24 Maret 2013 21.46, summonery <summonery@...> menulis:
> >
> > > **
> > >
> > >
> > > Indonesia sebenarnya juga punya MVP Excel, dan beliau juga
> sebagai anggota
> > > milis be-excel, mungkin owner atau moderator bisa melakukan
> pendekatan ke
> > > beliau, siapa tahu bisa sebagai jembatan ke pihak Microsoft
> dan mendapatkan
> > > kemudahan fasilitas dalam penggelaran kopi darat atau kegiatan
> lainnya,,
> > >
> > > atau,, jangan-jangan MVP Excelnya sedang menyamar di milis ini :p
> > >
> > >
> > >
> > > --- In belajar-excel@yahoogroups.com
> <mailto:belajar-excel%40yahoogroups.com>, aksan kurdin <aksan.kurdin@>
> > > wrote:
> > > >
> > > > Wah, ramai sekali ...
> > > > pada mau kopi darat rupanya....
> > > >
> > > > Mr. Kid,
> > > > dari pengalaman kami di belajar-access, lebih terarah kalau
> kopi darat
> > > > atau pun gathering memiliki agenda yang pasti dan teratur.
> Tidak sekedar
> > > > kumpul-kumpul saja ngobrol ngalor ngidul.
> > > > usulan mas tio adjie saya sangat setuju sekali.
> > > >
> > > > berikut saya ceritakan pengalaman kami di belajar-access.
> > > > kopi darat pertama adalah di tempat kang opi, yang juga
> pendiri milis
> > > > ini, dan moderator di belajar-excel dan belajar-access.
> > > > Jumlah peserta cukuplah untuk ruangan tamu kang opi, walaupun
> > > desel-desel.
> > > > Saat itu kang opi membawa kan materi quran database dengan
> access, dan
> > > > kita berkumpul untuk mengupas nya.
> > > >
> > > > yang kedua kami dapat pinjaman ruangan di poltakes jakarta
> selatan oleh
> > > > salah seorang member, dan kopi darat lebih terarah.
> > > > ada pemateri dari rekan2 sendiri, dan juga suasana
> kekeluargaan terasa
> > > > sekali, dan terutama tetap terpusat, karena ada moderator yang
> > > > mengarahkan acara selama kopdar.
> > > >
> > > > setelah berkali2 kopdar di rumah, bang Haer Talib berhasil
> meraih MVP
> > > > Access, dan kita bisa memperoleh fasilitas menggunakan
> ruangan Microsoft
> > > > di BEJ, tetapi dengan syarat peserta minimum 100 orang.
> > > >
> > > > Bentuk kopi darat di belajar-access dari silaturahmi di
> rumah, di
> > > > ruangan rapat/sekolah, aula microsoft, bahkan pernah kupas
> buku Bang
> > > > Haer di Gramedia.
> > > >
> > > > Nah coba untuk lebih matang, 'panitia&#39;nya kumpul-kumpul dulu
> sendiri.
> > > > Be-ex Aliif aliif.akbar@, Be-ex Asror lelaki.hebat@,
> > > > Be-ex Jan raisin miss.jan.raisin@, rekan2 panitia,
> > >
> > > > monggo koordinasi kopi darat kumpul dulu dimana :) Bentuk
> formasi acara
> > > > dan tempat. Jangan cuma kumpul makan2 dan ngobrol2 saja.
> Kurang kena.
> > > >
> > > > Mr.Kid pasti wajib hadir.
> > > >
> > > > Kang Opi, Bang Haer, P Dr Alexander halim ?
> > > >
> > > >
> > > > On 3/22/2013 11:35 AM, Jan Raisin wrote:
> > > > >
> > > > > nah kalo gitu.. kenapa gak di Sevel atau Lumbung Desa saja?
> > > > >
> > > > >
> > > > > atau ada saran yang lain?
> > > > >
> > > > > Wassalam,
> > > > >
> > > > > -MJR_
> > > > >
> > > > > Pada 22 Maret 2013 11.26, Yusril Ramadani yusrilramadani@
> > > > > <mailto:yusrilramadani@ <mailto:yusrilramadani@>> menulis:
> > >
> > > > >
> > > > > Ya kebetulan saya btahu lokasi ituu
> > > > > deket PLN yang disebrang mabes Polri
> > > > > Ya sevel yang Miss Jan itu bilang tempat yg saya usulkan
> > > > > sebelumnya karena lantai 2nya cukup luas
> > > > > Tapi kalau mau di lumbung desanya ga masalah
> > > > > Saya mah ikut ajaa mau di bogor juga ayo sajaa
> > > > > Tapi tanggalnya kapan ya ?
> > > > >
> > > > >
> > > > > 2013/3/22 Jan Raisin miss.jan.raisin@
> > > > > <mailto:miss.jan.raisin@ <mailto:miss.jan.raisin@>>
> > >
> > > > >
> > > > > Barusan Jan tanya-tanya ke temen lama,
> > > > >
> > > > >
> > > > > katanya ada tuh yang tempatnya di kisaran jakarta selatan,
> > > > > harga murah, rasa enak, tempat luas, dan bisa reservasi
> > > > > katanya sih namanya Lumbung Desa, lokasi di seberang Sevel
> > > > > samping gedung PLN Blok M
> > > > >
> > > > > waktu googling, ada sedikit perbedaan dengan keterangan teman
> > > > > tadi (beda lokasinya)
> > > > > ini linknya:
> > > > >
> http://id.openrice.com/jakarta/restaurant/lumbung-desa/34868/?a=1
> > > > >
> > > > > #maaf, bukan promosi, Jan tidak ada hubungan sama sekali
> > > > > dengan tempat tersebut.
> > > > >
> > > > > mungkin ada saran yang lain?
> > > > >
> > > > > Wassalam,
> > > > >
> > > > > -Miss Jan Raisin-
> > > > >
> > > > > Pada 22 Maret 2013 03.35, Mr. Kid mr.nmkid@
> > > > > <mailto:mr.nmkid@ <mailto:mr.nmkid@>> menulis:
> > >
> > > > >
> > > > > Sorry All, baru bisa ikutin lagi perkembangannya.
> > > > >
> > > > > Member yang bersedia mengisi database ada 45 dan tidak
> > > > > semuanya berasal dari Jakarta dan sekitarnya.
> > > > > Mungkin yang terdaftar dalam database untuk 1 minggu
> > > > > kedepan bisa mencapai 60 member.
> > > > >
> > > > > Acara diharapkan tidak membatasi jumlah. Terkadang hal ini
> > > > > juga akan membuat batasan tersendiri dalam mencari lokasi.
> > > > > Pendapat saya, idealnya acara dilakukan di Jakarta,
> > > > > mungkin dikisaran Jakarta selatan agak ke pusat atau di
> > > > > kisaran jakarta pusat yang akses ke daerah tersebut
> > > > > relatif banyak pilihan dan dari berbagai penjuru.
> > > > > BeExceller dari luar kota yang sempet atau sedang di
> > > > > Jakarta saat acara pun bisa relatif mudah untuk berusaha
> > > > > menyempatkan diri hadir dalam acara.
> > > > >
> > > > > Jumlah peserta yang sebisanya tidak dibatasi dengan
> > > > > kisaran 35 member terdaftar berusaha untuk hadir tentu
> > > > > akan membuat ribet dalam mengurusi kudapan selama acara.
> > > > > Pendapat saya, idealnya adalah disebuah cafe memiliki area
> > > > > cukup luas yang bisa direservasi. Dengan begitu, member
> > > > > yang hadir bisa relatif mudah untuk mencari kudapan yang
> > > > > membuatnya nyaman selama acara.
> > > > >
> > > > > Opsi lain adalah meminjam atau menyewa suatu ruang atau
> > > > > aula pertemuan (bisa milik sekolah atau yang lainnya)
> > > > > disertai dengan jasa katering untuk makanan ringan
> > > > > (seperti sajian coffee break) dan jika acara menabrak jam
> > > > > makan siang, maka ada katering makan siang bersama
> > > > > (sukur-sukur prasmanan agar bisa lebih terasa erat). Untuk
> > > > > opsi ini tentu saja harus ada kesepakatan kesediaan untuk
> > > > > urunan. Sepertinya pernah ada angka 100ribu (angka ini
> > > > > sebaiknya didiskusikan lebih lanjut) masih bisa diterima.
> > > > > Sukur-sukur jika panitia bisa menekannya. Alhamdulillah
> > > > > jika banyak member yang datang bersedia ikut urun lebih
> > > > > dari angka yang disepakati.
> > > > >
> > > > > Langkah pertama selalu saja langkah yang berat tapi pokok.
> > > > > Jadi, sebaiknya tidak membebankan terlalu berat dalam
> > > > > pertemuan pertama nanti. Tujuan pertama adalah membuat
> > > > > acara kumpul bersama unuk pertama kali yang diupayakan
> > > > > akan ada pertemuan ringan berikutnya yang lebih rutin
> > > > > (setidaknya lebih intens).
> > > > > Dengan tetap menjaga untuk fokus pada tujuan tersebut,
> > > > > mungkin sebaiknya acara berupa silaturahmi yang ringan dan
> > > > > santai tanpa beban materi yang rumit (asal enjoy dan
> > > > > senang punya saudara banyak saja deh) yang bisa membuat
> > > > > semua member yang hadir menjadi lebih erat. Agenda untuk
> > > > > merencanakan acara lain yang lebih fokus pada tujuan
> > > > > dibentuknya milis (seperti training, workshop, sharing,
> > > > > dsb) bisa saja diselipkan dalam acara tersebut, tetapi
> > > > > sekedar sebagai isu bahan pembicaraan yang kelanjutannya
> > > > > akan diatur setelah acara, alias tidak sampai dibicarakan
> > > > > terlalu detil.
> > > > >
> > > > > Seragam BeExcel dan sebagainya memang akan terasa
> > > > > menyenangkan kalau usai acara sudah dibawa pulang. Tapi
> > > > > hal inikan membuat panitia kerepotan dalam menyiapkannya,
> > > > > jadi cukup diusahakan semampunya panitia saja. Nomor
> > > > > rekening pakai nomor rekening panitia pembuatan seragam
> > > > > saja, supaya bisa dengan mudah segera mengalir ke vendor
> > > > > seragam.
> > > > >
> > > > > Waktu pelaksanaan acara tentu ingin secepatnya, tapi
> > > > > dengan persiapan yang memadai karena sudah ada sekitar 35
> > > > > member yang tampaknya bersedia hadir. Karena kesan yang
> > > > > baik terhadap pertemuan pertama ingin kita bawa pulang
> > > > > untuk menjadi penyemangat dalam mengusahakan pertemuan
> > > > > kedua dan seterusnya.
> > > > >
> > > > > Silakan ditanggapi.
> > > > >
> > > > > Wassalam,
> > > > > Kid.
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > >
> > >
> > >
> > >
> >
>
>

Tue Mar 26, 2013 3:36 am (PDT) . Posted by:

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

Panitianya sudah pernah kumpul belum ya.
Mungkin belum kali ya.

Ada kesempatan lewat mbak Ayu supaya bisa pinjem ruangnya MS.
BeExceller.... ayo dong, bisa sampai 100 yang bisa dateng gak ? Acaranya
ada agenda sharing pengetahuan loh.

Oh iya mbak Ayu, tawaran ini gak ada jangka waktunya kan ya.

Gimana kalau kopdar yang segera dilakukan untuk kumoul-kumpul (berapa aja
deh yang dateng) dipakai untuk silaturahmi sekalian membentuk agenda untuk
bisa mempergunakan kesempatan dari mbak Ayu tadi. hehehe... keribeten ya..

Kid.

2013/3/26 aksan kurdin <aksan.kurdin@gmail.com>

> **
>
>
> Sambutan yang hangat sekali Bu Raddini,
> Terima kasih
>
> Mr. Kid dan panitia, hayoo... sudah dapat support dari Microsoft via MVP
> Excel
> Saya yakin peserta bisa tembus lebih dari 100.
>
> Serius rek :)
> Sudah di lirik nih komunitasnya ....
>
>
> aksan kurdin
>
>
> On 3/26/2013 4:32 PM, Raddini Gusti Rahayu wrote:
>
>
>
> Halo semuanya :)
>
> Perkenalkan nama saya Raddini Rahayu, seperti yang dikatakan Pak Anton
> saya anggota dari milis Belajar-Excel :D hanya saja 2 tahun ke belakang ini
> saya jadi penonton saja, juga bergantinya alamat email ke
> rahayu.raddini@gmail.com (yg ini aga alay hehehe). Mohon maaf yaaaa
>
> Saya tau informasi kopdar milis dari Pak Hendrik yang mengontak saya via
> Linkedin. Saya sudah menghubungi pihak Microsoft mengenai event kopdar ini.
> Responnya sih baik, asalkan yang hadir 100 orang atau lebih dan waktunya
> pasti (supaya auditorium/aula bisa di booking). Saat ini saya masih
> mengusahakan dan akan saya informasikan secepatnya begitu ada kabar terbaru
> :)
> Tapi Microsoft hanya menyediakan ruangannya saja, tidak dengan coffee
> break nya yaa.
>
> Dan supaya kopdar ini bermanfaat lagi saya dan MVP lain dengan senang hati
> akan sharing dengan teman-teman mengenai update teknologi Microsoft
> khususnya Microsoft Excel 2013. Bagaimana?
>
> Best Regards,
> Raddini Rahayu
>
> Sent from Gmail for Samsung Tablet
> On Mar 26, 2013 9:36 AM, "summonery&quot; <summonery@yahoo.com> wrote:
>
>>
>>
>> Yak mis Jan, betul betul betul,,,
>>
>> --- In belajar-excel@yahoogroups.com, Jan Raisin <miss.jan.raisin@...><miss.jan.raisin@...>wrote:
>> >
>> > apakah yang dimaksud itu mbak radini?
>> >
>> > kalo betul, mungkin kang haer atau mas aksan bisa melakukan pendekatan
>> > dengan beliau sesuai saran pak Anton.
>> >
>> > Wassalam,
>> >
>> > -Miss Jan Raisin-
>> >
>> > Pada 24 Maret 2013 21.46, summonery <summonery@...> <summonery@...>menulis:
>> >
>> > > **
>> > >
>> > >
>> > > Indonesia sebenarnya juga punya MVP Excel, dan beliau juga sebagai
>> anggota
>> > > milis be-excel, mungkin owner atau moderator bisa melakukan
>> pendekatan ke
>> > > beliau, siapa tahu bisa sebagai jembatan ke pihak Microsoft dan
>> mendapatkan
>> > > kemudahan fasilitas dalam penggelaran kopi darat atau kegiatan
>> lainnya,,
>> > >
>> > > atau,, jangan-jangan MVP Excelnya sedang menyamar di milis ini :p
>> > >
>> > >
>> > >
>> > > --- In belajar-excel@yahoogroups.com, aksan kurdin <aksan.kurdin@>
>> > > wrote:
>> > > >
>> > > > Wah, ramai sekali ...
>> > > > pada mau kopi darat rupanya....
>> > > >
>> > > > Mr. Kid,
>> > > > dari pengalaman kami di belajar-access, lebih terarah kalau kopi
>> darat
>> > > > atau pun gathering memiliki agenda yang pasti dan teratur. Tidak
>> sekedar
>> > > > kumpul-kumpul saja ngobrol ngalor ngidul.
>> > > > usulan mas tio adjie saya sangat setuju sekali.
>> > > >
>> > > > berikut saya ceritakan pengalaman kami di belajar-access.
>> > > > kopi darat pertama adalah di tempat kang opi, yang juga pendiri
>> milis
>> > > > ini, dan moderator di belajar-excel dan belajar-access.
>> > > > Jumlah peserta cukuplah untuk ruangan tamu kang opi, walaupun
>> > > desel-desel.
>> > > > Saat itu kang opi membawa kan materi quran database dengan access,
>> dan
>> > > > kita berkumpul untuk mengupas nya.
>> > > >
>> > > > yang kedua kami dapat pinjaman ruangan di poltakes jakarta selatan
>> oleh
>> > > > salah seorang member, dan kopi darat lebih terarah.
>> > > > ada pemateri dari rekan2 sendiri, dan juga suasana kekeluargaan
>> terasa
>> > > > sekali, dan terutama tetap terpusat, karena ada moderator yang
>> > > > mengarahkan acara selama kopdar.
>> > > >
>> > > > setelah berkali2 kopdar di rumah, bang Haer Talib berhasil meraih
>> MVP
>> > > > Access, dan kita bisa memperoleh fasilitas menggunakan ruangan
>> Microsoft
>> > > > di BEJ, tetapi dengan syarat peserta minimum 100 orang.
>> > > >
>> > > > Bentuk kopi darat di belajar-access dari silaturahmi di rumah, di
>> > > > ruangan rapat/sekolah, aula microsoft, bahkan pernah kupas buku Bang
>> > > > Haer di Gramedia.
>> > > >
>> > > > Nah coba untuk lebih matang, 'panitia&#39;nya kumpul-kumpul dulu
>> sendiri.
>> > > > Be-ex Aliif aliif.akbar@, Be-ex Asror lelaki.hebat@,
>> > > > Be-ex Jan raisin miss.jan.raisin@, rekan2 panitia,
>> > >
>> > > > monggo koordinasi kopi darat kumpul dulu dimana :) Bentuk formasi
>> acara
>> > > > dan tempat. Jangan cuma kumpul makan2 dan ngobrol2 saja. Kurang
>> kena.
>> > > >
>> > > > Mr.Kid pasti wajib hadir.
>> > > >
>> > > > Kang Opi, Bang Haer, P Dr Alexander halim ?
>> > > >
>> > > >
>> > > > On 3/22/2013 11:35 AM, Jan Raisin wrote:
>> > > > >
>> > > > > nah kalo gitu.. kenapa gak di Sevel atau Lumbung Desa saja?
>> > > > >
>> > > > >
>> > > > > atau ada saran yang lain?
>> > > > >
>> > > > > Wassalam,
>> > > > >
>> > > > > -MJR_
>> > > > >
>> > > > > Pada 22 Maret 2013 11.26, Yusril Ramadani yusrilramadani@
>> > > > > <mailto:yusrilramadani@> menulis:
>> > >
>> > > > >
>> > > > > Ya kebetulan saya btahu lokasi ituu
>> > > > > deket PLN yang disebrang mabes Polri
>> > > > > Ya sevel yang Miss Jan itu bilang tempat yg saya usulkan
>> > > > > sebelumnya karena lantai 2nya cukup luas
>> > > > > Tapi kalau mau di lumbung desanya ga masalah
>> > > > > Saya mah ikut ajaa mau di bogor juga ayo sajaa
>> > > > > Tapi tanggalnya kapan ya ?
>> > > > >
>> > > > >
>> > > > > 2013/3/22 Jan Raisin miss.jan.raisin@
>> > > > > <mailto:miss.jan.raisin@>
>> > >
>> > > > >
>> > > > > Barusan Jan tanya-tanya ke temen lama,
>> > > > >
>> > > > >
>> > > > > katanya ada tuh yang tempatnya di kisaran jakarta selatan,
>> > > > > harga murah, rasa enak, tempat luas, dan bisa reservasi
>> > > > > katanya sih namanya Lumbung Desa, lokasi di seberang Sevel
>> > > > > samping gedung PLN Blok M
>> > > > >
>> > > > > waktu googling, ada sedikit perbedaan dengan keterangan teman
>> > > > > tadi (beda lokasinya)
>> > > > > ini linknya:
>> > > > > http://id.openrice.com/jakarta/restaurant/lumbung-desa/34868/?a=1
>> > > > >
>> > > > > #maaf, bukan promosi, Jan tidak ada hubungan sama sekali
>> > > > > dengan tempat tersebut.
>> > > > >
>> > > > > mungkin ada saran yang lain?
>> > > > >
>> > > > > Wassalam,
>> > > > >
>> > > > > -Miss Jan Raisin-
>> > > > >
>> > > > > Pada 22 Maret 2013 03.35, Mr. Kid mr.nmkid@
>> > > > > <mailto:mr.nmkid@> menulis:
>> > >
>> > > > >
>> > > > > Sorry All, baru bisa ikutin lagi perkembangannya.
>> > > > >
>> > > > > Member yang bersedia mengisi database ada 45 dan tidak
>> > > > > semuanya berasal dari Jakarta dan sekitarnya.
>> > > > > Mungkin yang terdaftar dalam database untuk 1 minggu
>> > > > > kedepan bisa mencapai 60 member.
>> > > > >
>> > > > > Acara diharapkan tidak membatasi jumlah. Terkadang hal ini
>> > > > > juga akan membuat batasan tersendiri dalam mencari lokasi.
>> > > > > Pendapat saya, idealnya acara dilakukan di Jakarta,
>> > > > > mungkin dikisaran Jakarta selatan agak ke pusat atau di
>> > > > > kisaran jakarta pusat yang akses ke daerah tersebut
>> > > > > relatif banyak pilihan dan dari berbagai penjuru.
>> > > > > BeExceller dari luar kota yang sempet atau sedang di
>> > > > > Jakarta saat acara pun bisa relatif mudah untuk berusaha
>> > > > > menyempatkan diri hadir dalam acara.
>> > > > >
>> > > > > Jumlah peserta yang sebisanya tidak dibatasi dengan
>> > > > > kisaran 35 member terdaftar berusaha untuk hadir tentu
>> > > > > akan membuat ribet dalam mengurusi kudapan selama acara.
>> > > > > Pendapat saya, idealnya adalah disebuah cafe memiliki area
>> > > > > cukup luas yang bisa direservasi. Dengan begitu, member
>> > > > > yang hadir bisa relatif mudah untuk mencari kudapan yang
>> > > > > membuatnya nyaman selama acara.
>> > > > >
>> > > > > Opsi lain adalah meminjam atau menyewa suatu ruang atau
>> > > > > aula pertemuan (bisa milik sekolah atau yang lainnya)
>> > > > > disertai dengan jasa katering untuk makanan ringan
>> > > > > (seperti sajian coffee break) dan jika acara menabrak jam
>> > > > > makan siang, maka ada katering makan siang bersama
>> > > > > (sukur-sukur prasmanan agar bisa lebih terasa erat). Untuk
>> > > > > opsi ini tentu saja harus ada kesepakatan kesediaan untuk
>> > > > > urunan. Sepertinya pernah ada angka 100ribu (angka ini
>> > > > > sebaiknya didiskusikan lebih lanjut) masih bisa diterima.
>> > > > > Sukur-sukur jika panitia bisa menekannya. Alhamdulillah
>> > > > > jika banyak member yang datang bersedia ikut urun lebih
>> > > > > dari angka yang disepakati.
>> > > > >
>> > > > > Langkah pertama selalu saja langkah yang berat tapi pokok.
>> > > > > Jadi, sebaiknya tidak membebankan terlalu berat dalam
>> > > > > pertemuan pertama nanti. Tujuan pertama adalah membuat
>> > > > > acara kumpul bersama unuk pertama kali yang diupayakan
>> > > > > akan ada pertemuan ringan berikutnya yang lebih rutin
>> > > > > (setidaknya lebih intens).
>> > > > > Dengan tetap menjaga untuk fokus pada tujuan tersebut,
>> > > > > mungkin sebaiknya acara berupa silaturahmi yang ringan dan
>> > > > > santai tanpa beban materi yang rumit (asal enjoy dan
>> > > > > senang punya saudara banyak saja deh) yang bisa membuat
>> > > > > semua member yang hadir menjadi lebih erat. Agenda untuk
>> > > > > merencanakan acara lain yang lebih fokus pada tujuan
>> > > > > dibentuknya milis (seperti training, workshop, sharing,
>> > > > > dsb) bisa saja diselipkan dalam acara tersebut, tetapi
>> > > > > sekedar sebagai isu bahan pembicaraan yang kelanjutannya
>> > > > > akan diatur setelah acara, alias tidak sampai dibicarakan
>> > > > > terlalu detil.
>> > > > >
>> > > > > Seragam BeExcel dan sebagainya memang akan terasa
>> > > > > menyenangkan kalau usai acara sudah dibawa pulang. Tapi
>> > > > > hal inikan membuat panitia kerepotan dalam menyiapkannya,
>> > > > > jadi cukup diusahakan semampunya panitia saja. Nomor
>> > > > > rekening pakai nomor rekening panitia pembuatan seragam
>> > > > > saja, supaya bisa dengan mudah segera mengalir ke vendor
>> > > > > seragam.
>> > > > >
>> > > > > Waktu pelaksanaan acara tentu ingin secepatnya, tapi
>> > > > > dengan persiapan yang memadai karena sudah ada sekitar 35
>> > > > > member yang tampaknya bersedia hadir. Karena kesan yang
>> > > > > baik terhadap pertemuan pertama ingin kita bawa pulang
>> > > > > untuk menjadi penyemangat dalam mengusahakan pertemuan
>> > > > > kedua dan seterusnya.
>> > > > >
>> > > > > Silakan ditanggapi.
>> > > > >
>> > > > > Wassalam,
>> > > > > Kid.
>> > > > >
>> > > > >
>> > > > >
>> > > > >
>> > > > >
>> > > > >
>> > > > >
>> > > >
>> > >
>> > >
>> > >
>> >
>>
>>
>
>

Tue Mar 26, 2013 3:22 am (PDT) . Posted by:

"ghozi alkatiri" ghozialkatiri

misalkan data yang ingin dihitung karakternya ada di range A1:A15
dan data berisi karakter yang ingin dicari jumlahnya ada di A15 :A17

coba gunakan formula array
{=SUM(IF(LEFT($A$1:$A$11;3)=A15;1))}

copy ke bawah

wassalam

Ghozi Alkatiri

________________________________
Dari: Zahdan Shino <zahdan_shino@rocketmail.com>
Kepada: "belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
Dikirim: Senin, 25 Maret 2013 13:41
Judul: [belajar-excel] hitung karakter di sebelah kiri


 
assalamu alaikum...
mohon pencerahannya kak.
saya masih newbie jadi masih butuh bantuan...
ada case...
S1A123QWE
S1AWAE2G
S1NDA52P
S1MDA52Q
S1A1ERGT
S1OAHTRE
S1N12OUT
S1M26EGDB
S1OQWEB3
S1N908YY
S1NOOOOO

yang ingin saya tanyakan bagaimana mengetahui jumlah total karakter "S1A","S1N","S1O","S1M"(dihitung 3 karakter di sebelah kiri)
dimana jawabannya itu "S1A" itu ada 3
"S1N" itu ada 4
"S1O" itu ada 2
"S1M" itu ada 2
formulanya kayak gimana mas....
<smiley image="anim_confused.gif"/><smiley image="anim_confused.gif"/>
mohon pencerahannya...
terima kasih sebelumnya.
assalamu alaikum....

Tue Mar 26, 2013 3:39 am (PDT) . Posted by:

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

Be-Excel,

Saya membuat VBA untuk memngambil data kurs pajak mingguan sbb:

'====start vba===

Const ALAMAT_WEB As String = "http://www.depkeu.go.id/ind/currency/"

Sub AmbilTableKursPajakMingguan()

Dim rgTarget As Range, aWebQry As QueryTable, sht As Worksheet

Set sht = ActiveSheet

Application.ScreenUpdating = False

With sht.UsedRange

If .Rows.Count > 0 Then

.Columns.Delete 'hapus hasil query sebelumnya

End If

End With

Set rgTarget = sht.Range("$A$1")

Set aWebQry = ActiveSheet.QueryTables.Add(Connection:= _

"URL;" & ALAMAT_WEB, _

Destination:=rgTarget)

With aWebQry

.Name = "KursPajakMingguan"

.AdjustColumnWidth = False

.WebSelectionType = xlSpecifiedTables

.WebTables = "1"

.WebFormatting = xlWebFormattingNone

.Refresh BackgroundQuery:=False

End With

RapihkanTable sht

Application.ScreenUpdating = True

End Sub

Private Sub RapihkanTable(sht As Worksheet)

sht.Columns("A:I").Delete 'hapus kolom yang kosong

sht.Rows("1:4").Delete ' hapus baris yg kosong

sht.Range("A5").CurrentRegion.Columns.AutoFit

'rapihkan judul

With sht.Range("A2:F4")

.HorizontalAlignment = xlCenter

.VerticalAlignment = xlCenter

.WrapText = True

.MergeCells = True

End With

Dim cn As Object

For Each cn In sht.Parent.Connections 'menghapus connection yang ada

cn.Delete

Next

End Sub

'====end vba

Pertanyaan:

Bagaimana caranya agar yang diambil hanya table dan isinya saja? Sehingga procedure RapihkanTable() tidak diperlukan.

JIka prosedur

Tue Mar 26, 2013 3:44 am (PDT) . Posted by:

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

Pak Zainul,

Coba lakukan web query. Pada object inet yang muncul dan setelah menuju url
yang diinginkan, coba hitung tanda panah kuning kecil yang muncul.
Urutan hitungnya dari kiri atas arah horisontal duluan baru ke bawahnya.
Setelah menemukan indeks tabel yang akan diambil (misal indeks tabel nomor
7), maka atur properti WebTables agar diisi dengan indeks tersebut.
nomor indeks bertipe string ya, seperti "7" dsb.

Wassalam,
Kid.

On Tue, Mar 26, 2013 at 5:35 PM, zainul_ulum[at]yahoo[dot]com <
zainul_ulum@yahoo.com> wrote:

> **
>
>
> Be-Excel,****
>
> ** **
>
> Saya membuat VBA untuk memngambil data kurs pajak mingguan sbb:****
>
> '====start vba===****
>
> Const ALAMAT_WEB As String = "http://www.depkeu.go.id/ind/currency/"****
>
> ** **
>
> Sub AmbilTableKursPajakMingguan()****
>
> Dim rgTarget As Range, aWebQry As QueryTable, sht As Worksheet****
>
> Set sht = ActiveSheet****
>
> ****
>
> Application.ScreenUpdating = False****
>
> With sht.UsedRange****
>
> If .Rows.Count > 0 Then****
>
> .Columns.Delete 'hapus hasil query sebelumnya****
>
> End If****
>
> End With****
>
> ** **
>
> Set rgTarget = sht.Range("$A$1")****
>
> Set aWebQry = ActiveSheet.QueryTables.Add(Connection:= _****
>
> "URL;" & ALAMAT_WEB, _****
>
> Destination:=rgTarget)****
>
> ****
>
> With aWebQry****
>
> .Name = "KursPajakMingguan"****
>
> .AdjustColumnWidth = False****
>
> .WebSelectionType = xlSpecifiedTables****
>
> .WebTables = "1"****
>
> .WebFormatting = xlWebFormattingNone****
>
> .Refresh BackgroundQuery:=False****
>
> End With****
>
> RapihkanTable sht****
>
> Application.ScreenUpdating = True****
>
> End Sub****
>
> ** **
>
> Private Sub RapihkanTable(sht As Worksheet)****
>
> ****
>
> sht.Columns("A:I").Delete 'hapus kolom yang kosong****
>
> sht.Rows("1:4").Delete ' hapus baris yg kosong****
>
> sht.Range("A5").CurrentRegion.Columns.AutoFit****
>
> ****
>
> 'rapihkan judul****
>
> With sht.Range("A2:F4")****
>
> .HorizontalAlignment = xlCenter****
>
> .VerticalAlignment = xlCenter****
>
> .WrapText = True****
>
> .MergeCells = True****
>
> End With****
>
> ** **
>
> Dim cn As Object****
>
> For Each cn In sht.Parent.Connections 'menghapus connection yang ada**
> **
>
> cn.Delete****
>
> Next****
>
> ** **
>
> End Sub****
>
> '====end vba****
>
> Pertanyaan:****
>
> Bagaimana caranya agar yang diambil hanya table dan isinya saja? Sehingga
> procedure RapihkanTable() tidak diperlukan.****
>
> JIka prosedur ****
>
> ** **
>
>
>

Tue Mar 26, 2013 4:16 am (PDT) . Posted by:

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

Maturnuwun mas Kid,

Sarannya sudah dicoba dan berhasil.

Wassalam

-zainul-

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Mr. Kid
Sent: Tuesday, March 26, 2013 5:44 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Ambil Tabel dari web ke excel dengan VBA

Pak Zainul,

Coba lakukan web query. Pada object inet yang muncul dan setelah menuju url
yang diinginkan, coba hitung tanda panah kuning kecil yang muncul.
Urutan hitungnya dari kiri atas arah horisontal duluan baru ke bawahnya.
Setelah menemukan indeks tabel yang akan diambil (misal indeks tabel nomor
7), maka atur properti WebTables agar diisi dengan indeks tersebut.
nomor indeks bertipe string ya, seperti "7" dsb.

Wassalam,
Kid.

On Tue, Mar 26, 2013 at 5:35 PM, zainul_ulum[at]yahoo[dot]com
<zainul_ulum@yahoo.com> wrote:

Be-Excel,

Saya membuat VBA untuk memngambil data kurs pajak mingguan sbb:

'====start vba===

Const ALAMAT_WEB As String = "http://www.depkeu.go.id/ind/currency/"

Sub AmbilTableKursPajakMingguan()

Dim rgTarget As Range, aWebQry As QueryTable, sht As Worksheet

Set sht = ActiveSheet

Application.ScreenUpdating = False

With sht.UsedRange

If .Rows.Count > 0 Then

.Columns.Delete 'hapus hasil query sebelumnya

End If

End With

Set rgTarget = sht.Range("$A$1")

Set aWebQry = ActiveSheet.QueryTables.Add(Connection:= _

"URL;" & ALAMAT_WEB, _

Destination:=rgTarget)

With aWebQry

.Name = "KursPajakMingguan"

.AdjustColumnWidth = False

.WebSelectionType = xlSpecifiedTables

.WebTables = "1"

.WebFormatting = xlWebFormattingNone

.Refresh BackgroundQuery:=False

End With

RapihkanTable sht

Application.ScreenUpdating = True

End Sub

Private Sub RapihkanTable(sht As Worksheet)

sht.Columns("A:I").Delete 'hapus kolom yang kosong

sht.Rows("1:4").Delete ' hapus baris yg kosong

sht.Range("A5").CurrentRegion.Columns.AutoFit

'rapihkan judul

With sht.Range("A2:F4")

.HorizontalAlignment = xlCenter

.VerticalAlignment = xlCenter

.WrapText = True

.MergeCells = True

End With

Dim cn As Object

For Each cn In sht.Parent.Connections 'menghapus connection yang ada

cn.Delete

Next

End Sub

'====end vba

Pertanyaan:

Bagaimana caranya agar yang diambil hanya table dan isinya saja? Sehingga
procedure RapihkanTable() tidak diperlukan.

JIka prosedur

Tue Mar 26, 2013 4:37 am (PDT) . Posted by:

"Indra" indra_gustian

Fix Scriptnya donk Pak Zainul kalo boleh :D sebagai bahan pembelajaran untuk
saya dan teman" B-XL yang lain. Matur tengkyu

Salam,

ChordJR

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of zainul_ulum[at]yahoo[dot]com
Sent: Tuesday, March 26, 2013 6:12 PM
To: belajar-excel@yahoogroups.com
Subject: RE: [belajar-excel] Ambil Tabel dari web ke excel dengan VBA

Maturnuwun mas Kid,

Sarannya sudah dicoba dan berhasil.

Wassalam

-zainul-

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Mr. Kid
Sent: Tuesday, March 26, 2013 5:44 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Ambil Tabel dari web ke excel dengan VBA

Pak Zainul,

Coba lakukan web query. Pada object inet yang muncul dan setelah menuju url
yang diinginkan, coba hitung tanda panah kuning kecil yang muncul.
Urutan hitungnya dari kiri atas arah horisontal duluan baru ke bawahnya.
Setelah menemukan indeks tabel yang akan diambil (misal indeks tabel nomor
7), maka atur properti WebTables agar diisi dengan indeks tersebut.
nomor indeks bertipe string ya, seperti "7" dsb.

Wassalam,
Kid.

On Tue, Mar 26, 2013 at 5:35 PM, zainul_ulum[at]yahoo[dot]com
<zainul_ulum@yahoo.com> wrote:

Be-Excel,

Saya membuat VBA untuk memngambil data kurs pajak mingguan sbb:

'====start vba===

Const ALAMAT_WEB As String = "http://www.depkeu.go.id/ind/currency/"

Sub AmbilTableKursPajakMingguan()

Dim rgTarget As Range, aWebQry As QueryTable, sht As Worksheet

Set sht = ActiveSheet

Application.ScreenUpdating = False

With sht.UsedRange

If .Rows.Count > 0 Then

.Columns.Delete 'hapus hasil query sebelumnya

End If

End With

Set rgTarget = sht.Range("$A$1")

Set aWebQry = ActiveSheet.QueryTables.Add(Connection:= _

"URL;" & ALAMAT_WEB, _

Destination:=rgTarget)

With aWebQry

.Name = "KursPajakMingguan"

.AdjustColumnWidth = False

.WebSelectionType = xlSpecifiedTables

.WebTables = "1"

.WebFormatting = xlWebFormattingNone

.Refresh BackgroundQuery:=False

End With

RapihkanTable sht

Application.ScreenUpdating = True

End Sub

Private Sub RapihkanTable(sht As Worksheet)

sht.Columns("A:I").Delete 'hapus kolom yang kosong

sht.Rows("1:4").Delete ' hapus baris yg kosong

sht.Range("A5").CurrentRegion.Columns.AutoFit

'rapihkan judul

With sht.Range("A2:F4")

.HorizontalAlignment = xlCenter

.VerticalAlignment = xlCenter

.WrapText = True

.MergeCells = True

End With

Dim cn As Object

For Each cn In sht.Parent.Connections 'menghapus connection yang ada

cn.Delete

Next

End Sub

'====end vba

Pertanyaan:

Bagaimana caranya agar yang diambil hanya table dan isinya saja? Sehingga
procedure RapihkanTable() tidak diperlukan.

JIka prosedur

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

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

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

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

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

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

Tidak ada komentar:

Posting Komentar