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. [mailto:belajar-excel@com yahoogroups. ] On Behalf Of hendrik karnadicom
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. On Behalf Of Mr. Kidcom
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. [mailto:belajar-excel@com yahoogroups. ] On Behalf Of hendrik karnadicom
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. >; <XL-mania@yahoogroupcom s.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. >; <XL-mania@yahoogroupcom s.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. >; <XL-mania@yahoogroupcom s.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. , R T Gultom <ro_tag@...> wrote:com
>
> 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") .RemoveDuplicate s Columns:=Array( 1, 2), Header _
> Â Â Â Â Â Â Â :=xlYes
> Â Â Â ActiveSheet.Range("$A$ 1:$B$27") .RemoveDuplicate s 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") .RemoveDuplicate s Columns:=Array( 1, 2), Header _
> Â Â Â Â Â Â Â :=xlYes
> Â Â Â ActiveSheet.Range("$A$ 1:$B$27") .RemoveDuplicate s 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  '-------------------- ---------