Kamis, 07 Juli 2011

[belajar-excel] Digest Number 1234

Messages In This Digest (25 Messages)

1a.
Sort & Mengelompokkan data berdasarkan kriteria 2 kolom From: Nathan Tama
1b.
Re: Sort & Mengelompokkan data berdasarkan kriteria 2 kolom From: Mr. Kid
2a.
Mengecek Qty dgn menyaring dari tgl & No so yang sama From: andy friansyah
2b.
Re: Mengecek Qty dgn menyaring dari tgl & No so yang sama From: Mr. Kid
3a.
Bls: [belajar-excel] Menampilkan nama dari daftar secara otomatis From: Meilita Alianing Putrie
3b.
Re: Menampilkan nama dari daftar secara otomatis From: STDEV(i)
4a.
Cara mengurutkan dan merapihkan data From: Johari Rais
4b.
Re: Cara mengurutkan dan merapihkan data From: hendrik karnadi
4c.
Re: Cara mengurutkan dan merapihkan data From: Johari Rais
4d.
Re: Cara mengurutkan dan merapihkan data From: Mr. Kid
4e.
Re: Cara mengurutkan dan merapihkan data From: Johari Rais
4f.
Re: Cara mengurutkan dan merapihkan data From: hendrik karnadi
5a.
Tanya rumus pengabungan exel From: Gober
5b.
Re: Tanya rumus pengabungan exel From: M.Ade Alfarid
5c.
Re: Tanya rumus pengabungan exel From: HerrSoe
5d.
Re: Tanya rumus pengabungan exel From: STDEV(i)
5e.
Re: Tanya rumus pengabungan exel From: Mr. Kid
6a.
Re: bagaimana rumus untuk menarik data difile yg terlampir From: Mr. Kid
7a.
Re: mohon petunjuk cara menambah dan menghapus data From: Mr. Kid
8a.
ENTRY DATA KE TABEL From: Tjahya Hartono
8b.
Re: ENTRY DATA KE TABEL From: tjahyahartono@yahoo.co.id
8c.
Re: ENTRY DATA KE TABEL From: STDEV(i)
8d.
Re: ENTRY DATA KE TABEL From: M. Ferdiansyah
9a.
Re: merevisi isi data From: R T Gultom
10.
Mail Merge di excell From: Yusril Ramadani

Messages

1a.

Sort & Mengelompokkan data berdasarkan kriteria 2 kolom

Posted by: "Nathan Tama" nathan.tama@yahoo.com   nathan.tama

Thu Jul 7, 2011 12:59 am (PDT)



Dear rekans Be-Exceler dan suhu,
Mohon dibantu, bagaimana cara untuk mengelompokkan data dengan ketentuan :
- Data/baris yg diambil adalah jika cell pada Kolom X ada pada kolom Y, dan sebaliknya.
- Kemudian data tersebut dikelompokkan berdasarkan kesamaan isi cell pada kolom X dan Y, dan/atau kolom Y dan X.
Untuk lebih jelasnya, lihat lampiran.

Matur nuwun sebelumnya.

Nathan (newbie excel)

PS: Pengakuan dosa, saya pernah posting masalah tapi tidak mengucapkan terimakasih maupun menutup kasusnya. Maap.., maap..

1b.

Re: Sort & Mengelompokkan data berdasarkan kriteria 2 kolom

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Jul 7, 2011 1:50 pm (PDT)



Dear Nathan,

Untuk menghasilkan summary disertai baris pemisah antar grup, file terlampir
menggunakan 4 kolom bantu (3 di data dan 1 di summary) [sheet
grup_per_blok].
Jika tanpa baris pemisah grup, menggunakan 2 kolom bantu (1 di data dan 1 di
summary) [sheet plain]

Regards.
Kid.

2011/7/7 Nathan Tama <nathan.tama@yahoo.com>

> **
>
>
> Dear rekans Be-Exceler dan suhu,
> Mohon dibantu, bagaimana cara untuk mengelompokkan data dengan ketentuan :
> - Data/baris yg diambil adalah jika cell pada Kolom X ada pada kolom Y, dan
> sebaliknya.
> - Kemudian data tersebut dikelompokkan berdasarkan kesamaan isi cell pada
> kolom X dan Y, dan/atau kolom Y dan X.
> Untuk lebih jelasnya, lihat lampiran.
>
> Matur nuwun sebelumnya.
>
> Nathan (newbie excel)
>
> PS: Pengakuan dosa, saya pernah posting masalah tapi tidak mengucapkan
> terimakasih maupun menutup kasusnya. Maap.., maap..
>
>
>
>
2a.

Mengecek Qty dgn menyaring dari tgl & No so yang sama

Posted by: "andy friansyah" friansyah_andy@yahoo.com

Thu Jul 7, 2011 1:20 am (PDT)





Dear Para Master Excell

Jika kita ingin mengetahui qty dgn menyamakn tgl dan no so dr sebuah produk
menggunakan rumus apa ya? Mohon petunjuk saya nubie dlm hal pengerjaan dgn rumus
excel. berikut adalah attachmentny.

Salam Hangat Selalu

Langit Merah
2b.

Re: Mengecek Qty dgn menyaring dari tgl & No so yang sama

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Jul 7, 2011 5:30 am (PDT)



Dear Andy,

Coba :
=SumProduct( ( datakolom1 = nilai_kriteria1 ) * (datakolom2 =
nilai_kriteria2) )

Kid.

2011/7/6 andy friansyah <friansyah_andy@yahoo.com>

> **
>
>
>
> Dear Para Master Excell
>
> Jika kita ingin mengetahui qty dgn menyamakn tgl dan no so dr sebuah produk
> menggunakan rumus apa ya? Mohon petunjuk saya nubie dlm hal pengerjaan dgn
> rumus excel. berikut adalah attachmentny.
>
>
> Salam Hangat Selalu
>
> Langit Merah
>
>
>
>
3a.

Bls: [belajar-excel] Menampilkan nama dari daftar secara otomatis

Posted by: "Meilita Alianing Putrie" meilita_phutry@yahoo.co.id   meilita_phutry

Thu Jul 7, 2011 1:45 am (PDT)





kenapa aku coba rumus yang
=IF(ISERR(SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})),"",INDEX($B$2:$B$5,SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})))

nggak bisa / nggak jadi ya?
apa ada yang khusus dengan penulisan rumus itu?
sebelumnya maaf, dan terima kasih. :D

________________________________
Dari: STDEV(i) <setiyowati.devi@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Terkirim: Kam, 7 Juli, 2011 11:38:18
Judul: Re: [belajar-excel] Menampilkan nama dari daftar secara otomatis

selain dengan AutoFilter (di excel 2003: menu > data Filter > Autofilter)
dapat juga diselesaikan dengan ARRAY FORMULA / RUMUS ARRAY

=IF(ISERR(SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})),"",INDEX($B$2:$B$5,SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})))

lihat lampiran

2011/7/7 Meilita Alianing Putrie <meilita_phutry@yahoo.co.id>

>Permisi semua,,
>maaf, saya masih benar-benar baru disini... :D
>saya mau tanya tentang menampilkan nama secara otomatis.
>Begini :
>saya membuat daftar nama dengan statusnya. misal :
>nama_1 statusnya 1
>nama_2 statusnya 0
>nama_3 statusnya 1
>nama_4 statusnya 0
>nah, gimana caranya agar yang tampil yang statusnya 1 ?
>hasil yang saya harapkan :
>nama_1
>nama_3
>
>Terima kasih sebelumnya :D
>
>
>
3b.

Re: Menampilkan nama dari daftar secara otomatis

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Thu Jul 7, 2011 2:19 am (PDT)



perlakukan sebagai *ArrayFormula*

pilih / select / BLOK range E2:E5
tuliskan rumusnya di FORMULA BAR
tekan 3 tombol* Ctrl + Shit, (tahan) + Enter*

cara mengedit dan menghapus juga harus diselecct range arraynya dulu
jika satu cell demi satu cell akan seperti di LOCKed

2011/7/7 Meilita Alianing Putrie <meilita_phutry@yahoo.co.id>

> **
> kenapa aku coba rumus yang
>
> =IF(ISERR(SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})),"",INDEX($B$2:$B$5,SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})))
> nggak bisa / nggak jadi ya?
> apa ada yang khusus dengan penulisan rumus itu?
> sebelumnya maaf, dan terima kasih. :D
>

>
> ------------------------------
> *Dari:* STDEV(i) <setiyowati.devi@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Terkirim:* Kam, 7 Juli, 2011 11:38:18
> *Judul:* Re: [belajar-excel] Menampilkan nama dari daftar secara otomatis
> selain dengan AutoFilter (di excel 2003: menu > data Filter > Autofilter)
> dapat juga diselesaikan dengan ARRAY FORMULA / RUMUS ARRAY
>
> =IF(ISERR(SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})),"",INDEX($B$2:$B$5,SMALL(IF(C2:C5=1,{1;2;3;4}),{1;2;3;4})))
>
> lihat lampiran
>
>
4a.

Cara mengurutkan dan merapihkan data

Posted by: "Johari Rais" johari@bukopin.co.id   zooe_13

Thu Jul 7, 2011 1:50 am (PDT)



Dear rekan2 be-exceler dan para suhu dan master2 excel

Mohon bantuan nya, saya ada kendala dalam mengerjakan laporan karna dalam
pengerjaan nya mengunakan cara manual (insert,copy,paste) sehingga
memerlukan waktu yang cukup lama

Sebagai contoh :

Tabel 1
Tabel 2

114010

KMK-KOMERSIL

2683755118824.70

114010

KMK-KOMERSIL

606414645.77

114011

KMK-KOMERSIL VLS

949362556993.40

114020

KMK-UKKM

261148268843.42

114020

KMK-UKKM

4475905988289.11

114021

KMK-UKKM VLS

52375711200.00

114021

KMK-UKKM VLS

14517894567.84

Hasil di tabel 2

114010

KMK-KOMERSIL

606414645.77

114011

KMK-KOMERSIL VLS

0.00

114020

KMK-UKKM

261148268843.42

114021

KMK-UKKM VLS

52375711200.00

- selama ini dalam pengerjaan nya saya menggunakan insert di tabel
2,kemudian mengcopy data dr tabel 1 yang tidak ada di tabel 2 dan di paste
ke tabel 2 dan memberikan nilai 0 terhadap data yg tidak ada di tabel 2
(lebih lengkapnya saya lampirkan file contoh nya)

- yang ingin saya tanyakan, apakah ada cara yg mempermudah pekerjaan saya
(entah itu menggunakan makro atau formula) karna tabel yang digunakan cukup
banyak dan angka nya berubah2 setiap bulannya

Atas bantuan rekan2,para suhu dan master dalam excel saya ucapkan terima
kasih

Salam.

----------------------------------------------------------
<i>DISCLAIMER: <br>The information enclosed in this email (and any attachments) may be legally <br>privileged and/or confidential and is intended only for the use of the addressee(s). <br>No addressee should forward, print, copy, or otherwise reproduce this message in any <br>manner that would allow it to be viewed by any individual not originally listed <br>as a recipient. If the reader of this message is not the intended recipient, you are hereby <br>notified that any unauthorized disclosure, dissemination, distribution, copying <br>or the taking of any action in reliance on the information herein is strictly prohibited. <br>If you have received this communication in error, please immediately notify the sender <br>and delete this message. Unless it is made by the authorized person, any views expressed <br>in this message are those of the individual sender and may not necessarily reflect <br>the views of PT Bank Bukopin Tbk.
----------------------------------------------------------
4b.

Re: Cara mengurutkan dan merapihkan data

Posted by: "hendrik karnadi" hendrikkarnadi@yahoo.com   hendrikkarnadi

Thu Jul 7, 2011 2:52 am (PDT)



Mungkin pertanyaannya perlu lebih diperjelas.
Yang saya "tangkap" anda ingin menggabungkan tabel - tabel tersebut. Jika memang ini yang dimaksudkan anda bisa menggunakan penjumlahan SUMIF dari msg2 tabel.
Tabel "Gabungan" harus mempunyai ivacc dan tbfnam yang lengkap
 
Salam,
Hendrik Karnadi

--- On Thu, 7/7/11, Johari Rais <johari@bukopin.co.id> wrote:

From: Johari Rais <johari@bukopin.co.id>
Subject: [belajar-excel] Cara mengurutkan dan merapihkan data
To: belajar-excel@yahoogroups.com
Date: Thursday, 7 July, 2011, 3:45 PM

 

Dear rekan2 be-exceler dan para suhu dan master2 excel
 
Mohon bantuan nya, saya ada kendala dalam mengerjakan laporan karna dalam pengerjaan nya mengunakan cara manual (insert,copy,paste) sehingga memerlukan waktu yang cukup lama
Sebagai contoh :
 
Tabel 1                                                                                                  Tabel 2                                                                                 

114010

KMK-KOMERSIL                 

2683755118824.70

114010

KMK-KOMERSIL                 

606414645.77

114011

KMK-KOMERSIL VLS              

949362556993.40

114020

KMK-UKKM                     

261148268843.42

114020

KMK-UKKM                     

4475905988289.11

114021

KMK-UKKM VLS                 

52375711200.00

114021

KMK-UKKM VLS                 

14517894567.84

 

 

 
 
Hasil di tabel 2

114010

KMK-KOMERSIL                 

606414645.77

114011

KMK-KOMERSIL VLS             

0.00

114020

KMK-UKKM                     

261148268843.42

114021

KMK-UKKM VLS                 

52375711200.00
 
- selama ini dalam pengerjaan nya saya menggunakan insert di tabel 2,kemudian mengcopy data dr tabel 1 yang tidak ada di tabel 2 dan di paste ke tabel 2 dan memberikan nilai 0 terhadap data yg tidak ada di tabel 2 (lebih lengkapnya saya lampirkan file contoh nya)
- yang ingin saya tanyakan, apakah ada cara yg mempermudah pekerjaan saya (entah itu menggunakan makro atau formula) karna tabel yang digunakan cukup banyak dan angka nya berubah2 setiap bulannya
 
Atas bantuan rekan2,para suhu dan master dalam excel saya ucapkan terima kasih
 
Salam.

----------------------------------------------------------
DISCLAIMER:
The information enclosed in this email (and any attachments) may be legally
privileged and/or confidential and is intended only for the use of the addressee(s).
No addressee should forward, print, copy, or otherwise reproduce this message in any
manner that would allow it to be viewed by any individual not originally listed
as a recipient. If the reader of this message is not the intended recipient, you are hereby
notified that any unauthorized disclosure, dissemination, distribution, copying
or the taking of any action in reliance on the information herein is strictly prohibited.
If you have received this communication in error, please immediately notify the sender
and delete this message. Unless it is made by the authorized person, any views expressed
in this message are those of the individual sender and may not necessarily reflect
the views of PT Bank Bukopin Tbk.
----------------------------------------------------------

4c.

Re: Cara mengurutkan dan merapihkan data

Posted by: "Johari Rais" johari@bukopin.co.id   zooe_13

Thu Jul 7, 2011 3:15 am (PDT)



Seperti apa yah pak contoh nya? Karna saya belum paham tentang perintah SUMIF ?? supaya lebih jelas saya lampirkan tabel data pendukung sebagai contoh yg saya harapkan.

salam

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of hendrik karnadi
Sent: Thursday, July 07, 2011 4:52 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Cara mengurutkan dan merapihkan data

Mungkin pertanyaannya perlu lebih diperjelas.

Yang saya "tangkap" anda ingin menggabungkan tabel - tabel tersebut. Jika memang ini yang dimaksudkan anda bisa menggunakan penjumlahan SUMIF dari msg2 tabel.

Tabel "Gabungan" harus mempunyai ivacc dan tbfnam yang lengkap

Salam,

Hendrik Karnadi

--- On Thu, 7/7/11, Johari Rais <johari@bukopin.co.id> wrote:

From: Johari Rais <johari@bukopin.co.id>
Subject: [belajar-excel] Cara mengurutkan dan merapihkan data
To: belajar-excel@yahoogroups.com
Date: Thursday, 7 July, 2011, 3:45 PM

Dear rekan2 be-exceler dan para suhu dan master2 excel

Mohon bantuan nya, saya ada kendala dalam mengerjakan laporan karna dalam pengerjaan nya mengunakan cara manual (insert,copy,paste) sehingga memerlukan waktu yang cukup lama

Sebagai contoh :

Tabel 1 Tabel 2

114010

KMK-KOMERSIL

2683755118824.70

114010

KMK-KOMERSIL

606414645.77

114011

KMK-KOMERSIL VLS

949362556993.40

114020

KMK-UKKM

261148268843.42

114020

KMK-UKKM

4475905988289.11

114021

KMK-UKKM VLS

52375711200.00

114021

KMK-UKKM VLS

14517894567.84

Hasil di tabel 2

114010

KMK-KOMERSIL

606414645.77

114011

KMK-KOMERSIL VLS

0.00

114020

KMK-UKKM

261148268843.42

114021

KMK-UKKM VLS

52375711200.00

- selama ini dalam pengerjaan nya saya menggunakan insert di tabel 2,kemudian mengcopy data dr tabel 1 yang tidak ada di tabel 2 dan di paste ke tabel 2 dan memberikan nilai 0 terhadap data yg tidak ada di tabel 2 (lebih lengkapnya saya lampirkan file contoh nya)

- yang ingin saya tanyakan, apakah ada cara yg mempermudah pekerjaan saya (entah itu menggunakan makro atau formula) karna tabel yang digunakan cukup banyak dan angka nya berubah2 setiap bulannya

Atas bantuan rekan2,para suhu dan master dalam excel saya ucapkan terima kasih

Salam.

----------------------------------------------------------
DISCLAIMER:
The information enclosed in this email (and any attachments) may be legally
privileged and/or confidential and is intended only for the use of the addressee(s).
No addressee should forward, print, copy, or otherwise reproduce this message in any
manner that would allow it to be viewed by any individual not originally listed
as a recipient. If the reader of this message is not the intended recipient, you are hereby
notified that any unauthorized disclosure, dissemination, distribution, copying
or the taking of any action in reliance on the information herein is strictly prohibited.
If you have received this communication in error, please immediately notify the sender
and delete this message. Unless it is made by the authorized person, any views expressed
in this message are those of the individual sender and may not necessarily reflect
the views of PT Bank Bukopin Tbk.
----------------------------------------------------------

----------------------------------------------------------
<i>DISCLAIMER: <br>The information enclosed in this email (and any attachments) may be legally <br>privileged and/or confidential and is intended only for the use of the addressee(s). <br>No addressee should forward, print, copy, or otherwise reproduce this message in any <br>manner that would allow it to be viewed by any individual not originally listed <br>as a recipient. If the reader of this message is not the intended recipient, you are hereby <br>notified that any unauthorized disclosure, dissemination, distribution, copying <br>or the taking of any action in reliance on the information herein is strictly prohibited. <br>If you have received this communication in error, please immediately notify the sender <br>and delete this message. Unless it is made by the authorized person, any views expressed <br>in this message are those of the individual sender and may not necessarily reflect <br>the views of PT Bank Bukopin Tbk.
----------------------------------------------------------
4d.

Re: Cara mengurutkan dan merapihkan data

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Jul 7, 2011 3:39 am (PDT)



Bukannya thread ini sama dengan thread :
Cara Mengurutkan data akun
Kid.

2011/7/7 Johari Rais <johari@bukopin.co.id>

> **
>
>
> Dear rekan2 be-exceler dan para suhu dan master2 excel****
>
> ** **
>
> Mohon bantuan nya, saya ada kendala dalam mengerjakan laporan karna dalam
> pengerjaan nya mengunakan cara manual (insert,copy,paste) sehingga
> memerlukan waktu yang cukup lama****
>
> Sebagai contoh :****
>
> ** **
>
> Tabel
> 1
> Tabel
> 2
> ****
>
> 114010****
>
> KMK-KOMERSIL ****
>
> 2683755118824.70****
>
> 114010****
>
> KMK-KOMERSIL ****
>
> 606414645.77****
>
> 114011****
>
> KMK-KOMERSIL VLS ****
>
> 949362556993.40****
>
> 114020****
>
> KMK-UKKM ****
>
> 261148268843.42****
>
> 114020****
>
> KMK-UKKM ****
>
> 4475905988289.11****
>
> 114021****
>
> KMK-UKKM VLS ****
>
> 52375711200.00****
>
> 114021****
>
> KMK-UKKM VLS ****
>
> 14517894567.84****
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> Hasil di tabel 2****
>
> 114010****
>
> KMK-KOMERSIL ****
>
> 606414645.77****
>
> *114011*
>
> *KMK-KOMERSIL VLS *
>
> *0.00*
>
> 114020****
>
> KMK-UKKM ****
>
> 261148268843.42****
>
> 114021****
>
> KMK-UKKM VLS ****
>
> 52375711200.00****
>
> ** **
>
> - selama ini dalam pengerjaan nya saya menggunakan insert di tabel
> 2,kemudian mengcopy data dr tabel 1 yang tidak ada di tabel 2 dan di paste
> ke tabel 2 dan memberikan nilai 0 terhadap data yg tidak ada di tabel 2
> (lebih lengkapnya saya lampirkan file contoh nya)****
>
> - yang ingin saya tanyakan, apakah ada cara yg mempermudah pekerjaan saya
> (entah itu menggunakan makro atau formula) karna tabel yang digunakan cukup
> banyak dan angka nya berubah2 setiap bulannya****
>
> ** **
>
> Atas bantuan rekan2,para suhu dan master dalam excel saya ucapkan terima
> kasih****
>
> ** **
>
> Salam.****
>
> ----------------------------------------------------------*DISCLAIMER:
> The information enclosed in this email (and any attachments) may be legally
> privileged and/or confidential and is intended only for the use of the addressee(s).
> No addressee should forward, print, copy, or otherwise reproduce this message in any
>
> manner that would allow it to be viewed by any individual not originally listed
> as a recipient. If the reader of this message is not the intended recipient, you are hereby
> notified that any unauthorized disclosure, dissemination, distribution, copying
>
> or the taking of any action in reliance on the information herein is strictly prohibited.
> If you have received this communication in error, please immediately notify the sender
> and delete this message. Unless it is made by the authorized person, any views expressed
>
> in this message are those of the individual sender and may not necessarily reflect
> the views of PT Bank Bukopin Tbk.
> ----------------------------------------------------------*
>
>
>
4e.

Re: Cara mengurutkan dan merapihkan data

Posted by: "Johari Rais" johari@bukopin.co.id   zooe_13

Thu Jul 7, 2011 6:59 pm (PDT)



Hampir sama Mr. Kid, cm yg bikin saya bingung ketika di tambah tabel saldo, malah jd berantakan, apakah ada yg harus di tambahkan di makro nya? Atau ada formula baru ?

Maklum saya masih pemula di excel dan tidak paham tentang makro dalam excel.

thx

From: belajar-excel@yahoogroups.com On Behalf Of Mr. Kid
Sent: Thursday, July 07, 2011 5:39 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Cara mengurutkan dan merapihkan data

Bukannya thread ini sama dengan thread :
Cara Mengurutkan data akun

Kid.

2011/7/7 Johari Rais <johari@bukopin.co.id>
Dear rekan2 be-exceler dan para suhu dan master2 excel
Mohon bantuan nya, saya ada kendala dalam mengerjakan laporan karna dalam
pengerjaan nya mengunakan cara manual (insert,copy,paste) sehingga
memerlukan waktu yang cukup lama
Sebagai contoh :
-----CUT----

4f.

Re: Cara mengurutkan dan merapihkan data

Posted by: "hendrik karnadi" hendrikkarnadi@yahoo.com   hendrikkarnadi

Thu Jul 7, 2011 8:26 pm (PDT)



Contoh SUMIF terlampir.
 
Salam,
Hendrik Karnadi

--- On Thu, 7/7/11, Johari Rais <johari@bukopin.co.id> wrote:

From: Johari Rais <johari@bukopin.co.id>
Subject: RE: [belajar-excel] Cara mengurutkan dan merapihkan data
To: belajar-excel@yahoogroups.com
Date: Thursday, 7 July, 2011, 5:08 PM

 

Seperti apa yah pak contoh nya? Karna saya belum paham tentang perintah SUMIF ?? supaya lebih jelas saya lampirkan tabel data pendukung sebagai contoh yg saya harapkan.
 
salam
 

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of hendrik karnadi
Sent: Thursday, July 07, 2011 4:52 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Cara mengurutkan dan merapihkan data
 
 

Mungkin pertanyaannya perlu lebih diperjelas.

Yang saya "tangkap" anda ingin menggabungkan tabel - tabel tersebut. Jika memang ini yang dimaksudkan anda bisa menggunakan penjumlahan SUMIF dari msg2 tabel.

Tabel "Gabungan" harus mempunyai ivacc dan tbfnam yang lengkap

 

Salam,

Hendrik Karnadi

--- On Thu, 7/7/11, Johari Rais <johari@bukopin.co.id> wrote:

From: Johari Rais <johari@bukopin.co.id>
Subject: [belajar-excel] Cara mengurutkan dan merapihkan data
To: belajar-excel@yahoogroups.com
Date: Thursday, 7 July, 2011, 3:45 PM

 

Dear rekan2 be-exceler dan para suhu dan master2 excel
 
Mohon bantuan nya, saya ada kendala dalam mengerjakan laporan karna dalam pengerjaan nya mengunakan cara manual (insert,copy,paste) sehingga memerlukan waktu yang cukup lama
Sebagai contoh :
 
Tabel 1                                                                                                  Tabel 2                                                                                 

114010

KMK-KOMERSIL                 

2683755118824.70

114010

KMK-KOMERSIL                 

606414645.77

114011

KMK-KOMERSIL VLS              

949362556993.40

114020

KMK-UKKM                     

261148268843.42

114020

KMK-UKKM                     

4475905988289.11

114021

KMK-UKKM VLS                 

52375711200.00

114021

KMK-UKKM VLS                 

14517894567.84

 

 

 
 
Hasil di tabel 2

114010

KMK-KOMERSIL                 

606414645.77

114011

KMK-KOMERSIL VLS             

0.00

114020

KMK-UKKM                     

261148268843.42

114021

KMK-UKKM VLS                 

52375711200.00
 
- selama ini dalam pengerjaan nya saya menggunakan insert di tabel 2,kemudian mengcopy data dr tabel 1 yang tidak ada di tabel 2 dan di paste ke tabel 2 dan memberikan nilai 0 terhadap data yg tidak ada di tabel 2 (lebih lengkapnya saya lampirkan file contoh nya)
- yang ingin saya tanyakan, apakah ada cara yg mempermudah pekerjaan saya (entah itu menggunakan makro atau formula) karna tabel yang digunakan cukup banyak dan angka nya berubah2 setiap bulannya
 
Atas bantuan rekan2,para suhu dan master dalam excel saya ucapkan terima kasih
 
Salam.

----------------------------------------------------------DISCLAIMER:
The information enclosed in this email (and any attachments) may be legally
privileged and/or confidential and is intended only for the use of the addressee(s).
No addressee should forward, print, copy, or otherwise reproduce this message in any
manner that would allow it to be viewed by any individual not originally listed
as a recipient. If the reader of this message is not the intended recipient, you are hereby
notified that any unauthorized disclosure, dissemination, distribution, copying
or the taking of any action in reliance on the information herein is strictly prohibited.
If you have received this communication in error, please immediately notify the sender
and delete this message. Unless it is made by the authorized person,  any views expressed
in this message are those of the individual sender and may not necessarily reflect
the views of PT Bank Bukopin Tbk.----------------------------------------------------------

----------------------------------------------------------
DISCLAIMER:
The information enclosed in this email (and any attachments) may be legally
privileged and/or confidential and is intended only for the use of the addressee(s).
No addressee should forward, print, copy, or otherwise reproduce this message in any
manner that would allow it to be viewed by any individual not originally listed
as a recipient. If the reader of this message is not the intended recipient, you are hereby
notified that any unauthorized disclosure, dissemination, distribution, copying
or the taking of any action in reliance on the information herein is strictly prohibited.
If you have received this communication in error, please immediately notify the sender
and delete this message. Unless it is made by the authorized person, any views expressed
in this message are those of the individual sender and may not necessarily reflect
the views of PT Bank Bukopin Tbk.
----------------------------------------------------------

5a.

Tanya rumus pengabungan exel

Posted by: "Gober" gober.mirc@gmail.com   gober_mirc

Thu Jul 7, 2011 2:38 am (PDT)



Sorry sblmnbya kl saya newbee....

mau ty aja..

si ADI akan mendapatkan diskon 1% lagi jika totalan si ADO dan ADU itu
minus... nah di gambar itu kan totalan si ado dan adu minus (-6976) maka si
adi dpt potongan sebesar 69.79 jadi di kolom G2/ totalan ADI itu hasilnya
adalah -840.21 ... nah gimana caranya tambahin formula di kolom disc (F2)
pada adi....

tolong yah bantuin....

thanks

5b.

Re: Tanya rumus pengabungan exel

Posted by: "M.Ade Alfarid" QA@kkmi.co.id   aderyo

Thu Jul 7, 2011 3:26 am (PDT)




Daripada gmbr
file sampel excelnya ada gak mas?

Ade

On Thu, 07 Jul 2011 16:31:27 +0700, Gober <gober.mirc@gmail.com> wrote:

> Sorry sblmnbya kl saya newbee....
>
> mau ty aja..
>
> si ADI akan mendapatkan diskon 1% lagi jika totalan si ADO dan ADU itu
> minus... nah di gambar itu kan totalan si ado dan adu minus (-6976) maka
> si
> adi dpt potongan sebesar 69.79 jadi di kolom G2/ totalan ADI itu hasilnya
> adalah -840.21 ... nah gimana caranya tambahin formula di kolom disc (F2)
> pada adi....
>
>
> tolong yah bantuin....
>
>
> thanks
>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

5c.

Re: Tanya rumus pengabungan exel

Posted by: "HerrSoe" herrsoe@gmail.com   herrsoe

Thu Jul 7, 2011 3:27 am (PDT)



RUMUS DI cell F2 :
*=IF(SUM(C2:E2)<0,0.015,0)* *+ IF(SUM(G3:G4)<0,1%,0)*

[image: katrok_xlsx.GIF]

2011/7/7 Gober <gober.mirc@gmail.com>

> **
> Sorry sblmnbya kl saya newbee....
>
> mau ty aja..
> si ADI akan mendapatkan diskon 1% lagi jika totalan si ADO dan ADU itu
> minus... nah di gambar itu kan totalan si ado dan adu minus (-6976) maka si
> adi dpt potongan sebesar *69.79* jadi di kolom G2/ totalan ADI itu
> hasilnya adalah *-840.21* ... nah gimana caranya tambahin formula di kolom
> disc (F2) pada adi....
>
> tolong yah bantuin....
>
> thanks
>
5d.

Re: Tanya rumus pengabungan exel

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Thu Jul 7, 2011 3:37 am (PDT)



=IF(SUM(G3:G4)<0,1%,0)+IF(SUM(C2:E2)<0,1.5%,0)

tulis di F2

2011/7/7 Gober <gober.mirc@gmail.com>

> **
>
> Sorry sblmnbya kl saya newbee....
> mau ty aja..
> si ADI akan mendapatkan diskon 1% lagi jika totalan si ADO dan ADU itu
> minus... nah di gambar itu kan totalan si ado dan adu minus (-6976) maka si
> adi dpt potongan sebesar *69.79* jadi di kolom G2/ totalan ADI itu
> hasilnya adalah *-840.21* ... nah gimana caranya tambahin formula di kolom
> disc (F2) pada adi....
> tolong yah bantuin....
> thanks**
>
>
>
5e.

Re: Tanya rumus pengabungan exel

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Jul 7, 2011 3:38 am (PDT)



Pinjem punya Pak Herr
=*(SUM(C2:E2)<0)**1.5%+*(**SUM(G3:G4)<0)**1%

Kid.

2011/7/7 HerrSoe <herrsoe@gmail.com>

> RUMUS DI cell F2 :
> *=IF(SUM(C2:E2)<0,0.015,0)* *+ IF(SUM(G3:G4)<0,1%,0)*
>
>
> [image: katrok_xlsx.GIF]
>
>
>
>
> 2011/7/7 Gober <gober.mirc@gmail.com>
>
>> **
>> Sorry sblmnbya kl saya newbee....
>>
>> mau ty aja..
>> si ADI akan mendapatkan diskon 1% lagi jika totalan si ADO dan ADU itu
>> minus... nah di gambar itu kan totalan si ado dan adu minus (-6976) maka si
>> adi dpt potongan sebesar *69.79* jadi di kolom G2/ totalan ADI itu
>> hasilnya adalah *-840.21* ... nah gimana caranya tambahin formula di
>> kolom disc (F2) pada adi....
>>
>> tolong yah bantuin....
>>
>> thanks
>>
>
>
6a.

Re: bagaimana rumus untuk menarik data difile yg terlampir

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Jul 7, 2011 1:50 pm (PDT)



Dear Mr. Anwar,

Mungkin seperti file terlampir.

Kid.

2011/7/6 Tarigan Mergana <anwartarigan@gmail.com>

> **
>
>
> dear excel mania, disini saya lampirkan masalah saya, walaupun mungkin
> masalah biasa tapi saya belum bisa menyelesaikannya, semoga ada yang
> berkenan untuk menjawabnya.
>
>
> Salam,
> Anwar Tarigan
>
>
>
7a.

Re: mohon petunjuk cara menambah dan menghapus data

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Jul 7, 2011 2:13 pm (PDT)



Dear Erwin,

Coba dengan record macro kemudian lakukan Copy Paste Values
Hati-hati dengan merged cells.

Thank You and regards.
Kid.

2011/7/2 erwin adi_putra <erwin_adi_putra@yahoo.com>

> **
>
>
> Dear para master excel,
>
> Saya mohon bantuannya lagi pada para master excel. bagaimana caranya
> menambah data dan menghapus data yang terpilih.ketika saya masukkan nomor
> perjanjian data yang tampil tersimpan/tampak pada kotak yang masih kosong (
> disebelah kanan ) dan bagaimana cara menghapus data yang dipilih ( seperti
> aplikasi pengacak nomor undian ). command button yg ada belum diberikan
> coding apa2
>
> File excel terlampir, mohon petunjuk untuk semua kekurangan agar filenya
> lebih baik lg.
>
> Terima kasih kepada para master excel sebelumnya
>
>
> Salam
>
>
>
>
8a.

ENTRY DATA KE TABEL

Posted by: "Tjahya Hartono" tjahyahartono@yahoo.co.id

Thu Jul 7, 2011 6:07 pm (PDT)



=========================================================
catatan mod:
* Posting Pak Tjahya dikirim TANPA SUBJECT !!
Subject kami tambahkan spt di atas

* Untuk posting selanjutnya mohon Subjectnya diisi dga
Judul/Topik sesuai masalah yg dihadapi.

* Nama workbook lampiran mosok: "TANYA" sih ??
mbok ya pilih nama yg specifik misalnya "JUANGKRIK!"
( e^E makin gag nyambung ya? ) hehe..

* Mohon dibaca kembali Peraturan Milis, dua kali.
=========================================================

Dear para Master X-Cell
Mohon petunjuknya mengenai pertanyaaan saya dibawah ini, Pertanyaan saya adalah?

1. saya ingin mengolah data, dimana data-data tersebut diatas (yang terdiri dari Company, Name, Phone) dalam suatu form

2. Dari Form tersebut saya bisa meng-input data2 tersebut untuk saya update setiap harinya, masalahnya begitu banyaknya terkadang ada data yang lebih dari 1 x,bisakah ketika saya menginput data tersebut data yang saya masukkan ketika data tersebut sudah pernah saya input tidak bisa saya masukkan.

3. Kemudian data tersebut tersimpan dalam sheet yang bernama "Data Perusahaan".
8b.

Re: ENTRY DATA KE TABEL

Posted by: "tjahyahartono@yahoo.co.id" tjahyahartono@yahoo.co.id

Thu Jul 7, 2011 6:24 pm (PDT)



Okee,peraturan milisnya aq liat dmn ya?walopun aq dah lama ikut milis in.tapi blum prnah tanya2.mohon petunjuknya.trm kasih.nb:maaf ya lain kali subjectnya aq isi deh,sama judul,topiknya pokoknya apa yg jadi rule belajar-excel.
Sent from my BlackBerry®

-----Original Message-----
From: Tjahya Hartono <tjahyahartono@yahoo.co.id>
Sender: belajar-excel@yahoogroups.com
Date: Fri, 8 Jul 2011 07:47:42
To: <belajar-excel@yahoogroups.com>; <XL-mania@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] ENTRY DATA KE TABEL

=========================================================
catatan mod:
* Posting Pak Tjahya dikirim TANPA SUBJECT !!
Subject kami tambahkan spt di atas

* Untuk posting selanjutnya mohon Subjectnya diisi dga
Judul/Topik sesuai masalah yg dihadapi.

* Nama workbook lampiran mosok: "TANYA" sih ??
mbok ya pilih nama yg specifik misalnya "JUANGKRIK!"
( e^E makin gag nyambung ya? ) hehe..

* Mohon dibaca kembali Peraturan Milis, dua kali.
=========================================================


Dear para Master X-Cell
Mohon petunjuknya mengenai pertanyaaan saya dibawah ini, Pertanyaan saya adalah?

1. saya ingin mengolah data, dimana data-data tersebut diatas (yang terdiri dari Company, Name, Phone) dalam suatu form

2. Dari Form tersebut saya bisa meng-input data2 tersebut untuk saya update setiap harinya, masalahnya begitu banyaknya terkadang ada data yang lebih dari 1 x,bisakah ketika saya menginput data tersebut data yang saya masukkan ketika data tersebut sudah pernah saya input tidak bisa saya masukkan.

3. Kemudian data tersebut tersimpan dalam sheet yang bernama "Data Perusahaan".

8c.

Re: ENTRY DATA KE TABEL

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Thu Jul 7, 2011 6:39 pm (PDT)



File PERATURAN MILIS: SUDAH dikirim kepada setiap members
1. pada saat konfirmasi gabung / join /subscribe ke milis [belajar-excel]
2. di post ke milis (berarti = DIKIRIM ke semua members yg berstatus
individual mail) setiap awal bulan sekali (status membership pak tjahya =
"individual mail").

File tsb terakhir diposted : Jumat, 1 Juli 2011 - 04:13pm
http://tech.groups.yahoo.com/group/belajar-excel/message/11386

kami lampirkan text nya dlm bentuk file TXT

best regards & terima kasih,
-mod-

2011/7/8 <tjahyahartono@yahoo.co.id>
>
> Okee,peraturan milisnya aq liat dmn ya?walopun aq dah lama ikut milis
in.tapi blum prnah tanya2.mohon petunjuknya.trm kasih.nb:maaf ya lain kali
subjectnya aq isi deh,sama judul,topiknya pokoknya apa yg jadi rule
belajar-excel.
>
>
> ________________________________
> From: Tjahya Hartono <tjahyahartono@yahoo.co.id>
> Sender: belajar-excel@yahoogroups.com
> Date: Fri, 8 Jul 2011 07:47:42 +0800 (SGT)
> To: <belajar-excel@yahoogroups.com>; <XL-mania@yahoogroups.com>
> ReplyTo: belajar-excel@yahoogroups.com
> Subject: [belajar-excel] ENTRY DATA KE TABEL
>
> =========================================================
> catatan mod:
> * Posting Pak Tjahya dikirim TANPA SUBJECT !!
> Subject kami tambahkan spt di atas
>
> * Untuk posting selanjutnya mohon Subjectnya diisi dga
> Judul/Topik sesuai masalah yg dihadapi.
>
> * Nama workbook lampiran mosok: "TANYA" sih ??
> mbok ya pilih nama yg specifik misalnya "JUANGKRIK!"
> ( e^E makin gag nyambung ya? ) hehe..
>
> * Mohon dibaca kembali Peraturan Milis, dua kali.
> =========================================================

----------

File - Peraturan Milis belajar-excel


"PERATURAN MILIS belajar-excel"
-------------------------------

Milis belajar-excel dibuat agar menjadi komunitas / tempat berkumpulnya
para pemakai software microsoft excel, untuk saling berbagi pengetahuan
(sharing), diskusi dan tanya-jawab hal-hal yg menyangkut MS Excel.

Setting untuk posting di milis ini masih dipertahankan = "UnModerated"
(member dapat mengirim posting, tanpa melalui moderasi dan langsung
masuk ke message-list di milis).
Posting pertama & kedua dari member yg baru bergabung harus menunggu
approval dari moderators. Jika dinilai wajar, posting selanjutnya tidak
perlu approval lagi.

Hal ini adalah demi menjadikan milis lebih dinamis, posting tidak
tertunda, diskusi lebih hidup.


Tetapi konsekwensinya, kita sebagai members harus punya niat untuk
menjaga milis ini tetap bersih, enak diikuti, yaitu dengan TIDAK
mengirim posting berisi hal yg mubazir, yg di luar topik, yg "nyampah";
apalagi yg memicu timbulnya pertengkaran yg tidak perlu.

Setiap saat para Moderators akan melihat-lihat lagi msg list, dan akan
membersihkan message list dari posting sampah yg tidak perlu.

Untuk itu kita perlu kesepakatan sebagai berikut:


SANGAT DIHARAPKAN:
==================

(1)
Posting dari member berupa: share pengetahuan, pertanyaan, jawaban dan/
atau komentar dan tanggapan yg masih relevan dengan pertanyaan/posting;
semuanya harus sekitar atau ada hubungannya dengan Microsoft Excel.

(2)
Size Lampiran dlm rangka memperjelas kasus/penjelasan, agar diupayakan
tidak lebih dari 250KB, jika perlu dicompressed dulu.

(3)
Posting pertanyaan dialamatkan hanya kepada alamat milis, (jangan ke
alamat owner)

(4)
Semua mail dikemukakan secara santun, ceria, menyenangkan, boleh lucu,
saling menghormati, menjauhkan dari masalah SARA.


SANGAT TIDAK DIHARAPKAN:
========================

(1)
Mail yg isinya melecehkan, menghina fihak lain, berbahasa kasar, memicu
pertengkaran dsb.

(2)
Posting "too good to be true" misalnya "jualan" (MLM), spam, money game,
hoax, mail berantai dan iklan (tanpa lebihdulu mendapat ijin dari owner).

(3)
Cross-posting (mengirim 1 mail sekaligus kepada lebih dari satu milis /
address tujuan).

(4)
Mail yg ditulis dengan ukuran, bentuk/warna font dan cara yg di luar
kewajaran, sehingga menyulitkan pembacaan.

(5)
Mail tanpa judul/subject dan/atau tanpa isi, walaupun melampirkan penjelasan.



LAIN LAIN:
==========

Saran & Tips menulis mail / posting ke milis:
---------------------------------------------

(a)
Berikan subject yg isinya mewakili kasus yg akan ditulis.
Hindari subject yg tidak jelas dan terlalu general (misal "tolong",
"help", "tanya" "mohon pencerahan", dsb)

(b)
Ikuti Subject yg telah ada, (dengan meReply), hanya jika masalah yg akan
ditulis masih berkaitan.
Mengubah Subject (misal dgn menambah kata "Balasan" / "Solusi" /
"Tanggapan" dsb, hanya akan merusak 'Thread' (korelasi/kesinambungan)
suatu topik, oleh karena itu jangan dilakukan.

Jika anda akan mengajukan topik/kasus baru yg tidak berkaitan dengan
topik yg telah ada, buatlah Subject baru, dengan Compose / New Mail.
JANGAN dengan cara mereply subject yg ada lalu mengganti subjecnya.

(c)
Terutama pada posting pertanyaan/request, tuliskan masalah dengan jelas
di badan email. Penjelasan lebih rinci dapat ditulis pada lampiran.
Lampiran sedapat mungkin berupa workbook (file *.xls), dengan nama-file
yang spesifik.

(d)
Posting tanggapan/jawaban hendaknya ditulis secara 'top-posting' (di
ATAS "quoted mail" yg ditanggapi, demi mempermudah pembacaan.

'Quoted mail' tidak harus disertakan semua, cukup 1 atau maximal 2 mail
terdahulu.

(e)
Footer yg tidak perlu hendaknya dihapus dulu sebelum mail Anda kirimkan.



Mengenai OOT dan VOOT
---------------------
Di luar 3 jenis posting di atas, yi: DISKUSI yg berisi sharing,
pertanyaan, tanggapan) akan dianggap Out of Topic (OOT) atau bahkan
VOOT (very out of topic).

Kategory OOT akan dipertimbangkan kasus-demi-kasus dengan kriteria
"manfaat positif bagi komunitas kita".

Kategory OOT atas pertimbangan khusus, misalnya demi kepentingan yg
mendesak dan penting, atau demi "kemanusiaan", tidak didelete.
Jika tidak memenuhi kriteria akan didelete dengan atau tanpa pemberi-
tahuan kpd member.

Kategory VOOT, posting akan langsung didelete, pengirim akan diberi
teguran.

VOOT kedua dari pengirim yg sama akan menyebabkan member ybs didisabled
sementara kemampuan postingnya.

Kelanjutan dari suatu diskusi tanya-jawab, masih layak diposted ke milis,
misal hanya ucapan terima kasih atau pun sejenis konfirmasi bahwa suatu
solusi sudah diterima dan dapat dipakai dsb, ini dapat golongkan sbg OOT
yg masih layak tayang.

Kelanjutan pembicaraan yg sudah tidak relevan lagi bagi member lain,
dapat anda teruskan melalui 'japri' (jalur pribadi).


Kritik dan saran kepada milis 'belajar-excel'
--------------------------------------------
Kritik dan saran diluar masalah excel demi perbaikan milis ini dapat
disampaikan ke owner / moderators


Hak dan wewenang Moderators
---------------------------
Moderators berhak setelah mempertimbangkan hal-hal diatas untuk
memberikan kartu kuning atau langsung kartu merah dan/atau
mem-banned members yang melakukan pelanggaran rules milis ini.


Himbauan dari milis 'belajar excel' kpd members
-----------------------------------------------

Diharapkan para members terus meningkatkan pengetahuannya mengenai
kelaziman cara bermilis & ber-net-ria secara umum.

Perlu selalu disadari bahwa di dunia internet, sama dengan dunia kita
sehari hari.
Jika di dunia nyata kita mengenal "etika / ettiquettes", maka di net
ada semacam etika umum yg lazim disebut "nettiquette".

Kalau anda sering tidak mengindahkan "nettiquettes", tidak akan polisi
yg menangkap anda; tetapi lama-lama anda akan dijauhi banyak rekan,
karena mereka tentu merasa tidak nyaman ber-korespondensi dengan anda.

Sebagai Members of "milis belajar-excel" dan sebagai 'netter sejati',
anda tentu tidak suka kalau harus dicap sebagai "tidak nettis" yang
artinya setara dgn "tidak etis".

--------------------------------------------[rev: 13mar2010 / ctv]-----
8d.

Re: ENTRY DATA KE TABEL

Posted by: "M. Ferdiansyah" muh_ferdy@pusri.co.id   muh_f3rdi4n5yah

Thu Jul 7, 2011 8:30 pm (PDT)



dear pak Tjahya,

Selagi menunggu jawaban dari para master, izinkanlah saya mencoba untuk
menjawab dengan menggunakan bantuan macro.

*Karena masih belum tau permintaan akhirnya bagaimana, jadi saya mencoba
dengan asumsi sendiri.

best regard,

Ferdy

> File PERATURAN MILIS: SUDAH dikirim kepada setiap members
> 1. pada saat konfirmasi gabung / join /subscribe ke milis [belajar-excel]
> 2. di post ke milis (berarti = DIKIRIM ke semua members yg berstatus
> individual mail) setiap awal bulan sekali (status membership pak tjahya =
> "individual mail").
>
> File tsb terakhir diposted : Jumat, 1 Juli 2011 - 04:13pm
> http://tech.groups.yahoo.com/group/belajar-excel/message/11386
>
> kami lampirkan text nya dlm bentuk file TXT
>
> best regards & terima kasih,
> -mod-
>
>
>
> 2011/7/8 <tjahyahartono@yahoo.co.id>
>>
>> Okee,peraturan milisnya aq liat dmn ya?walopun aq dah lama ikut milis
> in.tapi blum prnah tanya2.mohon petunjuknya.trm kasih.nb:maaf ya lain kali
> subjectnya aq isi deh,sama judul,topiknya pokoknya apa yg jadi rule
> belajar-excel.
>>
>>
>> ________________________________
>> From: Tjahya Hartono <tjahyahartono@yahoo.co.id>
>> Sender: belajar-excel@yahoogroups.com
>> Date: Fri, 8 Jul 2011 07:47:42 +0800 (SGT)
>> To: <belajar-excel@yahoogroups.com>; <XL-mania@yahoogroups.com>
>> ReplyTo: belajar-excel@yahoogroups.com
>> Subject: [belajar-excel] ENTRY DATA KE TABEL
>>
>> =========================================================
>> catatan mod:
>> * Posting Pak Tjahya dikirim TANPA SUBJECT !!
>> Subject kami tambahkan spt di atas
>>
>> * Untuk posting selanjutnya mohon Subjectnya diisi dga
>> Judul/Topik sesuai masalah yg dihadapi.
>>
>> * Nama workbook lampiran mosok: "TANYA" sih ??
>> mbok ya pilih nama yg specifik misalnya "JUANGKRIK!"
>> ( e^E makin gag nyambung ya? ) hehe..
>>
>> * Mohon dibaca kembali Peraturan Milis, dua kali.
>> =========================================================
>

____________ _________ _________ _________ _________ _________ _________
Notice : This e-mail (and any attachment) is strictly confidential and
is intended only for the addressee(s)above. Is strictly prohibited to
forward, print, copy, or otherwise reproduce this message that would
allow it to be viewed by any individual not originally listed as
a recipient(s). If you have received this e-mail in error, please
immediately notify the sender and delete this message. The opinions
expressed in this e-mail (and any attachment) are those of the individual
sender and may not necessarily reflect the views of PT Pusri.
____________ _________ _________ _________ _________ _________ _________
9a.

Re: merevisi isi data

Posted by: "R T Gultom" ro_tag@yahoo.com   ro_tag

Thu Jul 7, 2011 7:44 pm (PDT)



tumben ngga ada tanggapan apa ane kurang jelas kali yah?

--- On Thu, 7/7/11, R T Gultom <ro_tag@yahoo.com> wrote:

From: R T Gultom <ro_tag@yahoo.com>
Subject: Re: [belajar-excel] Re: merevisi isi data
To: belajar-excel@yahoogroups.com
Date: Thursday, July 7, 2011, 8:08 AM

 

Dear All,

Setelah di applikasi macronya ternyata setiap melakukan eksekusi harus mengedit macronya karena data yang di terima owrkbook, sheet dan range tidak sama
apakah bisa dibuat jadi variable jadi tidak mengedit macro cukup dengan perintah buka file, pilih sheet dan range

Regards,
Gultom

--- On Mon, 7/4/11, R T Gultom <ro_tag@yahoo.com> wrote:

From: R T Gultom <ro_tag@yahoo.com>
Subject: Re: [belajar-excel] Re: merevisi isi data
To: belajar-excel@yahoogroups.com
Date: Monday, July 4, 2011, 4:58 PM

 

Ok salut sama be excel sudah selesai mempelajarinya rupanya ada kesalahan penempatan di file "List"
tinggal apply ke acualisasinya
Regards,

--- On Mon, 7/4/11, R T Gultom <ro_tag@yahoo.com> wrote:

From: R T Gultom <ro_tag@yahoo.com>
Subject: Re: [belajar-excel] Re: merevisi isi data
To: belajar-excel@yahoogroups.com
Date: Monday, July 4, 2011, 4:29 PM

 

kalau berkenan  tolong dikoreksi karena waktu saya exekusi fail
data terlampir

--- On Mon, 7/4/11, sudarsono <jkssbma@live.com> wrote:

From: sudarsono <jkssbma@live.com>
Subject: [belajar-excel] Re: merevisi isi data
To: belajar-excel@yahoogroups.com
Date: Monday, July 4, 2011, 4:16 PM

 

Function carinilai(ByVal daerah As Range, ByVal strcari As String) As Range

Dim ketemu As Range

Set ketemu = daerah.Find(what:=strcari, LookIn:=xlValues, SearchOrder:=xlByRows)

Set cariterakhir = ketemu

End Function

koreksi menjadi

Function carinilai(ByVal daerah As Range, ByVal strcari As String) As Range

Dim ketemu As Range

Set ketemu = daerah.Find(what:=strcari, LookIn:=xlValues, SearchOrder:=xlByRows)

Set carinilai= ketemu

End Function

menurut saya apa yang disarankan Master Kid itu benar, gunakan fungsi cariniai untuk memperoleh baris yang diinginkan.....

--- In belajar-excel@yahoogroups.com, R T Gultom <ro_tag@...> wrote:

>

> betual juga sih, tapi masih belum ketemu formatnya mengingat

> Ada data type barang dengan kondisi order no (IP), tanggal order, tanggal permintaan (bulan), jumlah per bulan (di insert baris) menkondisikan pengiriman barang karena tanggal permintaan bisa 5 kali dalam satu minggu sementara tangal pengiriman cuma satu kali dalam seminggu

> dengan kondisi tertentu si customer bisa merubah tanggal permintaan sesuai dengan lain productnya mereka dan ini yang akan saya robah (dal;am case ini) untuk menyesuaikan kembali tanggal pengiriman

>

>  setelah itu saya pivot untuk mengetaui per type per minggu dan per bulan berapa

>

>

> --- On Mon, 7/4/11, Mr. Kid <mr.nmkid@...> wrote:

>

> From: Mr. Kid <mr.nmkid@...>

> Subject: Re: [belajar-excel] merevisi isi data

> To: belajar-excel@yahoogroups.com

> Date: Monday, July 4, 2011, 3:13 PM

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

> Kenapa tidak buat master data yang berisi :

> tgl_input , tgl_ip , nilai_ip

> Kan gak repot mewarnai, gak repot cari-cari, bisa report banyak hal, sampai sejarah penggantiannya pun bisa.

>

> ;-)

> Kid.

>

>

>

> 2011/7/4 R T Gultom <ro_tag@...>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

> mulai mendekati. tapi saya pelajari dulu untuk merubah variablenya

> tapi kalau tidak salah sepintas bahwa di revisi kita sorot satu persatu sehingga macro exekusi dengan mengganti tangal di list cmiiw

>

>

> ntar kalau mentok nanya lagi yah.....

> sebenarnya masih ada tambahan yaitu setelah diganti tanggal dengan tanggal revisi di beri warna di range untuk menandakan itu adalah revisi,

>

>

>

> --- On Mon, 7/4/11, Sudarsono Suhenk <jkssbma@...> wrote:

>

>

>

> From: Sudarsono Suhenk <jkssbma@...>

> Subject: RE: [belajar-excel] merevisi isi data

>

>

> To: "belajar excel yahoo.com" <belajar-excel@yahoogroups.com>

> Date: Monday, July 4, 2011, 2:53 PM

>

>

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

> gunakan saja find :

>  

> Function carinilai(ByVal daerah As Range, ByVal strcari As String) As Range

>  Â Ã‚  Dim ketemu As Range

>  Â Ã‚  Set ketemu = daerah.Find(what:=strcari, LookIn:=xlValues, SearchOrder:=xlByRows)

>

>

>  Â Ã‚  Set cariterakhir = ketemu

> End Function

>  

> Sub ya()

>  Â Ã‚  Dim sel As Range

>  Â Ã‚  Dim wk As Workbook

>  Â Ã‚  Set wk = ActiveWorkbook

>  Â Ã‚  For Each sel In Workbooks("rev.xls").Sheets("ubah").Range("Q31:Q34")

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  nilaicari = sel.Offset(0, 0)

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  nilaiganti = sel.Offset(0, -1)

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Set ketemu = carinilai(wk.Sheets("Sumeri").Range("N8:O29"), nilaicari)

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  If Not ketemu Is Nothing

> Then

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  ketemu.Offset(0, -1) = nilaiganti

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  End If

>  Â Ã‚  Next

>  Â Ã‚ 

>  Â Ã‚ 

> End Sub

>

> '===============

> To: belajar-excel@yahoogroups.com

>

>

> From: ro_tag@...

> Date: Mon, 4 Jul 2011 15:05:43 +0800

> Subject: RE: [belajar-excel] merevisi isi data

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

>

> sebenarnya yang dibutuhkan adalah sebagai berikut :

> cari ip revisi di ip lista dan

> ganti tanggal list dengan tanggal revisi

>

>

> tapi membuat loopnya ribet saya utak-utik tidak ketemu

>

>

> --- On Mon, 7/4/11, R T Gultom <ro_tag@...> wrote:

>

> From: R T Gultom <ro_tag@...>

>

>

> Subject: RE: [belajar-excel] merevisi isi data

> To: belajar-excel@yahoogroups.com

> Date: Monday, July 4, 2011, 2:01 PM

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

> Wah mantab, tapi sayang persayaratannya adalah :

> tidak ada penghapusan baris, karena isi dari baris revisi dengan list tidak sama, sehingga masih ada yang dipakai di list data baris sebelumnya

>

>

> sebenarnya yang dibuthkan adalah bagaimana mengganti tangal yang di revisi saja tanpa menambah baris atau menghapus baris

> karena masing2 data isinya selain dari IP dan tanggal adalah berbeda-beda

> Regards,

> Gultom

>
50A>

>

>

> --- On Fri, 7/1/11, Sudarsono Suhenk <jkssbma@...> wrote:

>

> From: Sudarsono Suhenk <jkssbma@...>

>

>

> Subject: RE: [belajar-excel] merevisi isi data

> To: "belajar excel yahoo.com" <belajar-excel@yahoogroups.com>

>

>

> Date: Friday, July 1, 2011, 7:40 PM

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

>

> atau jika apapun yang ada di sheet ubah yang merupakan kondisi terakhir ( update ) gunakan cara ini :

>  

> Option Explicit

> Sub GabungTabelAntarWorkbook()

>  Â Ã‚  Dim AnakDulu As Boolean

>  Â Ã‚  AnakDulu = True

>  Â Ã‚  Dim INDUK As Range, ANAKK As Range

>

>

>  Â Ã‚  Dim workbookutama, workbookanak As String

>  Â Ã‚  workbookutama = ActiveWorkbook.Name

>  Â Ã‚  Workbooks.Open Filename:=ActiveWorkbook.Path & "\rev.xls", Notify:=False

>  Â Ã‚  workbookanak = ActiveWorkbook.Name

>

>

>  Â Ã‚  Dim jumbaris As Long

>  Â Ã‚  If AnakDulu Then

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Workbooks(workbookanak).Activate

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Set ANAKK = ctvUsedRange(Workbooks("rev.xls").Sheets("ubah"))

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Set INDUK = ctvUsedRange(ThisWorkbook.Sheets("Sumeri")).Offset(1,

> 0)

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  jumbaris = ANAKK.Rows.Count

>  Â Ã‚  Else

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Workbooks(workbookutama).Activate

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Set INDUK = ctvUsedRange(ThisWorkbook.Sheets("Sumeri"))

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Set ANAKK = ctvUsedRange(Workbooks("rev.xls").Sheets("ubah")).Offset(1, 0)

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  jumbaris = INDUK.Rows.Count

>  Â Ã‚  End If

>  Â Ã‚  Workbooks(workbookutama).Activate

>  Â Ã‚  If AnakDulu Then

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  ANAKK.Copy Destination:=Sheets("sheet1").Range("A1")

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  INDUK.Copy Destination:=Sheets("sheet1").Range("A" & jumbaris + 1)

>

>

>  Â Ã‚  Else

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  INDUK.Copy

> Destination:=Sheets("sheet1").Range("A1")

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  ANAKK.Copy Destination:=Sheets("sheet1").Range("A" & jumbaris + 1)

>  Â Ã‚  End If

>  Â Ã‚  Call hapusganda

>  Â Ã‚  Call sortdata

>

>

> End Sub

> '===================================================================================================

> Private Function ctvUsedRange(Optional Sht As Worksheet) As Range

>  Â  ' siti Vi // Bluewater, 24 Nov 2009

>

>

>  Â  ' last refine: Jurangmangu, 19 Jun 2011

>  Â  '---------------------------------------

>  Â Ã‚  Dim FstRow As Long, FstCol As Integer

>  Â Ã‚  Dim LstRow As Long, LstCol As Integer

>  Â Ã‚  On Error Resume Next

>  Â Ã‚  If Sht Is Nothing Then Set Sht = ActiveSheet ' Else Set Sht = Sht

>

>

>  Â Ã‚  With Sht

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ 

> Sht.Select

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  If Not Cells(1) = vbNullString Then

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  FstRow = 1: FstCol = 1

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Else

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  FstRow = .Cells.Find(What:="*", SearchDirection:=xlNext, SearchOrder:=xlByRows).Row

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  FstCol = .Cells.Find(What:="*", SearchDirection:=xlNext, SearchOrder:=xlByColumns).Column

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  End If

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  LstRow = .Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  LstCol = .Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Column

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Set ctvUsedRange = Range(.Cells(FstRow,

> FstCol), .Cells(LstRow, LstCol))

>  Â Ã‚  End With

> End Function

> Sub sortdata()

>  Â Ã‚  Sheets("Sheet1").Select

>  Â Ã‚  Range("A1").Select

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear

>

>

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("B2:B27") _

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("A2:A27") _

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  , SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal

>  Â Ã‚ Ã‚  With ActiveWorkbook.Worksheets("Sheet1").Sort

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .SetRange Range("A1:B27")

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .Header = xlYes

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .MatchCase

> = False

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .Orientation = xlTopToBottom

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .SortMethod = xlPinYin

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .Apply

>  Â Ã‚  End With

> End Sub

> Sub hapusganda()

>  Â Ã‚  Sheets("Sheet1").Select

>  Â Ã‚  Range("A1").Select

>

>

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear

>  Â Ã‚  ActiveSheet.Range("$A$1:$B$27").RemoveDuplicates Columns:=Array(1, 2), Header _

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  :=xlYes

>  Â Ã‚  ActiveSheet.Range("$A$1:$B$27").RemoveDuplicates Columns:=2, Header:=xlYes

>

>

> End Sub

>

> Apa sudah sesuai ??? 

> To: belajar-excel@yahoogroups.com

> From: jkssbma@...

>

>

> Date: Fri, 1 Jul 2011 17:09:37 +0700

> Subject: RE: [belajar-excel] merevisi isi data

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

> Bulan

> IP

>

>

> 1-Jun-2011

> IP-3457

>

>

> 2-Jun-2011

> IP-3458

>

>

> 3-Jun-2011

> IP-3459

>

>

> 4-Jun-2011

> IP-3460

>

>

> 5-Jun-2011

> IP-3461

>

>

> 6-Jun-2011

> IP-3462

>

>

> 7-Jun-2011

> IP-3463

>

>

> 8-Jun-2011

> IP-3464

>

>

> 9-Jun-2011

> IP-3465

>

>

> 10-Jun-2011

> IP-3466

>

>

> 11-Jun-2011

>

>

>

> IP-3467

>

>

> 12-Jun-2011

> IP-3468

>

>

> 13-Jun-2011

> IP-3469

>

>

> 14-Jun-2011

> IP-3470

>

>

> 15-Jun-2011

> IP-3471

>

>

> 16-Jun-2011

> IP-3472

>

>

> 17-Jun-2011

> IP-3473

>

>

> 18-Jun-2011

> IP-3474

>

>

> 19-Jun-2011

> IP-3475

>

>

> 20-Jun-2011

> IP-3476

>

>

> 21-Jun-2011

> IP-3477

>

>

> 22-Jun-2011

> IP-3478

>

>

>

>  

>

>

>

>

>

> Bulan

> IP

>

>

> 13-Jun-2011

> IP-3465

>

>

> 16-Jun-2011

> IP-3466

>

>

> 4-Jun-2011

>

>

>

> IP-3467

>

>

> 21-Jun-2011

> IP-3468

>

>

>  

>

>

>

>

> Bulan

> IP

>

>

> 1-Jun-2011

> IP-3457

>

>

>

> 2-Jun-2011

> IP-3458

>

>

> 3-Jun-2011

> IP-3459

>

>

> 4-Jun-2011

> IP-3460

>

>

> 5-Jun-2011

> IP-3461

>

>

> 6-Jun-2011

> IP-3462

>

>

> 7-Jun-2011

> IP-3463

>

>

> 8-Jun-2011

> IP-3464

>

>

> 13-Jun-2011

> IP-3465

>

>

> 16-Jun-2011

> IP-3466

>

>

> 11-Jun-2011

>

>

>

> IP-3467

>

>

> 21-Jun-2011

> IP-3468

>

>

> 13-Jun-2011

> IP-3469

>

>

> 14-Jun-2011

> IP-3470

>

>

> 15-Jun-2011

> IP-3471

>

>

> 16-Jun-2011

> IP-3472

>

>

> 17-Jun-2011

> IP-3473

>

>

> 18-Jun-2011

> IP-3474

>

>

> 19-Jun-2011

> IP-3475

>

>

> 20-Jun-2011

> IP-3476

>

>

> 21-Jun-2011

> IP-3477

>

>

> 22-Jun-2011

> IP-3478

>

>

>  

>  

> untuk IP-3467 apa tanggal terakhir 11 Juni 2011 , bukan 4 Juni 2011 ?

>  

> Sub GabungTabelAntarWorkbook()

>  Â  ' siti Vi // Bluewater, 1 Juli 2011

>  Â  ' workbook "rev.xls" harus sudah terbuka

>

>

>  Â  '---------------------------------------

>  Â  Dim INDUK As Range, ANAKK As Range

>  Â  Set INDUK = ctvUsedRange(ThisWorkbook.Sheets("Sumeri"))

>  Â  Set ANAKK = ctvUsedRange(Workbooks("rev.xls").Sheets("ubah")).Offset(1, 0)

>

>

>  

>  Â Ã‚  Dim jumbaris As Long

>  Â Ã‚  jumbaris = INDUK.Rows.Count

>

>  Â Ã‚  INDUK.Copy Destination:=Sheets("sheet1").Range("A1")

>  Â Ã‚  ANAKK.Copy Destination:=Sheets("sheet1").Range("A" & jumbaris + 1)

>

>

>  Â Ã‚  Call sortdata

>  Â 

> End

> Sub

>  

> '===================================================================================================

> Private Function ctvUsedRange(Optional Sht As Worksheet) As Range

>  Â  ' siti Vi // Bluewater, 24 Nov 2009

>

>

>  Â  ' last refine: Jurangmangu, 19 Jun 2011

>  Â  '---------------------------------------

>  Â  Dim FstRow As Long, FstCol As Integer

>  Â  Dim LstRow As Long, LstCol As Integer

>  Â  On Error Resume Next

>  Â  If Sht Is Nothing Then Set Sht = ActiveSheet ' Else Set Sht = Sht

>

>

>  Â  With Sht

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  Sht.Select

>  Â Ã‚ Ã‚ Ã‚  If Not Cells(1) = vbNullString Then

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  FstRow = 1: FstCol = 1

>  Â Ã‚ Ã‚ Ã‚ 

> Else

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  FstRow = .Cells.Find(What:="*", SearchDirection:=xlNext, SearchOrder:=xlByRows).Row

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  FstCol = .Cells.Find(What:="*", SearchDirection:=xlNext, SearchOrder:=xlByColumns).Column

>

>

>  Â Ã‚ Ã‚ Ã‚  End If

>  Â Ã‚ Ã‚ Ã‚  LstRow = .Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row

>  Â Ã‚ Ã‚ Ã‚  LstCol = .Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Column

>

>

>  Â Ã‚ Ã‚ Ã‚ 

>  Â Ã‚ Ã‚ Ã‚  Set ctvUsedRange = Range(.Cells(FstRow, FstCol), .Cells(LstRow, LstCol))

>  Â  End With

> End Function

> '====================================================================================================

>

>

>

> Sub sortdata()

>  Â Ã‚  Sheets("Sheet1").Select

>  Â Ã‚ 

> Range("A1").Select

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("B2:B27") _

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

>

>

>  Â Ã‚  ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("A2:A27") _

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  , SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal

>  Â Ã‚ Ã‚  With ActiveWorkbook.Worksheets("Sheet1").Sort

>

>

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .SetRange Range("A1:B27")

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .Header = xlYes

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .MatchCase = False

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .Orientation = xlTopToBottom

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .SortMethod =

> xlPinYin

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  .Apply

>  Â Ã‚  End With

>  Â Ã‚  ActiveSheet.Range("$A$1:$B$27").RemoveDuplicates Columns:=Array(1, 2), Header _

>  Â Ã‚ Ã‚ Ã‚ Ã‚ Ã‚  :=xlYes

>  Â Ã‚  ActiveSheet.Range("$A$1:$B$27").RemoveDuplicates Columns:=2, Header:=xlYes

>

>

> End Sub

>

>  

> catatan :

> Bu Devi , saya ambil beberapa koding nya dan saya modif . Trim's.

>  

>  

>  

>  

>  

> To: belajar-excel@yahoogroups.com

>

>

> From: setiyowati.devi@...

> Date: Fri, 1 Jul 2011 15:05:52 +0700

> Subject: Re: [belajar-excel] merevisi isi data

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

>

> gak ada kabarnya ?...  ya udah, kita anggap seperti DUGAAN semula, dengan tambahan asumsi sbb:

>

>

>

>

> ** tabel yg ada di "workbook List / sheet Sumeri" adalah satu satunya range yg ada di sheet itu

>

>

>

> di cell lain tidak ada satu titik data pun (kalau ada, deteksi letak tabel bisa salah)

>

>

>

>

> t** abel yg ada di "workbook rev / sheet ubah" Â adalah satu satunya range yg ada di sheet itu

>

>

>

> di cell lain tidak ada satu titik data pun (kalau ada, deteksi letak tabel bisa salah)

>

>

>

>

> ** saat makro mulai dijalankan(makro berada di workbook LIST),  workbook REV harus susah dibuka.

>

>

>

>

> Kedua tabel yg akan digabung itu boleh dipindah pindah letaknya (termasuk diperbanyak datanya / penambahan ke bawah ) asal masih didalam sheet yg sama;  tetapi tidak boleh 

>

>

>

> ada data/tabel lain diluar range tabel tsb 

>

>

>

>

> Sub GabungTabelAntarWorkbook()

>

>

>

>    ' siti Vi // Bluewater, 1 Juli 2011

>

>    ' workbook "rev.xls" harus sudah terbuka   '---------------------------------------

>

>

>

>    Dim INDUK As Range, ANAKK As Range   

>

>    Set INDUK = ctvUsedRange(ThisWorkbook.Sheets("Sumeri"))   Set ANAKK = ctvUsedRange(Workbooks("rev.xls").Sheets("ubah")).Offset(1, 0)

>

>

>

>    ANAKK.Copy INDUK(INDUK.Rows.Count + 1, 1)   

>

>    INDUK.CurrentRegion.Sort _      Key1:=INDUK(1, 2), Order1:=xlAscending, _

>

>

>

>       Header:=xlGuess, OrderCustom:=1, MatchCase:=False, _      Orientation:=xlTopToBottom, DataOption1:=xlSortNormal

>

>

>

>    End Sub

>

>

>

>

>

>

>

>

> 2011/7/1 STDEV(i) <setiyowati.devi@...>

>

>

> jadi maksud yg sebenarnya bagaimana, mohon diceritakan

>

>

> (kalau melihat GAMBARAN HASIL yg diperlihatkan tadi, sepertinya Â "jalan ceritak" 

>

>

>

>

> yg siti ajukan tadi sudah sesuaijika belum sesuai, di bagian mananya yg masih perlu ubah ? 

>

>

>

>

> nanti bisa kita perbaiki.

> setelah oke, soal mengimplementasikan ke code itu masalah kedua dan gampang.

>

>

>

>

>

> mengenai jumlah records (volume data) tidak jadi masalah, prinsip kerjanya tetap sama.

>

>

>

>

>

> sample yg diajukan seharusnya menggambarkan / mewakili keadaan faktualnya

>

>

>

>

>

>

>

>

>

> 2011/7/1 R T Gultom <ro_tag@...>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>  

>

>

>

>

>

>

>

>

>

>

> Sebenarnya selama ini saya pakai system manual

>

>

>

>

>

> dengan vlookup di dummy column di file "List" terus saya pindahin dan di beri color

> data revisi tidak berurutan sebenarnya hanay sample saya ambil dari data (list)

>

>

>

>

>

> Siti Vi wrote

>

> Pakai cara praktis saja

>

>

>

> 1. deteksi letak cell kosong di bawah tabel 1 (list), cukup 1 cell di kolom 1 saja 

>

>

>

>

>

>

> 2. deteksi letak & dimensi tabel 2 (rev) lalu dicopy3. dipaste ke cell hasil langkah 1

>

>

>

>

>

>

> 4. range baru yg terbentk dikenakan metoda sort dengan kolom 2 sbg kunci sorting, order: manaik

>

10.

Mail Merge di excell

Posted by: "Yusril Ramadani" yusrilramadani@gmail.com   yusril_rmd

Thu Jul 7, 2011 7:59 pm (PDT)



Dear para pakar

Mohon bantuannya

Saya ingin membuat surat otomatis yang seperti Mail merge di excell
Suratnya cukup sederhana sih tapi kalau bisa dengan macro dan otomoatis akan
sangat memudahkan

Dengan list tabel yang ada bisa dibuat progarm untuk otomatisasi surat
sehingga tinggal print

Mohon solusinya para pakar

terimakasih banyak seblumnya
terlampir contoh sederhananya

Salam
YR
Recent Activity
Visit Your Group
Yahoo! Groups

Parenting Zone

Tips for a happy,

healthy home

Find helpful tips

for Moderators

on the Yahoo!

Groups team blog.

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
---------------------------------------------------------------------
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