15 New Messages
Digest #1888
Messages
Tue Nov 6, 2012 6:42 pm (PST) . Posted by:
"Agus Erwanto" erwanto_agus
Terimakasih Pak Hendrik,
tool sudah bisa dijalankan,
tetapi masalahnya disini saya punya banyak file yang harus digabungkan bahkan sampai ratusan, bagaimana ya?
Aguserw
--- Pada Sel, 6/11/12, hendrik karnadi <hendrikkarnadi@yahoo.com > menulis:
Dari: hendrik karnadi <hendrikkarnadi@yahoo.com >
Judul: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Kepada: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
Tanggal: Selasa, 6 November, 2012, 5:06 PM
Silakan coba file terlampir.
Langkah2 untuk menjalankannya:
- Extract lampiran ke Directory D:
- Jika nama Directory atau file diubah maka Range C3 s/d Range C5 harus diubah pula.
- Klik tombol Hapus untuk membersihkan data lama
- Klik tombol Gabung untuk menggabung data.
Semoga sesuai kebutuhan.
Salam,
Hendrik Karnadi
From: Agus Erwanto <erwanto_agus@yahoo.co.id >
To: belajar-excel@yahoogroups.com
Sent: Tuesday, 6 November 2012, 16:35
Subject: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Dear Pak Hendrik,
Betul pak,
pertanyaan sama dengan judul, dimana file sua dan data digabungkan jadi satu.
saya berikan contoh juga di file terlampir.
terimakasih koreksinya .
agus
--- Pada Sel, 6/11/12, hendrik karnadi <hendrikkarnadi@yahoo.com > menulis:
Dari: hendrik karnadi <hendrikkarnadi@yahoo.com >
Judul: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Kepada: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
Tanggal: Selasa, 6 November, 2012, 6:52 AM
Mas Agus,
Apakah pertanyaannya = judul ?
Apakah pertanyaannya tentang bagaimana menggabungkan file Sua dan file Data ?
Barangkali akan lebih mudah bagi penjawab apabila diberikan contoh hasil yang diinginkan.
Salam,
Hendrik Karnadi
From: Agus Erwanto <erwanto_agus@yahoo.co.id >
To: belajar-excel@yahoogroups.com
Sent: Tuesday, 6 November 2012, 9:03
Subject: [belajar-excel] membuat macros append untuk beberapa file xls
Dear Para Pakar Excell
saya mempunyai pertanyaan nich, dimana saya mempunyai beberapa file excell yaitu Sua.xls dan Data.xls (sebenarnya banyak, hanya saya beri contoh 2 saja). dimana di salam file tersebut mempunyai type dan format yang sama , cuma isi datanya yang berbeda.
Saya mempunyai file Process.xls , dimana mempunyai 2 sheet yaitu :
Prosesdata , berisi source tempat data berada dan command button, untuk mengeklik Proses nantinya.
Total, tempat dimana data akumulasi proses run data
terima kasih para pakar
agus
tool sudah bisa dijalankan,
tetapi masalahnya disini saya punya banyak file yang harus digabungkan bahkan sampai ratusan, bagaimana ya?
Aguserw
--- Pada Sel, 6/11/12, hendrik karnadi <hendrikkarnadi@
Dari: hendrik karnadi <hendrikkarnadi@
Judul: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Kepada: "belajar-excel@
Tanggal: Selasa, 6 November, 2012, 5:06 PM
Silakan coba file terlampir.
Langkah2 untuk menjalankannya:
- Extract lampiran ke Directory D:
- Jika nama Directory atau file diubah maka Range C3 s/d Range C5 harus diubah pula.
- Klik tombol Hapus untuk membersihkan data lama
- Klik tombol Gabung untuk menggabung data.
Semoga sesuai kebutuhan.
Salam,
Hendrik Karnadi
From: Agus Erwanto <erwanto_agus@
To: belajar-excel@
Sent: Tuesday, 6 November 2012, 16:35
Subject: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Dear Pak Hendrik,
Betul pak,
pertanyaan sama dengan judul, dimana file sua dan data digabungkan jadi satu.
saya berikan contoh juga di file terlampir.
terimakasih koreksinya .
agus
--- Pada Sel, 6/11/12, hendrik karnadi <hendrikkarnadi@
Dari: hendrik karnadi <hendrikkarnadi@
Judul: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Kepada: "belajar-excel@
Tanggal: Selasa, 6 November, 2012, 6:52 AM
Mas Agus,
Apakah pertanyaannya = judul ?
Apakah pertanyaannya tentang bagaimana menggabungkan file Sua dan file Data ?
Barangkali akan lebih mudah bagi penjawab apabila diberikan contoh hasil yang diinginkan.
Salam,
Hendrik Karnadi
From: Agus Erwanto <erwanto_agus@
To: belajar-excel@
Sent: Tuesday, 6 November 2012, 9:03
Subject: [belajar-excel] membuat macros append untuk beberapa file xls
Dear Para Pakar Excell
saya mempunyai pertanyaan nich, dimana saya mempunyai beberapa file excell yaitu Sua.xls dan Data.xls (sebenarnya banyak, hanya saya beri contoh 2 saja). dimana di salam file tersebut mempunyai type dan format yang sama , cuma isi datanya yang berbeda.
Saya mempunyai file Process.xls , dimana mempunyai 2 sheet yaitu :
Prosesdata , berisi source tempat data berada dan command button, untuk mengeklik Proses nantinya.
Total, tempat dimana data akumulasi proses run data
terima kasih para pakar
agus
Wed Nov 7, 2012 8:22 am (PST) . Posted by:
"Agus Erwanto" erwanto_agus
Terimakasih Pak Hendrik,
tool sudah bisa dijalankan,
tetapi masalahnya disini saya punya banyak file yang harus digabungkan bahkan sampai ratusan, bagaimana ya? karena tidak mungkin menulis satu persatu nama file.
--- Mods ---
Sepertinya ini re-post dalam rentang waktu yang kurang lama. Mohon repost berikutnya agak diperpanjang interval antara posting dan repost-nya.
Untuk mendaftar nama file, coba login dengan yahoo ID Anda dan jalan-jalan kemilis ke bagian files seperti link berikut :
http://tech.groups.yahoo.com/group/belajar-excel/files/Contoh%20Excel%20dari%20Mod/
Disana ada beberapa file contoh untuk membuat daftar nama-nama file.
Silakan diunduh, dipelajari, diterapkan ke kasus yang dihadapi.
Jika mengalami masalah, utarakab ke milis beserta usaha penerapannya.
------------
--- Pada Sel, 6/11/12, hendrik karnadi <hendrikkarnadi@yahoo.com > menulis:
Dari: hendrik karnadi <hendrikkarnadi@yahoo.com >
Judul: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Kepada: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
Tanggal: Selasa, 6 November, 2012, 5:06 PM
tool sudah bisa dijalankan,
tetapi masalahnya disini saya punya banyak file yang harus digabungkan bahkan sampai ratusan, bagaimana ya? karena tidak mungkin menulis satu persatu nama file.
--- Mods ---
Sepertinya ini re-post dalam rentang waktu yang kurang lama. Mohon repost berikutnya agak diperpanjang interval antara posting dan repost-nya.
Untuk mendaftar nama file, coba login dengan yahoo ID Anda dan jalan-jalan kemilis ke bagian files seperti link berikut :
http://tech.
Disana ada beberapa file contoh untuk membuat daftar nama-nama file.
Silakan diunduh, dipelajari, diterapkan ke kasus yang dihadapi.
Jika mengalami masalah, utarakab ke milis beserta usaha penerapannya.
------------
--- Pada Sel, 6/11/12, hendrik karnadi <hendrikkarnadi@
Dari: hendrik karnadi <hendrikkarnadi@
Judul: Re: [belajar-excel] membuat macros append untuk beberapa file xls
Kepada: "belajar-excel@
Tanggal: Selasa, 6 November, 2012, 5:06 PM
Tue Nov 6, 2012 6:45 pm (PST) . Posted by:
"rey"
Hai master-master...
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
Tue Nov 6, 2012 7:46 pm (PST) . Posted by:
"Gilang Sedar" gilangsedar9662
Semoga sesuai dengan pertanyaan Sdr. Rey.
Menggunakan rumus sangat sederhana dan masih menggunakan kolom bantu untuk
membantu formula VLOOKUP yang ada.
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ]
On Behalf Of rey
Sent: Wednesday, November 07, 2012 9:24 AM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] limit kesehatan
Hai master-master...
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
Menggunakan rumus sangat sederhana dan masih menggunakan kolom bantu untuk
membantu formula VLOOKUP yang ada.
From: belajar-excel@
On Behalf Of rey
Sent: Wednesday, November 07, 2012 9:24 AM
To: belajar-excel@
Subject: [belajar-excel] limit kesehatan
Hai master-master.
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
Tue Nov 6, 2012 7:51 pm (PST) . Posted by:
"raya hidayat" raya.hidayat
semoga sesuai dengan yang diinginkan.
penggunaan rumus sum di plan dikarenakan tidak mungkin seseorang memiliki
plan lebih dari satu.
terima kasih
Raya
On Wed, Nov 7, 2012 at 9:23 AM, rey <personalia_manado@ag.co.id > wrote:
> **
>
>
> Hai master-master...
>
> mohon di bantu formula yg tepat...
> kalo pake manual kurang srek...hehe
>
> tq
> Rey
>
> PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
>
> This email and any files transmitted with it are confidential and
> intended solely for the use of the individual or entity to whom they
> are addressed. If you have received this email in error please notify
> the system manager. This message contains confidential information
> and is intended only for the individual named. If you are not the
> named addressee you should not disseminate, distribute or copy this
> e-mail. Please notify the sender immediately by e-mail if you have
> received this e-mail by mistake and delete this e-mail from your
> system. If you are not the intended recipient you are notified that
> disclosing, copying, distributing or taking any action in reliance on
> the contents of this information is strictly prohibited.
>
>
--
Terima kasih
Raya
penggunaan rumus sum di plan dikarenakan tidak mungkin seseorang memiliki
plan lebih dari satu.
terima kasih
Raya
On Wed, Nov 7, 2012 at 9:23 AM, rey <personalia_manado@
> **
>
>
> Hai master-master.
>
> mohon di bantu formula yg tepat...
> kalo pake manual kurang srek...hehe
>
> tq
> Rey
>
> PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
>
> This email and any files transmitted with it are confidential and
> intended solely for the use of the individual or entity to whom they
> are addressed. If you have received this email in error please notify
> the system manager. This message contains confidential information
> and is intended only for the individual named. If you are not the
> named addressee you should not disseminate, distribute or copy this
> e-mail. Please notify the sender immediately by e-mail if you have
> received this e-mail by mistake and delete this e-mail from your
> system. If you are not the intended recipient you are notified that
> disclosing, copying, distributing or taking any action in reliance on
> the contents of this information is strictly prohibited.
>
>
--
Terima kasih
Raya
Tue Nov 6, 2012 8:33 pm (PST) . Posted by:
"lapendosol opik" lapendosol
Saya hanya koreksi jawaban dari mas gilang sambil belajar juga formula yg sama dengan kendala saya.
Pada plan A rumusnya saya rubah menjadi =IF(AND($D4>=10,$D4<99),$H$3,"") supaya yg pangkat 99 ga masuk
Trimakasih
________________________________
From: Gilang Sedar <gilang.smartdroid@gmail.com >
To: belajar-excel@yahoogroups.com
Sent: Wednesday, November 7, 2012 10:44 AM
Subject: RE: [belajar-excel] limit kesehatan
Semoga sesuai dengan pertanyaan Sdr. Rey.
Menggunakan rumus sangat sederhana dan masih menggunakan kolom
bantu untuk membantu formula VLOOKUP yang ada.
From:belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ] On Behalf
Of rey
Sent: Wednesday, November 07, 2012 9:24 AM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] limit kesehatan
Hai master-master...
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
Pada plan A rumusnya saya rubah menjadi =IF(AND($D4>
Trimakasih
____________
From: Gilang Sedar <gilang.smartdroid@
To: belajar-excel@
Sent: Wednesday, November 7, 2012 10:44 AM
Subject: RE: [belajar-excel] limit kesehatan
Semoga sesuai dengan pertanyaan Sdr. Rey.
Menggunakan rumus sangat sederhana dan masih menggunakan kolom
bantu untuk membantu formula VLOOKUP yang ada.
From:belajar-excel@
Of rey
Sent: Wednesday, November 07, 2012 9:24 AM
To: belajar-excel@
Subject: [belajar-excel] limit kesehatan
Hai master-master.
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
Tue Nov 6, 2012 8:48 pm (PST) . Posted by:
"rey"
makasih yah....master2....
----- Original Message -----
From: Gilang Sedar
To: belajar-excel@yahoogroups.com
Sent: Wednesday, November 07, 2012 11:44 AM
Subject: RE: [belajar-excel] limit kesehatan
Semoga sesuai dengan pertanyaan Sdr. Rey.
Menggunakan rumus sangat sederhana dan masih menggunakan kolom bantu untuk membantu formula VLOOKUP yang ada.
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ] On Behalf Of rey
Sent: Wednesday, November 07, 2012 9:24 AM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] limit kesehatan
Hai master-master...
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
----- Original Message -----
From: Gilang Sedar
To: belajar-excel@
Sent: Wednesday, November 07, 2012 11:44 AM
Subject: RE: [belajar-excel] limit kesehatan
Semoga sesuai dengan pertanyaan Sdr. Rey.
Menggunakan rumus sangat sederhana dan masih menggunakan kolom bantu untuk membantu formula VLOOKUP yang ada.
From: belajar-excel@
Sent: Wednesday, November 07, 2012 9:24 AM
To: belajar-excel@
Subject: [belajar-excel] limit kesehatan
Hai master-master.
mohon di bantu formula yg tepat...
kalo pake manual kurang srek...hehe
tq
Rey
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
PT. BANK ARTHA GRAHA INTERNASIONAL TBK. DISCLAIMER:
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager. This message contains confidential information
and is intended only for the individual named. If you are not the
named addressee you should not disseminate, distribute or copy this
e-mail. Please notify the sender immediately by e-mail if you have
received this e-mail by mistake and delete this e-mail from your
system. If you are not the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on
the contents of this information is strictly prohibited.
Tue Nov 6, 2012 8:28 pm (PST) . Posted by:
"aji mumpung"
pak Dayat,
sebelum saya jawab.. ada yang ingin saya tanyakan dahulu.. biar semuanya
lebih jelas
kalo pinjam istilah bapak presiden, agar semua menjadi Terang Benderang
apakah benar cell L3 menunjukkan kategori gender?
apakah benar cell L4 menunjukkan kategori nama?
apakah benar cell L5 menunjukkan kategori penghasilan?, jika benar apakah
angka yang tercantum di L5 adalah batas minimum penghasilan? atau batas
maksimum penghasilan? atau harus sama persis?
apakah benar cell L6 menunjukkan kategori jumlah yang dibayar?, jika benar
apakah angka yang tercantum di L5 adalah batas minimum jumlah yang dibayar?
atau batas maksimum jumlah yang dibayar? atau harus sama persis?
wassalam,
-aji mumpung-
Pada 7 November 2012 08:23, <dayatshogun46@yahoo.co.id > menulis:
> **
>
>
> Dear teman teman excel
>
> Mohon bantuan rekan-rekan dalam menyelesaikan permasalahan yang saya
> hadapi.
> Saya punya data rekapan karyawan yang datanya hampir ratusan, jika
> menggunakan rumus akan lebih lambat dalam pencarian data mungkin rekan
> rekan bisa bantu cari solusi menggunakan macro.
>
> Data terlampir
>
> Regard's
> Dayat
> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...!
>
>
sebelum saya jawab.. ada yang ingin saya tanyakan dahulu.. biar semuanya
lebih jelas
kalo pinjam istilah bapak presiden, agar semua menjadi Terang Benderang
apakah benar cell L3 menunjukkan kategori gender?
apakah benar cell L4 menunjukkan kategori nama?
apakah benar cell L5 menunjukkan kategori penghasilan?
angka yang tercantum di L5 adalah batas minimum penghasilan? atau batas
maksimum penghasilan? atau harus sama persis?
apakah benar cell L6 menunjukkan kategori jumlah yang dibayar?, jika benar
apakah angka yang tercantum di L5 adalah batas minimum jumlah yang dibayar?
atau batas maksimum jumlah yang dibayar? atau harus sama persis?
wassalam,
-aji mumpung-
Pada 7 November 2012 08:23, <dayatshogun46@
> **
>
>
> Dear teman teman excel
>
> Mohon bantuan rekan-rekan dalam menyelesaikan permasalahan yang saya
> hadapi.
> Saya punya data rekapan karyawan yang datanya hampir ratusan, jika
> menggunakan rumus akan lebih lambat dalam pencarian data mungkin rekan
> rekan bisa bantu cari solusi menggunakan macro.
>
> Data terlampir
>
> Regard's
> Dayat
> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
> Teruuusss...
>
>
Tue Nov 6, 2012 10:33 pm (PST) . Posted by:
"aji mumpung"
berhubung pertanyaan saya belum dijawab oleh pak Dayat, saya coba berikan
solusi sesuai dengan penafsiran saya sendiri saja
script ini di tulis dalam sebuah modul dalam VBE
Option Explicit
' deklarasikan dahulu semua variabel yang akan digunakan
' untuk variable di bawah ini, saya menggunakan tipe Public
' agar variabel tersebut dapat digunakan dalam semua prosedur
' kGender = kriteria gender, letaknya di sheet1 cell L3
' kNama = kriteria nama, letaknya di sheet1 cell L4
' kHasil = kriteria penghasilan, letaknya di sheet1 cell L5
' kBayar = kriteria jumlah yang dibayar, letaknya di sheet1 cell L6
' semua variabel memiliki tipe data Range
' karena nantinya yang akan diambil adalah objectnya yaitu range atau
cell-nya
Public kGender, kNama, kHasil, kBayar As Range
' rGender = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L3
' rNama = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L4
' rHasil = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L5
' rBayar = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L6
' rData = digunakan untuk menyimpan nomor baris dari semua nomor baris di
atas
' dengan ketentuan nomor baris tidak kosong
' tipe data yang digunakan adalah Long agar dapat menampung nilai yang
sangat besar
Public rGender, rNama, rHasil, rBayar, rData As Long
' deklarasikan variabel untuk menyimpan tipe gender dari tabel
' sengaja saya pilih gender karena letak kolomnya adalah yang paling kiri
setelah nomer
' hdGender = header untuk gender di Tabel, letaknya di sheet1 cell B7
' rgGender = range gender dalam tabel, letaknya di sheet1, 1 baris di bawah
header sampai data terakhir
' cGender = setiap cell di dalam rgGender
Public hdGender, rgGender, cGender As Range
Sub RekapData()
' deklarasikan variabel untuk menyimpan lokasi header tabel rekap
Dim hdRekap As Range
' tentukan lokasi header rekap yaitu di sheet1 cell L7
Set hdRekap = Sheets("Sheet1").Range("l7")
' tentukan lokasi header data gender di tabel yang mau direkap
' yaitu di sheet1 cell B7
Set hdGender = Sheets("Sheet1").Range("b7")
' tentukan range gender dalam tabel yang mau direkap
' letaknya 1 baris di bawah hdGender oleh karena itu
' menggunakan hdGender.Offset (1, 0) yang berarti dari hdGender turun 1
baris
' batas akhirnya adalah semua data yang ada di dalam tabel
' karena itu menggunakan hdGender.End(xlDown) yang artinya
' dari hdGender turun ke bawah sampai data terakhir
' kalo menggunakan keyboard setara dengan menekan tombol CTRL panah
bawah
Set rgGender = Range(hdGender.Offset(1, 0), hdGender.End(xlDown))
' kita akan melakukan perulangan atau looping untuk setiap data dalam
tabel
' berdasarkan pengalaman saya, --bisa salah, tapi juga bisa saja benar--
' penggunaan For Next akan berjalan lebih cepat dari pada menggunakan
For To
' karena dala For Next tidak ada proses perhitungan terhadap jumlah
data yang ada
' sedangkan dalam For To harus menghitung dahulu berapa jumlah data
yang ada
For Each cGender In rgGender
' pada awalnya setiap nilai baris akan kita beri nilai Empty
(kosong)
' hal ini akan digunakan dalam proses seleksi nanti untuk
mendapatkan
' nilai rData
rGender = ""
rNama = ""
rHasil = ""
rBayar = ""
' panggil prosedur CekGender = memeriksa apakah kriteria gender
terpenuhi atau tidak
' dalam proses pemanggilan bisa menggunakan Call atau pun tidak
CekGender
' panggil prosedur CekNama = memeriksa apakah keriteria nama
terpenuhi atau tidak
CekNama
' panggil prosedur CekHasil = memeriksa apakah kriteria penghasilan
terpenuhi atau tidak
CekHasil
' panggil prosedur CekBayar = memeriksa apakah kriteria jumlah yang
dibayar terpenuhi atau tidak
CekBayar
' dari hasil 4 prosedur di atas, kita sudah mendapatkan nilai dari
nomor baris
' dalam setiap prosedur tersebut
' jika kriteria tidak sama maka nomor baris "" (kosong/empty)
' jika kriteria kriteria sama maka nomor baris sesuai dengan nomor
baris data yang diuji
' jika kriteria tidak diisi maka nomor baris 0 (nol)
' dari nilai baris tersebut akan kita ambil yang terbesar dengan
syarat nomor baris tidak boleh kosong
' lakukan pengecekan apakah nomor baris tidak berisi data null
string / empty / kosong
If rGender <> "" And rNama <> "" And rHasil <> "" And rBayar <> ""
Then
' jika nomor baris tidak null string, maka ambil nilai
tebesarnya
' karena nilai baris akan berisi 0 (nol) atau angka diatasnya
' nilai tersebut disimpan dalam variabel bernama rdata
rData = Application.WorksheetFunction.Max(rGender, rNama,
rHasil, rBayar)
' cek apakah baris di bawah hdRekap (header tabel rekap) ada
datanya atau tidak
If hdRekap.Offset(1, 0) = "" Then
' jika baris di bawah hdrekap kosong maka turun 1 baris ke
baris kosong tersebut
hdRekap.Offset(1, 0).Select
' beri nilai nomor di samping kirinya dengan nilai 1
(karena ini data pertama)
ActiveCell.Offset(0, -1).Value = 1
' selain itu
Else
' kalo sampai di sini berarti dalam tabel rekap sudah ada
datanya
' dari hdRekap turun ke bawah sampai baris terakhir yang
ada datanya
' untuk itu bisa menggunakan hdRekap.End(xlDown) yang
setara dengan
' menekan tombol CTRL + panah bawah
' setelah itu turun 1 baris lagi ke baris yang kosong
' untuk itu bisa menggunakan .Offset(1, 0).Select
hdRekap.End(xlDown).Offset(1, 0).Select
' setelah itu beri nilai nomor pada 1 kolom di sebelah kiri
' dengan mengambil nilai nomor di atasnya lalu ditambah 1
ActiveCell.Offset(0, -1).Value = ActiveCell.Offset(-1, -1)
+ 1
' akhir dari pengecekan baris kosong dalam tabel rekap
End If
' dari sini kita akan bekerja dengan rujukan adalah cell yang
aktif
' sesuai dengan hasil pengecekan di atas
With ActiveCell
' pada cell yang aktif kita isi dengan gender
' diambil berdasarkan nilai baris dari rData dan kolom 2
(kolom B) :: Cells(rData, 2).Value
.Value = Cells(rData, 2).Value
' 1 kolom di sebelah active cell :: .Offset(, 1)
' diisi dengan nama, diambil dari baris rData kolom 3
(kolom C) :: Cells(rData, 3).Value
.Offset(, 1).Value = Cells(rData, 3).Value
' 4 kolom di sebelah active cell :: .Offset(, 4)
' diisi dengan jumlah penghasilan, diambil dari baris rData
kolom 4 (kolom D) :: Cells(rData, 4).Value
.Offset(, 4).Value = Cells(rData, 4).Value
' 5 kolom di sebelah active cell :: .Offset(, 5)
' diisi dengan jumlah penghasilan, diambil dari baris rData
kolom 8 (kolom H) :: Cells(rData, 8).Value
.Offset(, 5).Value = Cells(rData, 8).Value
' akhir dari penggunaan cell yang aktif
End With
' yang ini adalah akhir dari pemeriksaan nomor baris yang tidak
kosong
End If
' periksa lagi gender berikutnya
Next cGender
End Sub
' prosedur ini digunakan untuk megecek kesesuaian gender dengan kriteria
Sub CekGender()
' tentukan letak kriteria gender
Set kGender = Sheets("Sheet1").Range("l3")
' jika kriteria gender kosong, maka beri nilai barisnya dengan 0 (nol)
If kGender = "" Then
rGender = 0
Exit Sub
End If
' jika kriteria gender tidak kosong maka lakukan pengecekan
' apakah gender sesuai dengan kriteria yang ditentukan
' jika sama maka ambil nilai baris dari cGender
' jika tidak sama maka nilai baris akan "" (null string / empty /
kosong)
If cGender.Value = kGender Then
rGender = cGender.Row
End If
End Sub
' proses pengecekan 3 prosedur di bawah ini sama dengan proses pengecekan
' pada prosedur CekGender
Sub CekNama()
Set kNama = Sheets("Sheet1").Range("l4")
If kNama = "" Then
rNama = 0
Exit Sub
End If
If cGender.Offset(0, 1).Value = kNama Then
rNama = cGender.Row
End If
End Sub
Sub CekHasil()
Set kHasil = Sheets("Sheet1").Range("l5")
If kHasil = "" Then
rHasil = 0
Exit Sub
End If
If cGender.Offset(0, 2).Value = kHasil Then
rHasil = cGender.Row
End If
End Sub
Sub CekBayar()
Set kBayar = Sheets("Sheet1").Range("l6")
If kBayar = "" Then
rBayar = 0
Exit Sub
End If
If cGender.Offset(0, 6).Value = kBayar Then
rHasil = cGender.Row
End If
End Sub
semoga dongeng yang panjang ini membuka wawasan bagi member lain yang ingin
ikut belajar VBA, dengan harapan di kemudian hari bersedia menularkan
ilmunya kepada member yang lain
wassalam,
-aji mumpung-
Pada 7 November 2012 11:28, aji mumpung <pupung1986@gmail.com > menulis:
> pak Dayat,
>
> sebelum saya jawab.. ada yang ingin saya tanyakan dahulu.. biar semuanya
> lebih jelas
> kalo pinjam istilah bapak presiden, agar semua menjadi Terang Benderang
>
> apakah benar cell L3 menunjukkan kategori gender?
> apakah benar cell L4 menunjukkan kategori nama?
> apakah benar cell L5 menunjukkan kategori penghasilan?, jika benar apakah
> angka yang tercantum di L5 adalah batas minimum penghasilan? atau batas
> maksimum penghasilan? atau harus sama persis?
> apakah benar cell L6 menunjukkan kategori jumlah yang dibayar?, jika benar
> apakah angka yang tercantum di L5 adalah batas minimum jumlah yang dibayar?
> atau batas maksimum jumlah yang dibayar? atau harus sama persis?
>
> wassalam,
>
> -aji mumpung-
>
> Pada 7 November 2012 08:23, <dayatshogun46@yahoo.co.id > menulis:
>
> **
>>
>>
>> Dear teman teman excel
>>
>> Mohon bantuan rekan-rekan dalam menyelesaikan permasalahan yang saya
>> hadapi.
>> Saya punya data rekapan karyawan yang datanya hampir ratusan, jika
>> menggunakan rumus akan lebih lambat dalam pencarian data mungkin rekan
>> rekan bisa bantu cari solusi menggunakan macro.
>>
>> Data terlampir
>>
>> Regard's
>> Dayat
>> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
>> Teruuusss...!
>>
>>
>
>
solusi sesuai dengan penafsiran saya sendiri saja
script ini di tulis dalam sebuah modul dalam VBE
Option Explicit
' deklarasikan dahulu semua variabel yang akan digunakan
' untuk variable di bawah ini, saya menggunakan tipe Public
' agar variabel tersebut dapat digunakan dalam semua prosedur
' kGender = kriteria gender, letaknya di sheet1 cell L3
' kNama = kriteria nama, letaknya di sheet1 cell L4
' kHasil = kriteria penghasilan, letaknya di sheet1 cell L5
' kBayar = kriteria jumlah yang dibayar, letaknya di sheet1 cell L6
' semua variabel memiliki tipe data Range
' karena nantinya yang akan diambil adalah objectnya yaitu range atau
cell-nya
Public kGender, kNama, kHasil, kBayar As Range
' rGender = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L3
' rNama = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L4
' rHasil = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L5
' rBayar = digunakan untuk menyimpan nomor baris gender yang sesuai dengan
kriteria di L6
' rData = digunakan untuk menyimpan nomor baris dari semua nomor baris di
atas
' dengan ketentuan nomor baris tidak kosong
' tipe data yang digunakan adalah Long agar dapat menampung nilai yang
sangat besar
Public rGender, rNama, rHasil, rBayar, rData As Long
' deklarasikan variabel untuk menyimpan tipe gender dari tabel
' sengaja saya pilih gender karena letak kolomnya adalah yang paling kiri
setelah nomer
' hdGender = header untuk gender di Tabel, letaknya di sheet1 cell B7
' rgGender = range gender dalam tabel, letaknya di sheet1, 1 baris di bawah
header sampai data terakhir
' cGender = setiap cell di dalam rgGender
Public hdGender, rgGender, cGender As Range
Sub RekapData()
' deklarasikan variabel untuk menyimpan lokasi header tabel rekap
Dim hdRekap As Range
' tentukan lokasi header rekap yaitu di sheet1 cell L7
Set hdRekap = Sheets("Sheet1"
' tentukan lokasi header data gender di tabel yang mau direkap
' yaitu di sheet1 cell B7
Set hdGender = Sheets("Sheet1"
' tentukan range gender dalam tabel yang mau direkap
' letaknya 1 baris di bawah hdGender oleh karena itu
' menggunakan hdGender.Offset (1, 0) yang berarti dari hdGender turun 1
baris
' batas akhirnya adalah semua data yang ada di dalam tabel
' karena itu menggunakan hdGender.End(
' dari hdGender turun ke bawah sampai data terakhir
' kalo menggunakan keyboard setara dengan menekan tombol CTRL panah
bawah
Set rgGender = Range(hdGender.
' kita akan melakukan perulangan atau looping untuk setiap data dalam
tabel
' berdasarkan pengalaman saya, --bisa salah, tapi juga bisa saja benar--
' penggunaan For Next akan berjalan lebih cepat dari pada menggunakan
For To
' karena dala For Next tidak ada proses perhitungan terhadap jumlah
data yang ada
' sedangkan dalam For To harus menghitung dahulu berapa jumlah data
yang ada
For Each cGender In rgGender
' pada awalnya setiap nilai baris akan kita beri nilai Empty
(kosong)
' hal ini akan digunakan dalam proses seleksi nanti untuk
mendapatkan
' nilai rData
rGender = ""
rNama = ""
rHasil = ""
rBayar = ""
' panggil prosedur CekGender = memeriksa apakah kriteria gender
terpenuhi atau tidak
' dalam proses pemanggilan bisa menggunakan Call atau pun tidak
CekGender
' panggil prosedur CekNama = memeriksa apakah keriteria nama
terpenuhi atau tidak
CekNama
' panggil prosedur CekHasil = memeriksa apakah kriteria penghasilan
terpenuhi atau tidak
CekHasil
' panggil prosedur CekBayar = memeriksa apakah kriteria jumlah yang
dibayar terpenuhi atau tidak
CekBayar
' dari hasil 4 prosedur di atas, kita sudah mendapatkan nilai dari
nomor baris
' dalam setiap prosedur tersebut
' jika kriteria tidak sama maka nomor baris "" (kosong/empty)
' jika kriteria kriteria sama maka nomor baris sesuai dengan nomor
baris data yang diuji
' jika kriteria tidak diisi maka nomor baris 0 (nol)
' dari nilai baris tersebut akan kita ambil yang terbesar dengan
syarat nomor baris tidak boleh kosong
' lakukan pengecekan apakah nomor baris tidak berisi data null
string / empty / kosong
If rGender <> "" And rNama <> "" And rHasil <> "" And rBayar <> ""
Then
' jika nomor baris tidak null string, maka ambil nilai
tebesarnya
' karena nilai baris akan berisi 0 (nol) atau angka diatasnya
' nilai tersebut disimpan dalam variabel bernama rdata
rData = Application.
rHasil, rBayar)
' cek apakah baris di bawah hdRekap (header tabel rekap) ada
datanya atau tidak
If hdRekap.Offset(
' jika baris di bawah hdrekap kosong maka turun 1 baris ke
baris kosong tersebut
hdRekap.Offset(
' beri nilai nomor di samping kirinya dengan nilai 1
(karena ini data pertama)
ActiveCell.Offset(
' selain itu
Else
' kalo sampai di sini berarti dalam tabel rekap sudah ada
datanya
' dari hdRekap turun ke bawah sampai baris terakhir yang
ada datanya
' untuk itu bisa menggunakan hdRekap.End(
setara dengan
' menekan tombol CTRL + panah bawah
' setelah itu turun 1 baris lagi ke baris yang kosong
' untuk itu bisa menggunakan .Offset(1, 0).Select
hdRekap.End(
' setelah itu beri nilai nomor pada 1 kolom di sebelah kiri
' dengan mengambil nilai nomor di atasnya lalu ditambah 1
ActiveCell.Offset(
+ 1
' akhir dari pengecekan baris kosong dalam tabel rekap
End If
' dari sini kita akan bekerja dengan rujukan adalah cell yang
aktif
' sesuai dengan hasil pengecekan di atas
With ActiveCell
' pada cell yang aktif kita isi dengan gender
' diambil berdasarkan nilai baris dari rData dan kolom 2
(kolom B) :: Cells(rData, 2).Value
.Value = Cells(rData, 2).Value
' 1 kolom di sebelah active cell :: .Offset(, 1)
' diisi dengan nama, diambil dari baris rData kolom 3
(kolom C) :: Cells(rData, 3).Value
.Offset(, 1).Value = Cells(rData, 3).Value
' 4 kolom di sebelah active cell :: .Offset(, 4)
' diisi dengan jumlah penghasilan, diambil dari baris rData
kolom 4 (kolom D) :: Cells(rData, 4).Value
.Offset(, 4).Value = Cells(rData, 4).Value
' 5 kolom di sebelah active cell :: .Offset(, 5)
' diisi dengan jumlah penghasilan, diambil dari baris rData
kolom 8 (kolom H) :: Cells(rData, 8).Value
.Offset(, 5).Value = Cells(rData, 8).Value
' akhir dari penggunaan cell yang aktif
End With
' yang ini adalah akhir dari pemeriksaan nomor baris yang tidak
kosong
End If
' periksa lagi gender berikutnya
Next cGender
End Sub
' prosedur ini digunakan untuk megecek kesesuaian gender dengan kriteria
Sub CekGender()
' tentukan letak kriteria gender
Set kGender = Sheets("Sheet1"
' jika kriteria gender kosong, maka beri nilai barisnya dengan 0 (nol)
If kGender = "" Then
rGender = 0
Exit Sub
End If
' jika kriteria gender tidak kosong maka lakukan pengecekan
' apakah gender sesuai dengan kriteria yang ditentukan
' jika sama maka ambil nilai baris dari cGender
' jika tidak sama maka nilai baris akan "" (null string / empty /
kosong)
If cGender.Value = kGender Then
rGender = cGender.Row
End If
End Sub
' proses pengecekan 3 prosedur di bawah ini sama dengan proses pengecekan
' pada prosedur CekGender
Sub CekNama()
Set kNama = Sheets("Sheet1"
If kNama = "" Then
rNama = 0
Exit Sub
End If
If cGender.Offset(
rNama = cGender.Row
End If
End Sub
Sub CekHasil()
Set kHasil = Sheets("Sheet1"
If kHasil = "" Then
rHasil = 0
Exit Sub
End If
If cGender.Offset(
rHasil = cGender.Row
End If
End Sub
Sub CekBayar()
Set kBayar = Sheets("Sheet1"
If kBayar = "" Then
rBayar = 0
Exit Sub
End If
If cGender.Offset(
rHasil = cGender.Row
End If
End Sub
semoga dongeng yang panjang ini membuka wawasan bagi member lain yang ingin
ikut belajar VBA, dengan harapan di kemudian hari bersedia menularkan
ilmunya kepada member yang lain
wassalam,
-aji mumpung-
Pada 7 November 2012 11:28, aji mumpung <pupung1986@gmail.
> pak Dayat,
>
> sebelum saya jawab.. ada yang ingin saya tanyakan dahulu.. biar semuanya
> lebih jelas
> kalo pinjam istilah bapak presiden, agar semua menjadi Terang Benderang
>
> apakah benar cell L3 menunjukkan kategori gender?
> apakah benar cell L4 menunjukkan kategori nama?
> apakah benar cell L5 menunjukkan kategori penghasilan?
> angka yang tercantum di L5 adalah batas minimum penghasilan? atau batas
> maksimum penghasilan? atau harus sama persis?
> apakah benar cell L6 menunjukkan kategori jumlah yang dibayar?, jika benar
> apakah angka yang tercantum di L5 adalah batas minimum jumlah yang dibayar?
> atau batas maksimum jumlah yang dibayar? atau harus sama persis?
>
> wassalam,
>
> -aji mumpung-
>
> Pada 7 November 2012 08:23, <dayatshogun46@
>
> **
>>
>>
>> Dear teman teman excel
>>
>> Mohon bantuan rekan-rekan dalam menyelesaikan permasalahan yang saya
>> hadapi.
>> Saya punya data rekapan karyawan yang datanya hampir ratusan, jika
>> menggunakan rumus akan lebih lambat dalam pencarian data mungkin rekan
>> rekan bisa bantu cari solusi menggunakan macro.
>>
>> Data terlampir
>>
>> Regard's
>> Dayat
>> Sent from my BlackBerry� smartphone from Sinyal Bagus XL, Nyambung
>> Teruuusss...
>>
>>
>
>
Tue Nov 6, 2012 10:48 pm (PST) . Posted by:
"IHSAN NURDIN" ihsanmn
YTH
Mohon bantuan rekan rekan milis. Saya punya satu kolom yg berisi nilai. Bagaimana caranya mencari nilai minimum tanpa memperhitungkan nilai 0.
Tk sebelumnya. Salam Excel.
Mohon bantuan rekan rekan milis. Saya punya satu kolom yg berisi nilai. Bagaimana caranya mencari nilai minimum tanpa memperhitungkan nilai 0.
Tk sebelumnya. Salam Excel.
Tue Nov 6, 2012 11:03 pm (PST) . Posted by:
"muh_ferdy@pusri.co.id" muh_f3rdi4n5yah
Coba dengan array formula :
Ketik rumus :
=Min(if("kolom">0, "kolom"))
Diakhiri dengan ctrl + shift + enter..
Sent from pinjaman dari tetangga™☺
-----Original Message-----
From: IHSAN NURDIN <ihsanmn@yahoo.com >
Sender: belajar-excel@yahoogroups.com
Date: Tue, 6 Nov 2012 22:48:49
To: belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] nilai min Tidak termasuk 0
YTH
Mohon bantuan rekan rekan milis. Saya punya satu kolom yg berisi nilai. Bagaimana caranya mencari nilai minimum tanpa memperhitungkan nilai 0.
Tk sebelumnya. Salam Excel.
Ketik rumus :
=Min(if("kolom"
Diakhiri dengan ctrl + shift + enter..
Sent from pinjaman dari tetangga™☺
-----Original Message-----
From: IHSAN NURDIN <ihsanmn@yahoo.
Sender: belajar-excel@
Date: Tue, 6 Nov 2012 22:48:49
To: belajar-excel@
Reply-To: belajar-excel@
Subject: [belajar-excel] nilai min Tidak termasuk 0
YTH
Mohon bantuan rekan rekan milis. Saya punya satu kolom yg berisi nilai. Bagaimana caranya mencari nilai minimum tanpa memperhitungkan nilai 0.
Tk sebelumnya. Salam Excel.
Tue Nov 6, 2012 11:24 pm (PST) . Posted by:
"IHSAN NURDIN" ihsanmn
Ok sip Pak Muh_Perdy, thx banyak dan juga rekan lain.
salam excel
________________________________
From: "muh_ferdy@pusri.co.id " <muh_ferdy@pusri.co.id >
To: belajar-excel@yahoogroups.com
Sent: Wednesday, November 7, 2012 3:03 PM
Subject: Re: [belajar-excel] nilai min Tidak termasuk 0
Coba dengan array formula :
Ketik rumus :
=Min(if("kolom">0, "kolom"))
Diakhiri dengan ctrl + shift + enter..
Sent from pinjaman dari tetangga™☺
________________________________
From: IHSAN NURDIN <ihsanmn@yahoo.com >
Sender: belajar-excel@yahoogroups.com
Date: Tue, 6 Nov 2012 22:48:49 -0800 (PST)
To: belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >
ReplyTo: belajar-excel@yahoogroups.com
Subject: [belajar-excel] nilai min Tidak termasuk 0
YTH
Mohon bantuan rekan rekan milis. Saya punya satu kolom yg berisi nilai. Bagaimana caranya mencari nilai minimum tanpa memperhitungkan nilai 0.
Tk sebelumnya. Salam Excel.
salam excel
____________
From: "muh_ferdy@pusri.
To: belajar-excel@
Sent: Wednesday, November 7, 2012 3:03 PM
Subject: Re: [belajar-excel] nilai min Tidak termasuk 0
Coba dengan array formula :
Ketik rumus :
=Min(if("kolom"
Diakhiri dengan ctrl + shift + enter..
Sent from pinjaman dari tetangga™☺
____________
From: IHSAN NURDIN <ihsanmn@yahoo.
Sender: belajar-excel@
Date: Tue, 6 Nov 2012 22:48:49 -0800 (PST)
To: belajar-excel@
ReplyTo: belajar-excel@
Subject: [belajar-excel] nilai min Tidak termasuk 0
YTH
Mohon bantuan rekan rekan milis. Saya punya satu kolom yg berisi nilai. Bagaimana caranya mencari nilai minimum tanpa memperhitungkan nilai 0.
Tk sebelumnya. Salam Excel.
Wed Nov 7, 2012 12:29 am (PST) . Posted by:
"rodhy hakim" odhyz83_assasaky
Dear Exceler,
Mohon bantuan karena saya masih belum terlalu mengerti untuk penggunaan Formula SUMIFS, dimana data yang diambil berada pada sheet yang berbeda.
Terima kasih atas penjelasannya.
file terlampir.
salam,
Odhy.
Mohon bantuan karena saya masih belum terlalu mengerti untuk penggunaan Formula SUMIFS, dimana data yang diambil berada pada sheet yang berbeda.
Terima kasih atas penjelasannya.
file terlampir.
salam,
Odhy.
Wed Nov 7, 2012 1:19 am (PST) . Posted by:
"hendrik karnadi" hendrikkarnadi
Coba copas function ini pada sel B2 sheet main,
=SUMIF(DATA!$A:$A,main!$A2,DATA!B:B),
kemudian copy ke samping dan ke bawah.
Ga perlu pakai SUMIFS karena susunan kolom main dan Data sama.
Salam,
Hendrik Karnadi
________________________________
From: rodhy hakim <odhyz83_assasaky@yahoo.com >
To: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
Sent: Wednesday, 7 November 2012, 13:26
Subject: [belajar-excel] Tanya SUMIFS
Dear Exceler,
Mohon bantuan karena saya masih belum terlalu mengerti untuk penggunaan Formula SUMIFS, dimana data yang diambil berada pada sheet yang berbeda.
Terima kasih atas penjelasannya.
file terlampir.
salam,
Odhy.
=SUMIF(DATA!
kemudian copy ke samping dan ke bawah.
Ga perlu pakai SUMIFS karena susunan kolom main dan Data sama.
Salam,
Hendrik Karnadi
____________
From: rodhy hakim <odhyz83_assasaky@
To: "belajar-excel@
Sent: Wednesday, 7 November 2012, 13:26
Subject: [belajar-excel] Tanya SUMIFS
Dear Exceler,
Mohon bantuan karena saya masih belum terlalu mengerti untuk penggunaan Formula SUMIFS, dimana data yang diambil berada pada sheet yang berbeda.
Terima kasih atas penjelasannya.
file terlampir.
salam,
Odhy.
Wed Nov 7, 2012 7:36 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Tumben belum ada yang sempet reply thread ini.
File terlampir berisi sebuah folder dengan beberapa file gambar dan sebuah
file Excel berisi VBA.
Thread ini adalah tentang menggambar di userform.
Sebelum membicarakan lebih jauh tentang menggambar di-userform, ada baiknya
dipahami dulu batasan-batasan yang melekat bersama userform dalam VBA.
UserForm adalah sebuah object interface berbasis grafis (GUI). Barang ini
bener-bener enak dilihat oleh user, tapi tidak semua GUI yang tampak
memiliki karakteristik yang sama. Contoh paling dekat adalah GUI dalam VBA
berbeda karakteristiknya dengan GUI dalam VB, padahal sama-sama bahasa
pemrogramannya adalah Visual Basic.
Ada hal yang sama tentang keduanya, yaitu bentuknya sebagai object. Setiap
object selalu memiliki ID alias diberi ID oleh OS ketika dibentuk (di-create).
Proses create disini bukan proses create si aplikasi atau semacamnya,
tetapi ketika si object akan ditampilkan atau digunakan (masuk ke
memorikomputer). ID
ini bermacam-macam. Untuk urusan tampilan, id ini biasa disebut Window
handler atau dikenal dengan hWnd.
Ada beberapa orang diluar sana (entah kalau di dalam sini) yang mengatakan
bahwa UserForm dalam VBA (at least VBA 7 kebawah) bersifat windowless
(mungkin maksudnya bukan sebuah window beneran). Apapun katanya, jika
itu adalah
sebuah tampilan, pasti punya hWnd. Permasalahannya adalah mudah atau
tidaknya untuk didapatkan si nilai id bernama hWnd tersebut.
Pada VB GUI, setiap object control memiliki class sendiri-sendiri, sehingga
hWnd bisa diperoleh berdasar nama class-nya. Pada VBA, beberapa object
control memiliki class yang sama tapi nama child object yang berbeda. Nilai
hWnd itu sendiri kadang tidak serta merta dimasukkan kedalam properti si
object control, maka tidak bisa langsung didapat begitu saja.
Oke... sebelum lebih jauh lagi, pasti ada pertanyaan dalam benak, untuk apa
sih si hWnd itu, sampai segitu pentingnya.
Ilustrasi sederhananya begini... hWnd adalah ID Unique. Dari hWnd itu bisa
didapatkan wujud si benda. Jadi, walau ada banyak benda yang sama, pasti
hWnd nya beda. Jadi tidak akan pernah salah pilih benda yang akan digunakan
dan diproses.
Contoh dalam thread ini, akan menggambar suatu garis dalam sebuah control
object bernama image. Kalau ada banyak image di userform, image mana yang
akan digambari tentulah memerlukan sebuah id yang unique. Untuk si Excelnya
sendiri, bisa tahu seluk beluknya object yang ada dalam dirinya termasuk
dalam userform, karena mereka adalah anak-anaknya si Excel. Lalu bagaimana
jika yang ingin mencari si object adalah tetangga yang tinggalnya beberapa
kilometer dari rumahnya dan belum pernah kenal ?
kenapa juga tetangga nyariin anaknya si excel...
Excel tidak punya kemampuan yang luwes dalam menggambar garis. Nah....
tetangga sebelah yang agak jauh rumahnya itu adalah tukang gambar. Namanya
GDI (Graphics Device Interface). Dia bisa menggambar dengan baik, jadi dia
bisa dikaryakan untuk menggambari salah satu anak excel yang ada dalam
userform. Si GDI ini masuk dalam sebuah klub spesialis yang sering disebut
WinAPI (Windows Application Programming Interfaces). Maka Excel harus
menelepon ke klub tersebut dan minta disambungkan langsung ke tim GDI yang
tukang gambar. Bagian ini bisa dilihat di module bernama modDraw bagian
deklarasi fungsi-fungsi winapi.
Begitu si tetangga masuk, bladalah... anaknya banyak banget dan ada yang
kelasnya sama dan gak mau ngaku dia nomor id-nya berapa. Puyeng kan si
tetangga tukang gambar. Dari cerita ini saja, maka sudah jelas terbatasi
bahwa tidak semua object control dalam userform VBA bisa diproses
macem-macem. Banyak sekali keterbatasannya. Jadi pilihlah dengan bijak
control apa yang ingin digunakan dan bisa untuk apa saja.
Lanjutkan perjalanan...
Akhirnya diputuskan yang akan digambari adalah beberapa anak yang sudah
jelas punya id, sehingga si tetangga bener-bener bisa mengenalinya dan
mengajaknya
untuk digambari. Misal sebuah image *yang sudah berisi* gambar.
Untuk memulai kegiatan menggambar, maka si GDI (tukang gambar) harus
mempersiapkan lingkungan yang kondusif untuk dirinya bekerja. Lingkungan
ini disebut Device Context (DC). Nah si GDI pun memberi id sendiri terhadap
setiap kondisi lingkungan tempatnya bekerja, yang disebut Device Context
Handler (hDC). Ketika dia akan menggambar, dia memberi id ke kanvas
penggambarannya (si image control yang berisi gambar tadi). Dia juga
memerlukan kuas untuk menggambar dan inipun diberi ID olehnya. Jadi, komputer
berisi banyak sekali id... tapi kok ya gak mbulet bingung ya... ya itulah
untungnya bekerja dengan ID.
Itu tadi gambaran dasar untuk bisa menggambar disebuah userform. Namanya
tukang gambar, dia bisa menggambar dengan berbagai cara, dari sambil
berdiri sampai sambil nungging juga bisa. Sekarang, akan pilih cara apa
nih...
Setidaknya cara yang lebih mudah untuk diterima akal masing-masing dulu.
Nah... file terlampir menggunakan cara paling sederhana dari kegiatan
menggambar, yaitu ambil kuas dan lakukan coretan.
Kalau ada salah coret gimana ?
itu dia, menghapus coretan di lokasi yang sewarna (latar warna putih saja)
pasti lebih mudah menghapusnya, yaitu dengan melukis warna putih lagi.
Kalau salah coret di gambar pelangi yang warnanya gak karauan, tentu gak
bisa dilakukan dengan mudah. Karena metode gambarnya adalah yang sederhana,
ambil kuas dan mulai buat coretan.
Untung semua itu dilakukan didalam komputer yang kehidupannya bisa selalu
seakan-akan diulang.
Maka jika akan menghapus sebuah coretan salah, caranya buang si kanvas,
load ulang si kanvas, dan mulai gambar dari nol.
o..o.. kalau sudah ada seribu coretan dan coretan ke-1001 yang salah,
berarti harus gambar baru lagi dari coretan ke-1.
Mau gimana lagi, pilih cara yang sederhana kok. Kuatirnya lupa apa saja
1000 coretan awal sebelum yang salah tadi. Untuk itu, setiap kali melakukan
coretan, disimpanlah cara mencoretnya. Karena coretannya berupa garis, maka
cukup simpan titik awal dan akhirnya.
Itu tadi konsep menggambar sederhana pada userform. Dari sini, maka perlu
sebuah wadah untuk mencatat setiap coretan yang dilakukan. Artinya, coretan
itu ndak bisa di-klik langsung disulap sim salabim hilang, tetapi harus
digambar ulang dari awal.
*So... batasan ini sudah memupuskan keinginan agar klik kanan si garis maka
hilanglah dia,* karena pakai cara sederhana. Kalau pakai cara yang lebih
rumit tentu bisa, tapi apa gunanya kalau gak mudeng. Lebih baik mulai dari
yang sederhana sampai suatu saat nanti bisa memahami yang rumit.
Bagaimana bentuknya, silakan lihat di file terlampir. Asumsi yang digunakan
adalah sudah mampu menyusun proses menulis dan membaca suatu data dari dan
ke suatu tempat lain dalam berbagai bentuk. Karena file terlampir tidak
menyertakan cara mengambil suatu nilai dari suatu cell atau cara menulis
hasil ke suatu cell. Jadi fokus hanya ke masalah gambar. Silakan
dikembangkan.
Yang penting lagi, script yang ada pada file terlampir belum sempat dicoba
dalam berbagai keadaan. Jadi bisa saja muncul error. Nah untuk hal ini,
semoga kita bersama-sama bisa menyempurnakannya bahkan mengembangkannya.
Demikian dongeng selama rehat antar sesinya...
Wassalam,
Kid.
2012/11/6 lapendosol opik <lapendosol@yahoo.com >
> **
>
>
> Dear para master excel,
> Saya punya kendala dengan kerjaan saya, dimana harus menghitung garis2
> antara satu titik ke titik yg lain pada gambar seperti dicontoh. Selama ini
> cara menghitungnya mengandalkan visual saja. Tapi kelemahannya visual, bisa
> saja yang dihitung tidak membentuk garis lurus. Maka dari itu, saya ingin
> bertanya seandainya form input di modifikasi object imagenya dengan memberi
> garis lurus warna merah. Tujuannya agar lebih maximal lagi kerjanya dan
> meminimalisasi kesalahan.
> Berikut saya sertakan contoh filenya, karena filenya lebih dari 250KB maka
> saya upload di boxnet:
> https://www.box.com/s/izfudbk98by3gzb82ztj
>
> 1. Modifikasi image dalam form input, jika meng-klik pada object image
> 2titik, maka terbentuk garis lurus warna merah diantara 2titik tersebut.
> 2. Diberi fungsi undo atau menghapus garis lurus merah yg di klik 2titik
> tadi. Berguna jika terjadi salah penitikan
>
> Mohon bantuannya sebelumnya saya ucapkan terimakasih yg sebesar2nya
> Regard,
>
> Opik
>
>
>
File terlampir berisi sebuah folder dengan beberapa file gambar dan sebuah
file Excel berisi VBA.
Thread ini adalah tentang menggambar di userform.
Sebelum membicarakan lebih jauh tentang menggambar di-userform, ada baiknya
dipahami dulu batasan-batasan yang melekat bersama userform dalam VBA.
UserForm adalah sebuah object interface berbasis grafis (GUI). Barang ini
bener-bener enak dilihat oleh user, tapi tidak semua GUI yang tampak
memiliki karakteristik yang sama. Contoh paling dekat adalah GUI dalam VBA
berbeda karakteristiknya dengan GUI dalam VB, padahal sama-sama bahasa
pemrogramannya adalah Visual Basic.
Ada hal yang sama tentang keduanya, yaitu bentuknya sebagai object. Setiap
object selalu memiliki ID alias diberi ID oleh OS ketika dibentuk (di-create).
Proses create disini bukan proses create si aplikasi atau semacamnya,
tetapi ketika si object akan ditampilkan atau digunakan (masuk ke
memorikomputer)
ini bermacam-macam. Untuk urusan tampilan, id ini biasa disebut Window
handler atau dikenal dengan hWnd.
Ada beberapa orang diluar sana (entah kalau di dalam sini) yang mengatakan
bahwa UserForm dalam VBA (at least VBA 7 kebawah) bersifat windowless
(mungkin maksudnya bukan sebuah window beneran). Apapun katanya, jika
itu adalah
sebuah tampilan, pasti punya hWnd. Permasalahannya adalah mudah atau
tidaknya untuk didapatkan si nilai id bernama hWnd tersebut.
Pada VB GUI, setiap object control memiliki class sendiri-sendiri, sehingga
hWnd bisa diperoleh berdasar nama class-nya. Pada VBA, beberapa object
control memiliki class yang sama tapi nama child object yang berbeda. Nilai
hWnd itu sendiri kadang tidak serta merta dimasukkan kedalam properti si
object control, maka tidak bisa langsung didapat begitu saja.
Oke... sebelum lebih jauh lagi, pasti ada pertanyaan dalam benak, untuk apa
sih si hWnd itu, sampai segitu pentingnya.
Ilustrasi sederhananya begini... hWnd adalah ID Unique. Dari hWnd itu bisa
didapatkan wujud si benda. Jadi, walau ada banyak benda yang sama, pasti
hWnd nya beda. Jadi tidak akan pernah salah pilih benda yang akan digunakan
dan diproses.
Contoh dalam thread ini, akan menggambar suatu garis dalam sebuah control
object bernama image. Kalau ada banyak image di userform, image mana yang
akan digambari tentulah memerlukan sebuah id yang unique. Untuk si Excelnya
sendiri, bisa tahu seluk beluknya object yang ada dalam dirinya termasuk
dalam userform, karena mereka adalah anak-anaknya si Excel. Lalu bagaimana
jika yang ingin mencari si object adalah tetangga yang tinggalnya beberapa
kilometer dari rumahnya dan belum pernah kenal ?
kenapa juga tetangga nyariin anaknya si excel...
Excel tidak punya kemampuan yang luwes dalam menggambar garis. Nah....
tetangga sebelah yang agak jauh rumahnya itu adalah tukang gambar. Namanya
GDI (Graphics Device Interface). Dia bisa menggambar dengan baik, jadi dia
bisa dikaryakan untuk menggambari salah satu anak excel yang ada dalam
userform. Si GDI ini masuk dalam sebuah klub spesialis yang sering disebut
WinAPI (Windows Application Programming Interfaces). Maka Excel harus
menelepon ke klub tersebut dan minta disambungkan langsung ke tim GDI yang
tukang gambar. Bagian ini bisa dilihat di module bernama modDraw bagian
deklarasi fungsi-fungsi winapi.
Begitu si tetangga masuk, bladalah... anaknya banyak banget dan ada yang
kelasnya sama dan gak mau ngaku dia nomor id-nya berapa. Puyeng kan si
tetangga tukang gambar. Dari cerita ini saja, maka sudah jelas terbatasi
bahwa tidak semua object control dalam userform VBA bisa diproses
macem-macem. Banyak sekali keterbatasannya. Jadi pilihlah dengan bijak
control apa yang ingin digunakan dan bisa untuk apa saja.
Lanjutkan perjalanan..
Akhirnya diputuskan yang akan digambari adalah beberapa anak yang sudah
jelas punya id, sehingga si tetangga bener-bener bisa mengenalinya dan
mengajaknya
untuk digambari. Misal sebuah image *yang sudah berisi* gambar.
Untuk memulai kegiatan menggambar, maka si GDI (tukang gambar) harus
mempersiapkan lingkungan yang kondusif untuk dirinya bekerja. Lingkungan
ini disebut Device Context (DC). Nah si GDI pun memberi id sendiri terhadap
setiap kondisi lingkungan tempatnya bekerja, yang disebut Device Context
Handler (hDC). Ketika dia akan menggambar, dia memberi id ke kanvas
penggambarannya (si image control yang berisi gambar tadi). Dia juga
memerlukan kuas untuk menggambar dan inipun diberi ID olehnya. Jadi, komputer
berisi banyak sekali id... tapi kok ya gak mbulet bingung ya... ya itulah
untungnya bekerja dengan ID.
Itu tadi gambaran dasar untuk bisa menggambar disebuah userform. Namanya
tukang gambar, dia bisa menggambar dengan berbagai cara, dari sambil
berdiri sampai sambil nungging juga bisa. Sekarang, akan pilih cara apa
nih...
Setidaknya cara yang lebih mudah untuk diterima akal masing-masing dulu.
Nah... file terlampir menggunakan cara paling sederhana dari kegiatan
menggambar, yaitu ambil kuas dan lakukan coretan.
Kalau ada salah coret gimana ?
itu dia, menghapus coretan di lokasi yang sewarna (latar warna putih saja)
pasti lebih mudah menghapusnya, yaitu dengan melukis warna putih lagi.
Kalau salah coret di gambar pelangi yang warnanya gak karauan, tentu gak
bisa dilakukan dengan mudah. Karena metode gambarnya adalah yang sederhana,
ambil kuas dan mulai buat coretan.
Untung semua itu dilakukan didalam komputer yang kehidupannya bisa selalu
seakan-akan diulang.
Maka jika akan menghapus sebuah coretan salah, caranya buang si kanvas,
load ulang si kanvas, dan mulai gambar dari nol.
o..o.. kalau sudah ada seribu coretan dan coretan ke-1001 yang salah,
berarti harus gambar baru lagi dari coretan ke-1.
Mau gimana lagi, pilih cara yang sederhana kok. Kuatirnya lupa apa saja
1000 coretan awal sebelum yang salah tadi. Untuk itu, setiap kali melakukan
coretan, disimpanlah cara mencoretnya. Karena coretannya berupa garis, maka
cukup simpan titik awal dan akhirnya.
Itu tadi konsep menggambar sederhana pada userform. Dari sini, maka perlu
sebuah wadah untuk mencatat setiap coretan yang dilakukan. Artinya, coretan
itu ndak bisa di-klik langsung disulap sim salabim hilang, tetapi harus
digambar ulang dari awal.
*So... batasan ini sudah memupuskan keinginan agar klik kanan si garis maka
hilanglah dia,* karena pakai cara sederhana. Kalau pakai cara yang lebih
rumit tentu bisa, tapi apa gunanya kalau gak mudeng. Lebih baik mulai dari
yang sederhana sampai suatu saat nanti bisa memahami yang rumit.
Bagaimana bentuknya, silakan lihat di file terlampir. Asumsi yang digunakan
adalah sudah mampu menyusun proses menulis dan membaca suatu data dari dan
ke suatu tempat lain dalam berbagai bentuk. Karena file terlampir tidak
menyertakan cara mengambil suatu nilai dari suatu cell atau cara menulis
hasil ke suatu cell. Jadi fokus hanya ke masalah gambar. Silakan
dikembangkan.
Yang penting lagi, script yang ada pada file terlampir belum sempat dicoba
dalam berbagai keadaan. Jadi bisa saja muncul error. Nah untuk hal ini,
semoga kita bersama-sama bisa menyempurnakannya bahkan mengembangkannya.
Demikian dongeng selama rehat antar sesinya...
Wassalam,
Kid.
2012/11/6 lapendosol opik <lapendosol@yahoo.
> **
>
>
> Dear para master excel,
> Saya punya kendala dengan kerjaan saya, dimana harus menghitung garis2
> antara satu titik ke titik yg lain pada gambar seperti dicontoh. Selama ini
> cara menghitungnya mengandalkan visual saja. Tapi kelemahannya visual, bisa
> saja yang dihitung tidak membentuk garis lurus. Maka dari itu, saya ingin
> bertanya seandainya form input di modifikasi object imagenya dengan memberi
> garis lurus warna merah. Tujuannya agar lebih maximal lagi kerjanya dan
> meminimalisasi kesalahan.
> Berikut saya sertakan contoh filenya, karena filenya lebih dari 250KB maka
> saya upload di boxnet:
> https://www.
>
> 1. Modifikasi image dalam form input, jika meng-klik pada object image
> 2titik, maka terbentuk garis lurus warna merah diantara 2titik tersebut.
> 2. Diberi fungsi undo atau menghapus garis lurus merah yg di klik 2titik
> tadi. Berguna jika terjadi salah penitikan
>
> Mohon bantuannya sebelumnya saya ucapkan terimakasih yg sebesar2nya
> Regard,
>
> Opik
>
>
>
GROUP FOOTER MESSAGE
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com
berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
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