15 Messages
Digest #4150
1b
Re: cari data penjualan transaksi sebelumnya... formula apa yang kir by "Mr. Kid" nmkid.family@ymail.com
2b
Re: Interpolasi kuadratik untuk melihat forecast ke depan [1 Attachm by "Mr. Kid" nmkid.family@ymail.com
Messages
Tue Apr 4, 2017 8:58 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Agung,
--- Mods ---
Dimohon dengan sangat :
1. Judul email yang singkat dan berupa pokok utama kasus yang disampaikan
2. Kalimat penjelasan diletakkan di body email.
3. [bila perlu] sertakan lampiran
Jadi, status member Anda sekarang diubah menjadi moderated lagi ya...
---------------
Array formula untuk kasus Anda :
=INDEX($B3:$H3,LARGE(($B3:$H3<>0)*$B$2:$H$2,2))
Regards,
Kid
On Wed, Apr 5, 2017 at 9:33 AM, agung aldhino d_nozz@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> dear all,
>
>
>
--- Mods ---
Dimohon dengan sangat :
1. Judul email yang singkat dan berupa pokok utama kasus yang disampaikan
2. Kalimat penjelasan diletakkan di body email.
3. [bila perlu] sertakan lampiran
Jadi, status member Anda sekarang diubah menjadi moderated lagi ya...
---------------
Array formula untuk kasus Anda :
=INDEX($B3:$H3,LARGE(($B3:$H3<>0)*$B$2:$H$2,2))
Regards,
Kid
On Wed, Apr 5, 2017 at 9:33 AM, agung aldhino d_nozz@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> dear all,
>
>
>
Tue Apr 4, 2017 7:38 pm (PDT) . Posted by:
"Tio Adi Bayu Adjie"
Alhamdulillah, sudah bisa.
Setelah saya masukkan ke soal yang sesungguhnya di soal sebelumnya, yaitu persamaan kuadratik dengan x di luar range yang diketahui, tapi kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah seharusnya jika x membesar maka y mengecil ? File terlampir. Saya sudah menghitung nilai a,b dan c di persamaan y=ax^2+bx+c
Terima kasih, semoga Allah SWT membalas kebaikan Mr. Kid dan teman-teman. Amiin.
Salam,
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Tuesday, April 04, 2017 12:18 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Bukankah sudah ada penjelasannya di kanan formula ?
-> array formula di blok array cells 1 baris x 3 kolom [B12:D12] berbunyi : =LINEST(C3:C7,B3:B7^{1,2},TRUE,FALSE)
> yang biru : berarti formula nanti di enter dengan CTRL SHIFT ENTER
> yang di latar kuning : berarti formula di tulis langsung ketika terblok 1 baris x 3 kolom
Regards,
Kid
2017-04-04 11:42 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam,
Mr. Kid, bagaimana menulis rumus array sehingga dengan rumus yang sama, tapi hasilnya beda ? Lebih jelasnya di file terlampir.
Terima Kasih.
Wassalam.
From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>]
Sent: Friday, March 31, 2017 5:22 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Interpolasi maupun ekstrapolasi pada dasarnya adalah mencari persamaan matematika yang mendekati pola yang dibentuk oleh nilai-nilai data.
Persamaan matematika tersebut bisa berpangkat 1 (linear yang berarti berupa persamaan linear dan membentuk garis linear), berpangkat 2 (kuadrat), berpangkat 3 dan sebagainya.
Formula umumnya begini : (semakin banyak record data yang bersih akan semakin baik)
=SumProduct( Linest( data_nilai_y , data_nilai_x^{array pangkat dari 1 sampai tertinggi} ,TRUE,FALSE) * nilai_x_diketahui^{ array pangkat dari tertinggi sampai 0 } )
Contoh : data_nilai_y di B1:B5, data_nilai_x di A1:A5, data di A1:B5 jika dibuat xy scatter chart menampilkan pola kuadrat,
mencari interpolasi atau ekstrapolasi dari nilai x sebesar 7
*** karena pola kuadrat, maka pangkatnya adalah 2.
{array pangkat dari 1 sampai tertinggi} akan berbentuk { 1 , 2 }
{ array pangkat dari tertinggi sampai 0 } akan berbentuk { 2 , 1 , 0 }
*** nilai_x_diketahui adalah 7
*** Formula : (misal hasilnya di letakkan di cells C9)
=SumProduct( Linest( B1:B5 , A1:A5 ^ { 1 , 2 } , TRUE , FALSE ) * 7 ^ { 2 , 1 , 0 } )
*** Penjelasan lebih detil bisa dilihat dalam file yang ada disini<https://app.box.com/s/njx4bbxr3ryw4tvp8z8a5xme8h2vo934>.
Regards,
Kid
2017-03-31 15:06 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam BeExceller,
Saya sudah punya formula untuk melihat forecast kedepan dengan melihat 2 nilai yang ada.
Permasalahannya, diluar dari nilai sumber yang ada, ternyata hasilnya error.
Adakah formula untuk melihat forecast kedepan ?
Saya buat dengan formula Lagrange, ternyata sangat sulit (complicated).
File terlampir untuk lebih jelasnya.
Mohon pencerahannya.
Terima kasih.
--- Mod ---
File lampiran yang melebihi 250KB dilepas dari email. Silakan melampirkan ulang file yang lebih sesuai peraturan milis, yaitu maksimal 250KB dengan cara me-reply email ini.
-------------
Setelah saya masukkan ke soal yang sesungguhnya di soal sebelumnya, yaitu persamaan kuadratik dengan x di luar range yang diketahui, tapi kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah seharusnya jika x membesar maka y mengecil ? File terlampir. Saya sudah menghitung nilai a,b dan c di persamaan y=ax^2+bx+c
Terima kasih, semoga Allah SWT membalas kebaikan Mr. Kid dan teman-teman. Amiin.
Salam,
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Tuesday, April 04, 2017 12:18 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Bukankah sudah ada penjelasannya di kanan formula ?
-> array formula di blok array cells 1 baris x 3 kolom [B12:D12] berbunyi : =LINEST(C3:C7,B3:B7^{1,2},TRUE,FALSE)
> yang biru : berarti formula nanti di enter dengan CTRL SHIFT ENTER
> yang di latar kuning : berarti formula di tulis langsung ketika terblok 1 baris x 3 kolom
Regards,
Kid
2017-04-04 11:42 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam,
Mr. Kid, bagaimana menulis rumus array sehingga dengan rumus yang sama, tapi hasilnya beda ? Lebih jelasnya di file terlampir.
Terima Kasih.
Wassalam.
From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>]
Sent: Friday, March 31, 2017 5:22 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Interpolasi maupun ekstrapolasi pada dasarnya adalah mencari persamaan matematika yang mendekati pola yang dibentuk oleh nilai-nilai data.
Persamaan matematika tersebut bisa berpangkat 1 (linear yang berarti berupa persamaan linear dan membentuk garis linear), berpangkat 2 (kuadrat), berpangkat 3 dan sebagainya.
Formula umumnya begini : (semakin banyak record data yang bersih akan semakin baik)
=SumProduct( Linest( data_nilai_y , data_nilai_x^{array pangkat dari 1 sampai tertinggi} ,TRUE,FALSE) * nilai_x_diketahui^{ array pangkat dari tertinggi sampai 0 } )
Contoh : data_nilai_y di B1:B5, data_nilai_x di A1:A5, data di A1:B5 jika dibuat xy scatter chart menampilkan pola kuadrat,
mencari interpolasi atau ekstrapolasi dari nilai x sebesar 7
*** karena pola kuadrat, maka pangkatnya adalah 2.
{array pangkat dari 1 sampai tertinggi} akan berbentuk { 1 , 2 }
{ array pangkat dari tertinggi sampai 0 } akan berbentuk { 2 , 1 , 0 }
*** nilai_x_diketahui adalah 7
*** Formula : (misal hasilnya di letakkan di cells C9)
=SumProduct( Linest( B1:B5 , A1:A5 ^ { 1 , 2 } , TRUE , FALSE ) * 7 ^ { 2 , 1 , 0 } )
*** Penjelasan lebih detil bisa dilihat dalam file yang ada disini<https://app.box.com/s/njx4bbxr3ryw4tvp8z8a5xme8h2vo934>.
Regards,
Kid
2017-03-31 15:06 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam BeExceller,
Saya sudah punya formula untuk melihat forecast kedepan dengan melihat 2 nilai yang ada.
Permasalahannya, diluar dari nilai sumber yang ada, ternyata hasilnya error.
Adakah formula untuk melihat forecast kedepan ?
Saya buat dengan formula Lagrange, ternyata sangat sulit (complicated)
File terlampir untuk lebih jelasnya.
Mohon pencerahannya.
Terima kasih.
--- Mod ---
File lampiran yang melebihi 250KB dilepas dari email. Silakan melampirkan ulang file yang lebih sesuai peraturan milis, yaitu maksimal 250KB dengan cara me-reply email ini.
------------
Tue Apr 4, 2017 8:52 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Tio,
Anda salah memilih regresi. Cari tahu dulu apakah benar regresi yang sesuai
dengan sistem Anda adalah kuadratik.
Dalam regresi, Anda harus mengetahui karakteristik sistem yang akan
diregresi datanya.
Jadi, urutannya :
1. tahu sistemnya apa
2. sistemnya memiliki karakteristik seperti apa
3. punya data dari sistem tersebut
4. membuat regresi yang sesuai karakteristik sistem
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun
extrapolasi
Contoh :
1. tahu sistemnya apa
> Ada pipa dialiri air yang diujungnya diberi kran.
2. sistemnya memiliki karakteristik seperti apa
> Kalau kran dibuka kecil, air yang ngucur kecil
> Kalau kran dibuka bertahap menjadi semakin besar, air yang ngucur
semakin besar
> berarti, bukaan kran naik, yang ngucur juga naik
3. punya data dari sistem tersebut
> dilakukan pengambilan data dan didapat :
kran dibuka 0 -> air ngucur 0 liter per detik (debit)
kran dibuka 1/4 -> air ngucur 25 liter per detik
kran dibuka 3/4 -> air ngucur 75 liter per detik
4. membuat regresi yang sesuai karakteristik sistem
> dibuat grafiknya, dibuat trendlinenya, dipilih jenis trendline yang
sesuai sistemnya
> didapatlah trendline linear
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
> karena trendline nya yang sesuai sistem adalah linear, maka bentuk
persamaan umum linear adalah y=mx+c
> bisa pakai grafik di Excel lalu tampilkan persamaan regresinya
> menggunakan fungsi Linest untuk mendapatkan persamaan linear,
sehingga di dapat nilai m dan c
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun
extrapolasi
> dari persamaan linear yang didapat dari nomor 5, maka bisa melakukan
kalkulasi air yang ngucur untuk bukaan kran :
a. bukaan 1/2 (karena ada diantara nilai min dan max data yang
pernah didapat, maka sering disebut interpolasi)
b. bukaan 1 (karena ada diluar rentang min dan max data yang
pernah didapat, maka sering disebut ekstrapolasi)
> berhubung persamaan sistemnya adalah linear, maka interpolasinya
adalah interpolasi linear dan ektrapolasinya adalah ekstrapolasi linear
Nah...
Sebaiknya Anda melakukan hal-hal tersebut di atas dulu, supaya tahu regresi
yang cocok untuk sistem Anda tersebut yang seperti apa.
Jadi, tidak akan muncul kalimat ini :
kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah
seharusnya jika x membesar maka y mengecil ?
Jadi,
Kalau sudah tahu regresi yang sesuai dengan sistem Anda itu apa, barulah
ditanyakan ke milis lagi ya...
Regards,
Kid
2017-04-04 15:55 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Alhamdulillah, sudah bisa.
>
> Setelah saya masukkan ke soal yang sesungguhnya di soal sebelumnya, yaitu
> persamaan kuadratik dengan x di luar range yang diketahui, tapi kenapa
> hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah
> seharusnya jika x membesar maka y mengecil ? File terlampir. Saya sudah
> menghitung nilai a,b dan c di persamaan y=ax^2+bx+c
>
>
>
> Terima kasih, semoga Allah SWT membalas kebaikan Mr. Kid dan teman-teman.
> Amiin.
>
>
>
> Salam,
>
>
>
> *From:* belajar-excel@yahoogroups.com [mailto:belajar-excel@
> yahoogroups.com]
> *Sent:* Tuesday, April 04, 2017 12:18 PM
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] Interpolasi kuadratik untuk melihat
> forecast ke depan
>
>
>
>
>
> Hai Tio,
>
> Bukankah sudah ada penjelasannya di kanan formula ?
>
> -> *array formula* *di blok array cells 1 baris x 3 kolom* [B12:D12]
> berbunyi : =LINEST(C3:C7,B3:B7^{1,2},TRUE,FALSE)
>
> > yang biru : berarti formula nanti di enter dengan CTRL SHIFT ENTER
>
> > yang di latar kuning : berarti formula di tulis langsung ketika terblok
> 1 baris x 3 kolom
>
> Regards,
>
> Kid
>
>
>
>
>
> 2017-04-04 11:42 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
>
>
> Salam,
>
> Mr. Kid, bagaimana menulis rumus array sehingga dengan rumus yang sama,
> tapi hasilnya beda ? Lebih jelasnya di file terlampir.
>
>
>
> Terima Kasih.
>
> Wassalam.
>
>
>
> *From:* belajar-excel@yahoogroups.com [mailto:belajar-excel@
> yahoogroups.com]
> *Sent:* Friday, March 31, 2017 5:22 PM
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] Interpolasi kuadratik untuk melihat
> forecast ke depan
>
>
>
>
>
> Hai Tio,
>
> Interpolasi maupun ekstrapolasi pada dasarnya adalah mencari persamaan
> matematika yang mendekati pola yang dibentuk oleh nilai-nilai data.
>
> Persamaan matematika tersebut bisa berpangkat 1 (linear yang berarti
> berupa persamaan linear dan membentuk garis linear), berpangkat 2
> (kuadrat), berpangkat 3 dan sebagainya.
>
> Formula umumnya begini : (semakin banyak record data yang bersih akan
> semakin baik)
>
> =SumProduct( Linest( data_nilai_y , data_nilai_x^{array pangkat dari 1
> sampai tertinggi} ,TRUE,FALSE) * nilai_x_diketahui^{ array pangkat dari
> tertinggi sampai 0 } )
>
>
>
> Contoh : data_nilai_y di B1:B5, data_nilai_x di A1:A5, *data di A1:B5
> jika dibuat xy scatter chart menampilkan pola kuadrat*,
> mencari interpolasi atau ekstrapolasi dari nilai x sebesar
> *7*
>
> *** karena pola kuadrat, maka pangkatnya adalah 2.
> {array pangkat dari 1 sampai tertinggi} akan berbentuk { 1 , 2 }
> { array pangkat dari tertinggi sampai 0 } akan berbentuk { 2 , 1 ,
> 0 }
> *** nilai_x_diketahui adalah *7*
>
> *** Formula : (misal hasilnya di letakkan di cells C9)
>
> =SumProduct( Linest( B1:B5 , A1:A5 ^ { 1 , 2 } , TRUE , FALSE ) *
> *7* ^ { 2 , 1 , 0 } )
>
> *** Penjelasan lebih detil bisa dilihat dalam file yang ada disini
> <https://app.box.com/s/njx4bbxr3ryw4tvp8z8a5xme8h2vo934>.
>
>
>
>
>
> Regards,
>
> Kid
>
>
>
>
>
> 2017-03-31 15:06 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Salam BeExceller,
>
> Saya sudah punya formula untuk melihat forecast kedepan dengan melihat 2
> nilai yang ada.
>
> Permasalahannya, diluar dari nilai sumber yang ada, ternyata hasilnya
> error.
>
> Adakah formula untuk melihat forecast kedepan ?
>
> Saya buat dengan formula Lagrange, ternyata sangat sulit (complicated).
>
> File terlampir untuk lebih jelasnya.
>
>
>
> Mohon pencerahannya.
>
>
>
> Terima kasih.
>
>
>
> --- Mod ---
>
> File lampiran yang melebihi 250KB dilepas dari email. Silakan melampirkan
> ulang file yang lebih sesuai peraturan milis, yaitu maksimal 250KB dengan
> cara me-reply email ini.
>
> -------------
>
>
>
>
>
>
>
Anda salah memilih regresi. Cari tahu dulu apakah benar regresi yang sesuai
dengan sistem Anda adalah kuadratik.
Dalam regresi, Anda harus mengetahui karakteristik sistem yang akan
diregresi datanya.
Jadi, urutannya :
1. tahu sistemnya apa
2. sistemnya memiliki karakteristik seperti apa
3. punya data dari sistem tersebut
4. membuat regresi yang sesuai karakteristik sistem
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun
extrapolasi
Contoh :
1. tahu sistemnya apa
> Ada pipa dialiri air yang diujungnya diberi kran.
2. sistemnya memiliki karakteristik seperti apa
> Kalau kran dibuka kecil, air yang ngucur kecil
> Kalau kran dibuka bertahap menjadi semakin besar, air yang ngucur
semakin besar
> berarti, bukaan kran naik, yang ngucur juga naik
3. punya data dari sistem tersebut
> dilakukan pengambilan data dan didapat :
kran dibuka 0 -> air ngucur 0 liter per detik (debit)
kran dibuka 1/4 -> air ngucur 25 liter per detik
kran dibuka 3/4 -> air ngucur 75 liter per detik
4. membuat regresi yang sesuai karakteristik sistem
> dibuat grafiknya, dibuat trendlinenya, dipilih jenis trendline yang
sesuai sistemnya
> didapatlah trendline linear
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
> karena trendline nya yang sesuai sistem adalah linear, maka bentuk
persamaan umum linear adalah y=mx+c
> bisa pakai grafik di Excel lalu tampilkan persamaan regresinya
> menggunakan fungsi Linest untuk mendapatkan persamaan linear,
sehingga di dapat nilai m dan c
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun
extrapolasi
> dari persamaan linear yang didapat dari nomor 5, maka bisa melakukan
kalkulasi air yang ngucur untuk bukaan kran :
a. bukaan 1/2 (karena ada diantara nilai min dan max data yang
pernah didapat, maka sering disebut interpolasi)
b. bukaan 1 (karena ada diluar rentang min dan max data yang
pernah didapat, maka sering disebut ekstrapolasi)
> berhubung persamaan sistemnya adalah linear, maka interpolasinya
adalah interpolasi linear dan ektrapolasinya adalah ekstrapolasi linear
Nah...
Sebaiknya Anda melakukan hal-hal tersebut di atas dulu, supaya tahu regresi
yang cocok untuk sistem Anda tersebut yang seperti apa.
Jadi, tidak akan muncul kalimat ini :
kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah
seharusnya jika x membesar maka y mengecil ?
Jadi,
Kalau sudah tahu regresi yang sesuai dengan sistem Anda itu apa, barulah
ditanyakan ke milis lagi ya...
Regards,
Kid
2017-04-04 15:55 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Alhamdulillah, sudah bisa.
>
> Setelah saya masukkan ke soal yang sesungguhnya di soal sebelumnya, yaitu
> persamaan kuadratik dengan x di luar range yang diketahui, tapi kenapa
> hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah
> seharusnya jika x membesar maka y mengecil ? File terlampir. Saya sudah
> menghitung nilai a,b dan c di persamaan y=ax^2+bx+c
>
>
>
> Terima kasih, semoga Allah SWT membalas kebaikan Mr. Kid dan teman-teman.
> Amiin.
>
>
>
> Salam,
>
>
>
> *From:* belajar-excel@yahoogroups.com [mailto:belajar-excel@
> yahoogroups.com]
> *Sent:* Tuesday, April 04, 2017 12:18 PM
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] Interpolasi kuadratik untuk melihat
> forecast ke depan
>
>
>
>
>
> Hai Tio,
>
> Bukankah sudah ada penjelasannya di kanan formula ?
>
> -> *array formula* *di blok array cells 1 baris x 3 kolom* [B12:D12]
> berbunyi : =LINEST(C3:C7,B3:B7^{1,2},TRUE,FALSE)
>
> > yang biru : berarti formula nanti di enter dengan CTRL SHIFT ENTER
>
> > yang di latar kuning : berarti formula di tulis langsung ketika terblok
> 1 baris x 3 kolom
>
> Regards,
>
> Kid
>
>
>
>
>
> 2017-04-04 11:42 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
>
>
> Salam,
>
> Mr. Kid, bagaimana menulis rumus array sehingga dengan rumus yang sama,
> tapi hasilnya beda ? Lebih jelasnya di file terlampir.
>
>
>
> Terima Kasih.
>
> Wassalam.
>
>
>
> *From:* belajar-excel@yahoogroups.com [mailto:belajar-excel@
> yahoogroups.com]
> *Sent:* Friday, March 31, 2017 5:22 PM
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] Interpolasi kuadratik untuk melihat
> forecast ke depan
>
>
>
>
>
> Hai Tio,
>
> Interpolasi maupun ekstrapolasi pada dasarnya adalah mencari persamaan
> matematika yang mendekati pola yang dibentuk oleh nilai-nilai data.
>
> Persamaan matematika tersebut bisa berpangkat 1 (linear yang berarti
> berupa persamaan linear dan membentuk garis linear), berpangkat 2
> (kuadrat), berpangkat 3 dan sebagainya.
>
> Formula umumnya begini : (semakin banyak record data yang bersih akan
> semakin baik)
>
> =SumProduct( Linest( data_nilai_y , data_nilai_x^{array pangkat dari 1
> sampai tertinggi} ,TRUE,FALSE) * nilai_x_diketahui^{ array pangkat dari
> tertinggi sampai 0 } )
>
>
>
> Contoh : data_nilai_y di B1:B5, data_nilai_x di A1:A5, *data di A1:B5
> jika dibuat xy scatter chart menampilkan pola kuadrat*,
> mencari interpolasi atau ekstrapolasi dari nilai x sebesar
> *7*
>
> *** karena pola kuadrat, maka pangkatnya adalah 2.
> {array pangkat dari 1 sampai tertinggi} akan berbentuk { 1 , 2 }
> { array pangkat dari tertinggi sampai 0 } akan berbentuk { 2 , 1 ,
> 0 }
> *** nilai_x_diketahui adalah *7*
>
> *** Formula : (misal hasilnya di letakkan di cells C9)
>
> =SumProduct( Linest( B1:B5 , A1:A5 ^ { 1 , 2 } , TRUE , FALSE ) *
> *7* ^ { 2 , 1 , 0 } )
>
> *** Penjelasan lebih detil bisa dilihat dalam file yang ada disini
> <https://app.box.com/s/njx4bbxr3ryw4tvp8z8a5xme8h2vo934>.
>
>
>
>
>
> Regards,
>
> Kid
>
>
>
>
>
> 2017-03-31 15:06 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Salam BeExceller,
>
> Saya sudah punya formula untuk melihat forecast kedepan dengan melihat 2
> nilai yang ada.
>
> Permasalahannya, diluar dari nilai sumber yang ada, ternyata hasilnya
> error.
>
> Adakah formula untuk melihat forecast kedepan ?
>
> Saya buat dengan formula Lagrange, ternyata sangat sulit (complicated)
>
> File terlampir untuk lebih jelasnya.
>
>
>
> Mohon pencerahannya.
>
>
>
> Terima kasih.
>
>
>
> --- Mod ---
>
> File lampiran yang melebihi 250KB dilepas dari email. Silakan melampirkan
> ulang file yang lebih sesuai peraturan milis, yaitu maksimal 250KB dengan
> cara me-reply email ini.
>
> ------------
>
>
>
>
>
>
>
Tue Apr 4, 2017 8:59 pm (PDT) . Posted by:
"Tio Adi Bayu Adjie"
Terima Kasih Mr.Kid atas jawabannya yang panjang lebar. Semoga Allah SWT membalas kebaikan Mr. Kid dengan pahala yang berlipat ganda.
Ok, nanti saya cari tahu dulu, Mr. Kid. Kalau mentok, nanti ditanyakan lagi ke milis.
Terima kasih dan wassalam.
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Wednesday, April 05, 2017 10:52 AM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Anda salah memilih regresi. Cari tahu dulu apakah benar regresi yang sesuai dengan sistem Anda adalah kuadratik.
Dalam regresi, Anda harus mengetahui karakteristik sistem yang akan diregresi datanya.
Jadi, urutannya :
1. tahu sistemnya apa
2. sistemnya memiliki karakteristik seperti apa
3. punya data dari sistem tersebut
4. membuat regresi yang sesuai karakteristik sistem
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun extrapolasi
Contoh :
1. tahu sistemnya apa
> Ada pipa dialiri air yang diujungnya diberi kran.
2. sistemnya memiliki karakteristik seperti apa
> Kalau kran dibuka kecil, air yang ngucur kecil
> Kalau kran dibuka bertahap menjadi semakin besar, air yang ngucur semakin besar
> berarti, bukaan kran naik, yang ngucur juga naik
3. punya data dari sistem tersebut
> dilakukan pengambilan data dan didapat :
kran dibuka 0 -> air ngucur 0 liter per detik (debit)
kran dibuka 1/4 -> air ngucur 25 liter per detik
kran dibuka 3/4 -> air ngucur 75 liter per detik
4. membuat regresi yang sesuai karakteristik sistem
> dibuat grafiknya, dibuat trendlinenya, dipilih jenis trendline yang sesuai sistemnya
> didapatlah trendline linear
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
> karena trendline nya yang sesuai sistem adalah linear, maka bentuk persamaan umum linear adalah y=mx+c
> bisa pakai grafik di Excel lalu tampilkan persamaan regresinya
> menggunakan fungsi Linest untuk mendapatkan persamaan linear, sehingga di dapat nilai m dan c
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun extrapolasi
> dari persamaan linear yang didapat dari nomor 5, maka bisa melakukan kalkulasi air yang ngucur untuk bukaan kran :
a. bukaan 1/2 (karena ada diantara nilai min dan max data yang pernah didapat, maka sering disebut interpolasi)
b. bukaan 1 (karena ada diluar rentang min dan max data yang pernah didapat, maka sering disebut ekstrapolasi)
> berhubung persamaan sistemnya adalah linear, maka interpolasinya adalah interpolasi linear dan ektrapolasinya adalah ekstrapolasi linear
Nah...
Sebaiknya Anda melakukan hal-hal tersebut di atas dulu, supaya tahu regresi yang cocok untuk sistem Anda tersebut yang seperti apa.
Jadi, tidak akan muncul kalimat ini :
kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah seharusnya jika x membesar maka y mengecil ?
Jadi,
Kalau sudah tahu regresi yang sesuai dengan sistem Anda itu apa, barulah ditanyakan ke milis lagi ya...
Regards,
Kid
2017-04-04 15:55 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Alhamdulillah, sudah bisa.
Setelah saya masukkan ke soal yang sesungguhnya di soal sebelumnya, yaitu persamaan kuadratik dengan x di luar range yang diketahui, tapi kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah seharusnya jika x membesar maka y mengecil ? File terlampir. Saya sudah menghitung nilai a,b dan c di persamaan y=ax^2+bx+c
Terima kasih, semoga Allah SWT membalas kebaikan Mr. Kid dan teman-teman. Amiin.
Salam,
From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>]
Sent: Tuesday, April 04, 2017 12:18 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Bukankah sudah ada penjelasannya di kanan formula ?
-> array formula di blok array cells 1 baris x 3 kolom [B12:D12] berbunyi : =LINEST(C3:C7,B3:B7^{1,2},TRUE,FALSE)
> yang biru : berarti formula nanti di enter dengan CTRL SHIFT ENTER
> yang di latar kuning : berarti formula di tulis langsung ketika terblok 1 baris x 3 kolom
Regards,
Kid
2017-04-04 11:42 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam,
Mr. Kid, bagaimana menulis rumus array sehingga dengan rumus yang sama, tapi hasilnya beda ? Lebih jelasnya di file terlampir.
Terima Kasih.
Wassalam.
From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>]
Sent: Friday, March 31, 2017 5:22 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Interpolasi maupun ekstrapolasi pada dasarnya adalah mencari persamaan matematika yang mendekati pola yang dibentuk oleh nilai-nilai data.
Persamaan matematika tersebut bisa berpangkat 1 (linear yang berarti berupa persamaan linear dan membentuk garis linear), berpangkat 2 (kuadrat), berpangkat 3 dan sebagainya.
Formula umumnya begini : (semakin banyak record data yang bersih akan semakin baik)
=SumProduct( Linest( data_nilai_y , data_nilai_x^{array pangkat dari 1 sampai tertinggi} ,TRUE,FALSE) * nilai_x_diketahui^{ array pangkat dari tertinggi sampai 0 } )
Contoh : data_nilai_y di B1:B5, data_nilai_x di A1:A5, data di A1:B5 jika dibuat xy scatter chart menampilkan pola kuadrat,
mencari interpolasi atau ekstrapolasi dari nilai x sebesar 7
*** karena pola kuadrat, maka pangkatnya adalah 2.
{array pangkat dari 1 sampai tertinggi} akan berbentuk { 1 , 2 }
{ array pangkat dari tertinggi sampai 0 } akan berbentuk { 2 , 1 , 0 }
*** nilai_x_diketahui adalah 7
*** Formula : (misal hasilnya di letakkan di cells C9)
=SumProduct( Linest( B1:B5 , A1:A5 ^ { 1 , 2 } , TRUE , FALSE ) * 7 ^ { 2 , 1 , 0 } )
*** Penjelasan lebih detil bisa dilihat dalam file yang ada disini<https://app.box.com/s/njx4bbxr3ryw4tvp8z8a5xme8h2vo934>.
Regards,
Kid
2017-03-31 15:06 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam BeExceller,
Saya sudah punya formula untuk melihat forecast kedepan dengan melihat 2 nilai yang ada.
Permasalahannya, diluar dari nilai sumber yang ada, ternyata hasilnya error.
Adakah formula untuk melihat forecast kedepan ?
Saya buat dengan formula Lagrange, ternyata sangat sulit (complicated).
File terlampir untuk lebih jelasnya.
Mohon pencerahannya.
Terima kasih.
--- Mod ---
File lampiran yang melebihi 250KB dilepas dari email. Silakan melampirkan ulang file yang lebih sesuai peraturan milis, yaitu maksimal 250KB dengan cara me-reply email ini.
-------------
Ok, nanti saya cari tahu dulu, Mr. Kid. Kalau mentok, nanti ditanyakan lagi ke milis.
Terima kasih dan wassalam.
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Wednesday, April 05, 2017 10:52 AM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Anda salah memilih regresi. Cari tahu dulu apakah benar regresi yang sesuai dengan sistem Anda adalah kuadratik.
Dalam regresi, Anda harus mengetahui karakteristik sistem yang akan diregresi datanya.
Jadi, urutannya :
1. tahu sistemnya apa
2. sistemnya memiliki karakteristik seperti apa
3. punya data dari sistem tersebut
4. membuat regresi yang sesuai karakteristik sistem
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun extrapolasi
Contoh :
1. tahu sistemnya apa
> Ada pipa dialiri air yang diujungnya diberi kran.
2. sistemnya memiliki karakteristik seperti apa
> Kalau kran dibuka kecil, air yang ngucur kecil
> Kalau kran dibuka bertahap menjadi semakin besar, air yang ngucur semakin besar
> berarti, bukaan kran naik, yang ngucur juga naik
3. punya data dari sistem tersebut
> dilakukan pengambilan data dan didapat :
kran dibuka 0 -> air ngucur 0 liter per detik (debit)
kran dibuka 1/4 -> air ngucur 25 liter per detik
kran dibuka 3/4 -> air ngucur 75 liter per detik
4. membuat regresi yang sesuai karakteristik sistem
> dibuat grafiknya, dibuat trendlinenya, dipilih jenis trendline yang sesuai sistemnya
> didapatlah trendline linear
5. mendapatkan persamaan regresinya dan batas-batas berlakunya
> karena trendline nya yang sesuai sistem adalah linear, maka bentuk persamaan umum linear adalah y=mx+c
> bisa pakai grafik di Excel lalu tampilkan persamaan regresinya
> menggunakan fungsi Linest untuk mendapatkan persamaan linear, sehingga di dapat nilai m dan c
6. memanfaatkan persamaan regresi untuk kegiatan interpolasi maupun extrapolasi
> dari persamaan linear yang didapat dari nomor 5, maka bisa melakukan kalkulasi air yang ngucur untuk bukaan kran :
a. bukaan 1/2 (karena ada diantara nilai min dan max data yang pernah didapat, maka sering disebut interpolasi)
b. bukaan 1 (karena ada diluar rentang min dan max data yang pernah didapat, maka sering disebut ekstrapolasi)
> berhubung persamaan sistemnya adalah linear, maka interpolasinya adalah interpolasi linear dan ektrapolasinya adalah ekstrapolasi linear
Nah...
Sebaiknya Anda melakukan hal-hal tersebut di atas dulu, supaya tahu regresi yang cocok untuk sistem Anda tersebut yang seperti apa.
Jadi, tidak akan muncul kalimat ini :
kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah seharusnya jika x membesar maka y mengecil ?
Jadi,
Kalau sudah tahu regresi yang sesuai dengan sistem Anda itu apa, barulah ditanyakan ke milis lagi ya...
Regards,
Kid
2017-04-04 15:55 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Alhamdulillah, sudah bisa.
Setelah saya masukkan ke soal yang sesungguhnya di soal sebelumnya, yaitu persamaan kuadratik dengan x di luar range yang diketahui, tapi kenapa hasilnya (y) justru hasilnya membesar dengan x membesar ? Bukankah seharusnya jika x membesar maka y mengecil ? File terlampir. Saya sudah menghitung nilai a,b dan c di persamaan y=ax^2+bx+c
Terima kasih, semoga Allah SWT membalas kebaikan Mr. Kid dan teman-teman. Amiin.
Salam,
From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>]
Sent: Tuesday, April 04, 2017 12:18 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Bukankah sudah ada penjelasannya di kanan formula ?
-> array formula di blok array cells 1 baris x 3 kolom [B12:D12] berbunyi : =LINEST(C3:C7,B3:B7^{1,2},TRUE,FALSE)
> yang biru : berarti formula nanti di enter dengan CTRL SHIFT ENTER
> yang di latar kuning : berarti formula di tulis langsung ketika terblok 1 baris x 3 kolom
Regards,
Kid
2017-04-04 11:42 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam,
Mr. Kid, bagaimana menulis rumus array sehingga dengan rumus yang sama, tapi hasilnya beda ? Lebih jelasnya di file terlampir.
Terima Kasih.
Wassalam.
From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>]
Sent: Friday, March 31, 2017 5:22 PM
To: BeExcel
Subject: Re: [belajar-excel] Interpolasi kuadratik untuk melihat forecast ke depan
Hai Tio,
Interpolasi maupun ekstrapolasi pada dasarnya adalah mencari persamaan matematika yang mendekati pola yang dibentuk oleh nilai-nilai data.
Persamaan matematika tersebut bisa berpangkat 1 (linear yang berarti berupa persamaan linear dan membentuk garis linear), berpangkat 2 (kuadrat), berpangkat 3 dan sebagainya.
Formula umumnya begini : (semakin banyak record data yang bersih akan semakin baik)
=SumProduct( Linest( data_nilai_y , data_nilai_x^{array pangkat dari 1 sampai tertinggi} ,TRUE,FALSE) * nilai_x_diketahui^{ array pangkat dari tertinggi sampai 0 } )
Contoh : data_nilai_y di B1:B5, data_nilai_x di A1:A5, data di A1:B5 jika dibuat xy scatter chart menampilkan pola kuadrat,
mencari interpolasi atau ekstrapolasi dari nilai x sebesar 7
*** karena pola kuadrat, maka pangkatnya adalah 2.
{array pangkat dari 1 sampai tertinggi} akan berbentuk { 1 , 2 }
{ array pangkat dari tertinggi sampai 0 } akan berbentuk { 2 , 1 , 0 }
*** nilai_x_diketahui adalah 7
*** Formula : (misal hasilnya di letakkan di cells C9)
=SumProduct( Linest( B1:B5 , A1:A5 ^ { 1 , 2 } , TRUE , FALSE ) * 7 ^ { 2 , 1 , 0 } )
*** Penjelasan lebih detil bisa dilihat dalam file yang ada disini<https://app.box.com/s/njx4bbxr3ryw4tvp8z8a5xme8h2vo934>.
Regards,
Kid
2017-03-31 15:06 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id<mailto:tio.adjie@ptssb.co.id> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>:
Salam BeExceller,
Saya sudah punya formula untuk melihat forecast kedepan dengan melihat 2 nilai yang ada.
Permasalahannya, diluar dari nilai sumber yang ada, ternyata hasilnya error.
Adakah formula untuk melihat forecast kedepan ?
Saya buat dengan formula Lagrange, ternyata sangat sulit (complicated)
File terlampir untuk lebih jelasnya.
Mohon pencerahannya.
Terima kasih.
--- Mod ---
File lampiran yang melebihi 250KB dilepas dari email. Silakan melampirkan ulang file yang lebih sesuai peraturan milis, yaitu maksimal 250KB dengan cara me-reply email ini.
------------
Tue Apr 4, 2017 8:59 pm (PDT) . Posted by:
rizaekaryuga
Assalaamu'alaikum Wr Wb
Yth. Rekan2
Saya baru mau belajar VB cara men-sort suatu range pake button dari VB gimana ya. File terlampir
Terimakasih
Wassalaamu'alaikum Wr Wb
Yth. Rekan2
Saya baru mau belajar VB cara men-sort suatu range pake button dari VB gimana ya. File terlampir
Terimakasih
Wassalaamu&#
Tue Apr 4, 2017 9:23 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam wr wb
Hai Riza,
Untuk proses sort, begini :
1. tahu area range yang akan di-sort
2. pada area rang yang akan di-sort itu, sudah tahu kolom-kolom yang
menjadi kunci sort dan cara sort-nya
3. sudah disusun bunyi langkah-langkah secara manualnya
4. dibuat baris kode VBA nya.
Contoh :
1. mau sort area range A1:X9 dengan baris 1 adalah header dengan nama
KOLOM_01 dst sampai X.
2. kolom kunci untuk sort hanya ada 1 sajah, di kolom A
3. cara manualnya :
klik A1 -> CTRL A -> ribbon Data -> group Sort & Filter -> klik tombol
Sort
-> centang opsi My data has header -> sort by nya dipilih kolom
bernama KOLOM_01 -> tekan OK
4. untuk membuat baris kodenya, bisa diawali dengan melakukan record macro
lalu mengeditnya.
atau langsung membuat prosedur sendiri seperti :
> buat prosedur untuk sort ah... namanya prosedur misale SortNihYe
public sub SortNihYe()
end sub
> ngisi proses sort dalam prosedur bernama SortNihYe... Bunyi prosesnya
begini :
range("a1").currentregion.sort range("a1"),xlascending,header:=xlyes
Bahasa manusianya :
"cel, di range A1 dilakukan select all yang saling berjejeran, lalu di-Sort
dengan kolom kunci adalah kolom miliknya range A1 secara Ascending
(xlAscending), tapi ingat ya cel, area yang di select itu ada headernya di
paling atas"
Tentang :
1. apa itu prosedur dan cara membuat prosedur, bisa dilihat mulai dari sini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-005-procedure-seri-1.html>
.
2. cara menulis area range dan cara beberapa cara mendapatkan area range
yang dibutuhkan, bisa dilihat mulai dari sini
<http://b-excel.blogspot.co.id/2013/09/belajarvba-011-range-01-berdasar-alamat.html>
.
3. cara menggunakan object (seperti range, worksheet, workbook, dsb) , bisa
dilihat disini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-006-object-dalam-excel.html>
.
4. apa yang dimiliki suatu object, bisa dilihat disini
<http://b-excel.blogspot.co.id/2013/08/belajarvba-007-property-methods-events.html>
.
5. methods sort yang dimiliki object range, bisa dilihat di Excel VBA Help
atau secara online disini
<https://msdn.microsoft.com/en-us/library/office/ff840646.aspx>.
syntax :
*expression*.Sort(*Key1*, *Order1*, *Key2*, *Type*, *Order2*, *Key3*,
*Order3*, *Header*, *OrderCustom*, *MatchCase*, *Orientation*, *SortMethod*,
*DataOption1*, *DataOption2*, *DataOption3*)
*expression* : A variable that represents a *Range* object.
Wassalamu'alaikum wr wb
Kid
2017-04-05 9:41 GMT+07:00 rizaekaryuga@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Assalaamu'alaikum Wr Wb
>
>
> Yth. Rekan2
>
>
> Saya baru mau belajar VB cara men-sort suatu range pake button dari VB
> gimana ya. File terlampir
>
> Terimakasih
>
>
>
> Wassalaamu'alaikum Wr Wb
>
>
>
>
Hai Riza,
Untuk proses sort, begini :
1. tahu area range yang akan di-sort
2. pada area rang yang akan di-sort itu, sudah tahu kolom-kolom yang
menjadi kunci sort dan cara sort-nya
3. sudah disusun bunyi langkah-langkah secara manualnya
4. dibuat baris kode VBA nya.
Contoh :
1. mau sort area range A1:X9 dengan baris 1 adalah header dengan nama
KOLOM_01 dst sampai X.
2. kolom kunci untuk sort hanya ada 1 sajah, di kolom A
3. cara manualnya :
klik A1 -> CTRL A -> ribbon Data -> group Sort & Filter -> klik tombol
Sort
-> centang opsi My data has header -> sort by nya dipilih kolom
bernama KOLOM_01 -> tekan OK
4. untuk membuat baris kodenya, bisa diawali dengan melakukan record macro
lalu mengeditnya.
atau langsung membuat prosedur sendiri seperti :
> buat prosedur untuk sort ah... namanya prosedur misale SortNihYe
public sub SortNihYe()
end sub
> ngisi proses sort dalam prosedur bernama SortNihYe... Bunyi prosesnya
begini :
range("a1").currentregion.sort range("a1"),xlascending,header:=xlyes
Bahasa manusianya :
"cel, di range A1 dilakukan select all yang saling berjejeran, lalu di-Sort
dengan kolom kunci adalah kolom miliknya range A1 secara Ascending
(xlAscending), tapi ingat ya cel, area yang di select itu ada headernya di
paling atas"
Tentang :
1. apa itu prosedur dan cara membuat prosedur, bisa dilihat mulai dari sini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-005-procedure-seri-1.html>
.
2. cara menulis area range dan cara beberapa cara mendapatkan area range
yang dibutuhkan, bisa dilihat mulai dari sini
<http://b-excel.blogspot.co.id/2013/09/belajarvba-011-range-01-berdasar-alamat.html>
.
3. cara menggunakan object (seperti range, worksheet, workbook, dsb) , bisa
dilihat disini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-006-object-dalam-excel.html>
.
4. apa yang dimiliki suatu object, bisa dilihat disini
<http://b-excel.blogspot.co.id/2013/08/belajarvba-007-property-methods-events.html>
.
5. methods sort yang dimiliki object range, bisa dilihat di Excel VBA Help
atau secara online disini
<https://msdn.microsoft.com/en-us/library/office/ff840646.aspx>.
syntax :
*expression*.Sort(*Key1*, *Order1*, *Key2*, *Type*, *Order2*, *Key3*,
*Order3*, *Header*, *OrderCustom*, *MatchCase*, *Orientation*, *SortMethod*,
*DataOption1*, *DataOption2*, *DataOption3*)
*expression* : A variable that represents a *Range* object.
Wassalamu'alaikum wr wb
Kid
2017-04-05 9:41 GMT+07:00 rizaekaryuga@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Assalaamu'
>
>
> Yth. Rekan2
>
>
> Saya baru mau belajar VB cara men-sort suatu range pake button dari VB
> gimana ya. File terlampir
>
> Terimakasih
>
>
>
> Wassalaamu&#
>
>
>
>
Tue Apr 4, 2017 10:36 pm (PDT) . Posted by:
"Muhammad Riza Perdana Kusuma" rizaekaryuga
Alhamdulillah dapat pencerahan dari Mr. Kid,Saya coba dulu Om, semoga menjadi ilmu yang bermanfaat. Aminn....
Makasih banyak sebelumnya Om
On Wednesday, April 5, 2017 12:23 PM, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Wa'alaikumussalam wr wb
Hai Riza,
Untuk proses sort, begini :
1. tahu area range yang akan di-sort
2. pada area rang yang akan di-sort itu, sudah tahu kolom-kolom yang menjadi kunci sort dan cara sort-nya
3. sudah disusun bunyi langkah-langkah secara manualnya
4. dibuat baris kode VBA nya.
Contoh :
1. mau sort area range A1:X9 dengan baris 1 adalah header dengan nama KOLOM_01 dst sampai X.
2. kolom kunci untuk sort hanya ada 1 sajah, di kolom A
3. cara manualnya :
klik A1 -> CTRL A -> ribbon Data -> group Sort & Filter -> klik tombol Sort
-> centang opsi My data has header -> sort by nya dipilih kolom bernama KOLOM_01 -> tekan OK
4. untuk membuat baris kodenya, bisa diawali dengan melakukan record macro lalu mengeditnya.
atau langsung membuat prosedur sendiri seperti :
> buat prosedur untuk sort ah... namanya prosedur misale SortNihYe
public sub SortNihYe()
end sub
> ngisi proses sort dalam prosedur bernama SortNihYe... Bunyi prosesnya begini :
range("a1").currentregion.sort range("a1"),xlascending,header:=xlyes
Bahasa manusianya :
"cel, di range A1 dilakukan select all yang saling berjejeran, lalu di-Sort dengan kolom kunci adalah kolom miliknya range A1 secara Ascending (xlAscending), tapi ingat ya cel, area yang di select itu ada headernya di paling atas"
Tentang :
1. apa itu prosedur dan cara membuat prosedur, bisa dilihat mulai dari sini.
2. cara menulis area range dan cara beberapa cara mendapatkan area range yang dibutuhkan, bisa dilihat mulai dari sini.
3. cara menggunakan object (seperti range, worksheet, workbook, dsb) , bisa dilihat disini.
4. apa yang dimiliki suatu object, bisa dilihat disini.
5. methods sort yang dimiliki object range, bisa dilihat di Excel VBA Help atau secara online disini.
syntax :
expression.Sort(Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3)expression : A variable that represents a Range object.
Wassalamu'alaikum wr wb
Kid
2017-04-05 9:41 GMT+07:00 rizaekaryuga@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Assalaamu'alaikum Wr Wb
Yth. Rekan2
Saya baru mau belajar VB cara men-sort suatu range pake button dari VB gimana ya. File terlampirTerimakasih
Wassalaamu'alaikum Wr Wb
#yiv1279416410 #yiv1279416410 -- #yiv1279416410ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1279416410 #yiv1279416410ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1279416410 #yiv1279416410ygrp-mkp #yiv1279416410hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1279416410 #yiv1279416410ygrp-mkp #yiv1279416410ads {margin-bottom:10px;}#yiv1279416410 #yiv1279416410ygrp-mkp .yiv1279416410ad {padding:0 0;}#yiv1279416410 #yiv1279416410ygrp-mkp .yiv1279416410ad p {margin:0;}#yiv1279416410 #yiv1279416410ygrp-mkp .yiv1279416410ad a {color:#0000ff;text-decoration:none;}#yiv1279416410 #yiv1279416410ygrp-sponsor #yiv1279416410ygrp-lc {font-family:Arial;}#yiv1279416410 #yiv1279416410ygrp-sponsor #yiv1279416410ygrp-lc #yiv1279416410hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1279416410 #yiv1279416410ygrp-sponsor #yiv1279416410ygrp-lc .yiv1279416410ad {margin-bottom:10px;padding:0 0;}#yiv1279416410 #yiv1279416410actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1279416410 #yiv1279416410activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1279416410 #yiv1279416410activity span {font-weight:700;}#yiv1279416410 #yiv1279416410activity span:first-child {text-transform:uppercase;}#yiv1279416410 #yiv1279416410activity span a {color:#5085b6;text-decoration:none;}#yiv1279416410 #yiv1279416410activity span span {color:#ff7900;}#yiv1279416410 #yiv1279416410activity span .yiv1279416410underline {text-decoration:underline;}#yiv1279416410 .yiv1279416410attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1279416410 .yiv1279416410attach div a {text-decoration:none;}#yiv1279416410 .yiv1279416410attach img {border:none;padding-right:5px;}#yiv1279416410 .yiv1279416410attach label {display:block;margin-bottom:5px;}#yiv1279416410 .yiv1279416410attach label a {text-decoration:none;}#yiv1279416410 blockquote {margin:0 0 0 4px;}#yiv1279416410 .yiv1279416410bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1279416410 .yiv1279416410bold a {text-decoration:none;}#yiv1279416410 dd.yiv1279416410last p a {font-family:Verdana;font-weight:700;}#yiv1279416410 dd.yiv1279416410last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1279416410 dd.yiv1279416410last p span.yiv1279416410yshortcuts {margin-right:0;}#yiv1279416410 div.yiv1279416410attach-table div div a {text-decoration:none;}#yiv1279416410 div.yiv1279416410attach-table {width:400px;}#yiv1279416410 div.yiv1279416410file-title a, #yiv1279416410 div.yiv1279416410file-title a:active, #yiv1279416410 div.yiv1279416410file-title a:hover, #yiv1279416410 div.yiv1279416410file-title a:visited {text-decoration:none;}#yiv1279416410 div.yiv1279416410photo-title a, #yiv1279416410 div.yiv1279416410photo-title a:active, #yiv1279416410 div.yiv1279416410photo-title a:hover, #yiv1279416410 div.yiv1279416410photo-title a:visited {text-decoration:none;}#yiv1279416410 div#yiv1279416410ygrp-mlmsg #yiv1279416410ygrp-msg p a span.yiv1279416410yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1279416410 .yiv1279416410green {color:#628c2a;}#yiv1279416410 .yiv1279416410MsoNormal {margin:0 0 0 0;}#yiv1279416410 o {font-size:0;}#yiv1279416410 #yiv1279416410photos div {float:left;width:72px;}#yiv1279416410 #yiv1279416410photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv1279416410 #yiv1279416410photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1279416410 #yiv1279416410reco-category {font-size:77%;}#yiv1279416410 #yiv1279416410reco-desc {font-size:77%;}#yiv1279416410 .yiv1279416410replbq {margin:4px;}#yiv1279416410 #yiv1279416410ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1279416410 #yiv1279416410ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1279416410 #yiv1279416410ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1279416410 #yiv1279416410ygrp-mlmsg select, #yiv1279416410 input, #yiv1279416410 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1279416410 #yiv1279416410ygrp-mlmsg pre, #yiv1279416410 code {font:115% monospace;}#yiv1279416410 #yiv1279416410ygrp-mlmsg * {line-height:1.22em;}#yiv1279416410 #yiv1279416410ygrp-mlmsg #yiv1279416410logo {padding-bottom:10px;}#yiv1279416410 #yiv1279416410ygrp-msg p a {font-family:Verdana;}#yiv1279416410 #yiv1279416410ygrp-msg p#yiv1279416410attach-count span {color:#1E66AE;font-weight:700;}#yiv1279416410 #yiv1279416410ygrp-reco #yiv1279416410reco-head {color:#ff7900;font-weight:700;}#yiv1279416410 #yiv1279416410ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1279416410 #yiv1279416410ygrp-sponsor #yiv1279416410ov li a {font-size:130%;text-decoration:none;}#yiv1279416410 #yiv1279416410ygrp-sponsor #yiv1279416410ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1279416410 #yiv1279416410ygrp-sponsor #yiv1279416410ov ul {margin:0;padding:0 0 0 8px;}#yiv1279416410 #yiv1279416410ygrp-text {font-family:Georgia;}#yiv1279416410 #yiv1279416410ygrp-text p {margin:0 0 1em 0;}#yiv1279416410 #yiv1279416410ygrp-text tt {font-size:120%;}#yiv1279416410 #yiv1279416410ygrp-vital ul li:last-child {border-right:none !important;}#yiv1279416410
Makasih banyak sebelumnya Om
On Wednesday, April 5, 2017 12:23 PM, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Wa'alaikumussalam wr wb
Hai Riza,
Untuk proses sort, begini :
1. tahu area range yang akan di-sort
2. pada area rang yang akan di-sort itu, sudah tahu kolom-kolom yang menjadi kunci sort dan cara sort-nya
3. sudah disusun bunyi langkah-langkah secara manualnya
4. dibuat baris kode VBA nya.
Contoh :
1. mau sort area range A1:X9 dengan baris 1 adalah header dengan nama KOLOM_01 dst sampai X.
2. kolom kunci untuk sort hanya ada 1 sajah, di kolom A
3. cara manualnya :
klik A1 -> CTRL A -> ribbon Data -> group Sort & Filter -> klik tombol Sort
-> centang opsi My data has header -> sort by nya dipilih kolom bernama KOLOM_01 -> tekan OK
4. untuk membuat baris kodenya, bisa diawali dengan melakukan record macro lalu mengeditnya.
atau langsung membuat prosedur sendiri seperti :
> buat prosedur untuk sort ah... namanya prosedur misale SortNihYe
public sub SortNihYe()
end sub
> ngisi proses sort dalam prosedur bernama SortNihYe... Bunyi prosesnya begini :
range("a1").currentregion.sort range("a1"),xlascending,header:=xlyes
Bahasa manusianya :
"cel, di range A1 dilakukan select all yang saling berjejeran, lalu di-Sort dengan kolom kunci adalah kolom miliknya range A1 secara Ascending (xlAscending), tapi ingat ya cel, area yang di select itu ada headernya di paling atas"
Tentang :
1. apa itu prosedur dan cara membuat prosedur, bisa dilihat mulai dari sini.
2. cara menulis area range dan cara beberapa cara mendapatkan area range yang dibutuhkan, bisa dilihat mulai dari sini.
3. cara menggunakan object (seperti range, worksheet, workbook, dsb) , bisa dilihat disini.
4. apa yang dimiliki suatu object, bisa dilihat disini.
5. methods sort yang dimiliki object range, bisa dilihat di Excel VBA Help atau secara online disini.
syntax :
expression.Sort(Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3)expression : A variable that represents a Range object.
Wassalamu'alaikum wr wb
Kid
2017-04-05 9:41 GMT+07:00 rizaekaryuga@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Assalaamu'
Yth. Rekan2
Saya baru mau belajar VB cara men-sort suatu range pake button dari VB gimana ya. File terlampirTerimakasi
Wassalaamu&#
#yiv1279416410 #yiv1279416410 -- #yiv1279416410ygrp-
Tue Apr 4, 2017 10:12 pm (PDT) . Posted by:
"Heru Safrudin" heru.safrudin
Dear All,
Untuk menemukan cell yang kosong dalam range saya tentukan dengan kode vba
sebagai berikut :
Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,Range("A1").CurrentR
egion.Columns.Count).SpecialCells(xlCellTypeBlanks).select
Dengan prosedur diatas cell yg kosong akan ter-select, tapi jika tidak ada
cell yang kosong maka akan muncul pesan Error
Pertanyaan saya bagaimana cara men-trap error prosedur diatas jika tidak
ditemukan cell yang kosong ?
Mohon pengetahuannya
Terima kasih
Heru Safrudin
<ymsgr:sendIM?heru.safrudin>; Heru SafrudinBISI,Heru Safrudin,YM online
Untuk menemukan cell yang kosong dalam range saya tentukan dengan kode vba
sebagai berikut :
Range("
egion.Columns.
Dengan prosedur diatas cell yg kosong akan ter-select, tapi jika tidak ada
cell yang kosong maka akan muncul pesan Error
Pertanyaan saya bagaimana cara men-trap error prosedur diatas jika tidak
ditemukan cell yang kosong ?
Mohon pengetahuannya
Terima kasih
Heru Safrudin
<ymsgr:sendIM?
Tue Apr 4, 2017 11:14 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Heru,
Baris kode :
Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,
Range("A1").CurrentRegion.Columns.Count).SpecialCells(
xlCellTypeBlanks).select
tugasnya untuk select yang blank (kalau ada).
Bagian :
Range("A1").CurrentRegion untuk select all yang berjejeran ada isinya
.Rows.Count untuk mendapatkan jumlah baris
.Columns.Count untuk mendapatkan jumlah kolom
Bagian :
Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,
Range("A1").CurrentRegion.Columns.Count)
sebenarnya adalah :
Range("A1").CurrentRegion
*** sampai disini ***
baris kode tersebut bisa diganti menjadi :
Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks).select
**********************
Bagian :
.select untuk memblok range
Andai sudah tahu akan diapakan si cells blank itu, maka bisa jadi .select
tidak diperlukan
Contoh :
yang blank akan diisi angka 0
Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks).value=0
Bagian :
.value untuk menggunakan properti bernama Value yang bertugas sebagai wadah
suatu nilai
.value=0 berarti menyimpan nilai 0 ke properti value dari objects yang
terdefinisi sebagai
Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
Variabel sangatlah berguna.
dim rng as range
set rng=Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
Bahasa manusia :
"cel, atur supaya si rng berisi range yang blank [.SpecialCells(
xlCellTypeBlanks)] dari semua range yang bersambungan [.CurrentRegion]
dengan range A1 [Range("A1")]"
Karena si variabel rng sudah berisi yang blank saja, maka yang blank bisa
diproses bermacam-macam
rng.value=0 'isi dengan angka 0
rng.font.bold=true 'font nya di bold
dan sebagainya hanya merujuk ke rng
Selain dengan variabel, beberapa proses juga bisa dilakukan dengan
menggunakan blok with ... end with
with Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
.value=0
.font.bold=true
end with
--------------------------------
dah... sekarang kembali ke kasus pokoknya
--------------------------------
trap error biasanya dengan klausa On Error
contoh :
1. Kalau terjadi error, abaikan saja dan proseslah baris kode berikutnya.
on error resume next
'baris kode yang kemungkinan bisa memicu error
'baris kode proses lainnya
2. Kalau terjadi error, langsung menuju baris label bernama ADA_ERROR
on error goto ADA_ERROR
'baris kode yang kemungkinan bisa memicu error
'baris kode proses lainnya
ADA_ERROR: 'label untuk tujuan melompati baris kode tertentu
'baris kode selanjutnya
3. mengembalikan trap error ke set default VB/VBA dengan :
on error goto 0 'kalau ada error yang balik ke baris error itu lagi
menghapus informasi error yang pernah terjadi dengan :
err.clear
> Contoh :
kalau memilih suatu range yang blank di suatu area range, bisa muncul error
kalau ternyata tidak ada yang blank.
kalau tidak ada yang blank, prosesnya akan menampilkan print preview
kalau ada yang blank, prosesnya menampilkan pesan bahwa masih ada cells
yang belum diisi
dim rng as range
on error resume next
set rng=Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
if rng is nothing then 'kalau variabel bernama rng gak ada isinya
object rang tertentu, berarti gak ada yang blank
'lakukan print preview
rng.printpreview
else 'berarti ada yang blank, karena variabel rng ada isinya object range
tertentu
msgbox "Masih ada cells yang belum diisi.",vbexclamation,"Ada blank"
endif
err.clear
on error goto 0
Baris kode berbunyi :
if rng is nothing then
bisa juga diganti dengan :
if err.number<>0 then
Regards,
Kid
2017-04-05 11:52 GMT+07:00 'Heru Safrudin'
fcprocessing.bisikediri@bisi.co.id [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Dear All,
>
>
>
> Untuk menemukan cell yang kosong dalam range saya tentukan dengan kode vba
> sebagai berikut :
>
>
>
> Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,
> Range("A1").CurrentRegion.Columns.Count).SpecialCells(
> xlCellTypeBlanks).select
>
>
>
> Dengan prosedur diatas cell yg kosong akan ter-select, tapi jika tidak ada
> cell yang kosong maka akan muncul pesan Error
>
> Pertanyaan saya bagaimana cara men-trap error prosedur diatas jika tidak
> ditemukan cell yang kosong ?
>
> Mohon pengetahuannya
>
>
>
> Terima kasih
>
> Heru Safrudin
>
> [image: Heru Safrudin][image: BISI,Heru Safrudin,YM online]
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
Baris kode :
Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,
Range("A1").CurrentRegion.Columns.Count).SpecialCells(
xlCellTypeBlanks).select
tugasnya untuk select yang blank (kalau ada).
Bagian :
Range("A1").CurrentRegion untuk select all yang berjejeran ada isinya
.Rows.Count untuk mendapatkan jumlah baris
.Columns.Count untuk mendapatkan jumlah kolom
Bagian :
Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,
Range("A1").CurrentRegion.Columns.Count)
sebenarnya adalah :
Range("A1").CurrentRegion
*** sampai disini ***
baris kode tersebut bisa diganti menjadi :
Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks).select
**********************
Bagian :
.select untuk memblok range
Andai sudah tahu akan diapakan si cells blank itu, maka bisa jadi .select
tidak diperlukan
Contoh :
yang blank akan diisi angka 0
Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks).value=0
Bagian :
.value untuk menggunakan properti bernama Value yang bertugas sebagai wadah
suatu nilai
.value=0 berarti menyimpan nilai 0 ke properti value dari objects yang
terdefinisi sebagai
Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
Variabel sangatlah berguna.
dim rng as range
set rng=Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
Bahasa manusia :
"cel, atur supaya si rng berisi range yang blank [.SpecialCells(
xlCellTypeBlanks)] dari semua range yang bersambungan [.CurrentRegion]
dengan range A1 [Range("A1")]"
Karena si variabel rng sudah berisi yang blank saja, maka yang blank bisa
diproses bermacam-macam
rng.value=0 'isi dengan angka 0
rng.font.bold=true 'font nya di bold
dan sebagainya hanya merujuk ke rng
Selain dengan variabel, beberapa proses juga bisa dilakukan dengan
menggunakan blok with ... end with
with Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
.value=0
.font.bold=true
end with
--------------------------------
dah... sekarang kembali ke kasus pokoknya
--------------------------------
trap error biasanya dengan klausa On Error
contoh :
1. Kalau terjadi error, abaikan saja dan proseslah baris kode berikutnya.
on error resume next
'baris kode yang kemungkinan bisa memicu error
'baris kode proses lainnya
2. Kalau terjadi error, langsung menuju baris label bernama ADA_ERROR
on error goto ADA_ERROR
'baris kode yang kemungkinan bisa memicu error
'baris kode proses lainnya
ADA_ERROR: 'label untuk tujuan melompati baris kode tertentu
'baris kode selanjutnya
3. mengembalikan trap error ke set default VB/VBA dengan :
on error goto 0 'kalau ada error yang balik ke baris error itu lagi
menghapus informasi error yang pernah terjadi dengan :
err.clear
> Contoh :
kalau memilih suatu range yang blank di suatu area range, bisa muncul error
kalau ternyata tidak ada yang blank.
kalau tidak ada yang blank, prosesnya akan menampilkan print preview
kalau ada yang blank, prosesnya menampilkan pesan bahwa masih ada cells
yang belum diisi
dim rng as range
on error resume next
set rng=Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)
if rng is nothing then 'kalau variabel bernama rng gak ada isinya
object rang tertentu, berarti gak ada yang blank
'lakukan print preview
rng.printpreview
else 'berarti ada yang blank, karena variabel rng ada isinya object range
tertentu
msgbox "Masih ada cells yang belum diisi.",vbexclamation,"Ada blank"
endif
err.clear
on error goto 0
Baris kode berbunyi :
if rng is nothing then
bisa juga diganti dengan :
if err.number<>0 then
Regards,
Kid
2017-04-05 11:52 GMT+07:00 'Heru Safrudin'
fcprocessing.bisikediri@bisi.co.id [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Dear All,
>
>
>
> Untuk menemukan cell yang kosong dalam range saya tentukan dengan kode vba
> sebagai berikut :
>
>
>
> Range("
> Range("
> xlCellTypeBlanks)
>
>
>
> Dengan prosedur diatas cell yg kosong akan ter-select, tapi jika tidak ada
> cell yang kosong maka akan muncul pesan Error
>
> Pertanyaan saya bagaimana cara men-trap error prosedur diatas jika tidak
> ditemukan cell yang kosong ?
>
> Mohon pengetahuannya
>
>
>
> Terima kasih
>
> Heru Safrudin
>
> [image: Heru Safrudin][image: BISI,Heru Safrudin,YM online]
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
Tue Apr 4, 2017 11:47 pm (PDT) . Posted by:
"nangagus"
coba pelajari: link ini
<http://www.cpearson.com/excel/errorhandling.htm> atau ini
<http://www.excel-easy.com/vba/examples/error-handling.html> atau dari
mas Kid di sini
<http://www.mail-archive.com/belajar-excel@yahoogroups.com/msg15044.html>
On 05/04/2017 11:52, 'Heru Safrudin' fcprocessing.bisikediri@bisi.co.id
[belajar-excel] wrote:
>
> Dear All,
>
> Untuk menemukan cell yang kosong dalam range saya tentukan dengan kode
> vba sebagai berikut :
>
> Range("A1").Resize(Range("A1").CurrentRegion.Rows.Count,Range("A1").CurrentRegion.Columns.Count).SpecialCells(xlCellTypeBlanks).select
>
> Dengan prosedur diatas cell yg kosong akan ter-select, tapi jika tidak
> ada cell yang kosong maka akan muncul pesan Error
>
> Pertanyaan saya bagaimana cara men-trap error prosedur diatas jika
> tidak ditemukan cell yang kosong ?
>
> Mohon pengetahuannya
>
> Terima kasih
>
> Heru Safrudin
>
> Heru Safrudin <ymsgr:sendIM?heru.safrudin>;BISI,Heru Safrudin,YM online
>
>
<http://www.cpearson.com/excel/errorhandling.htm> atau ini
<http://www.excel-easy.com/vba/examples/error-handling.html> atau dari
mas Kid di sini
<http://www.mail-archive.com/belajar-excel@yahoogroups.com/msg15044.html>
On 05/04/2017 11:52, 'Heru Safrudin' fcprocessing.bisikediri@bisi.co.id
[belajar-excel] wrote:
>
> Dear All,
>
> Untuk menemukan cell yang kosong dalam range saya tentukan dengan kode
> vba sebagai berikut :
>
> Range("
>
> Dengan prosedur diatas cell yg kosong akan ter-select, tapi jika tidak
> ada cell yang kosong maka akan muncul pesan Error
>
> Pertanyaan saya bagaimana cara men-trap error prosedur diatas jika
> tidak ditemukan cell yang kosong ?
>
> Mohon pengetahuannya
>
> Terima kasih
>
> Heru Safrudin
>
> Heru Safrudin <ymsgr:sendIM?
>
>
Wed Apr 5, 2017 1:56 am (PDT) . Posted by:
"Tio Adi Bayu Adjie"
Salam BeExceller,
Saya lihat di internet nilai Integer rangenya sbb. : https://msdn.microsoft.com/en-us/library/06bkb8w2.aspx
Integer Data Type (Visual Basic)
Visual Studio 2015
Other Versions <javascript:void(0)>
[https://i-msdn.sec.s-msft.com/Areas/Epx/Content/Images/ImageSprite.png?v=636256477425040586]
Updated: July 20, 2015
For the latest documentation on Visual Studio 2017, see Visual Studio 2017 Documentation<http://docs.microsoft.com/visualstudio>.
Holds signed 32-bit (4-byte) integers that range in value from -2,147,483,648 through 2,147,483,647.
Saya coba di excel 2010 untuk test dengan menuju baris terakhir di Excel dengan code sbb. :
'=====
Private Sub CommandButton5_Click()
Dim x As Long
x = ActiveCell.End(xlDown).Row
MsgBox x
End Sub
'=====
Hasilnya 1.048.576
Tapi kalau saya ganti x dengan integer (Dim x as integer) ternyata hasilnya Error (Runtime error '6' over flow), kenapa ya ? Bukankah integer rangenya sampai 2,147,483,647 sesuai referensi dari Internet di atas ?.
Mohon pencerahannya.
Terima Kasih.
Saya lihat di internet nilai Integer rangenya sbb. : https://msdn.microsoft.com/en-us/library/06bkb8w2.aspx
Integer Data Type (Visual Basic)
Visual Studio 2015
Other Versions <javascript:void(0)>
[https://i-msdn.sec.s-msft.com/Areas/Epx/Content/Images/ImageSprite.png?v=636256477425040586]
Updated: July 20, 2015
For the latest documentation on Visual Studio 2017, see Visual Studio 2017 Documentation<http://docs.microsoft.com/visualstudio>.
Holds signed 32-bit (4-byte) integers that range in value from -2,147,483,648 through 2,147,483,647.
Saya coba di excel 2010 untuk test dengan menuju baris terakhir di Excel dengan code sbb. :
'=====
Private Sub CommandButton5_
Dim x As Long
x = ActiveCell.End(
MsgBox x
End Sub
'=====
Hasilnya 1.048.576
Tapi kalau saya ganti x dengan integer (Dim x as integer) ternyata hasilnya Error (Runtime error '6' over flow), kenapa ya ? Bukankah integer rangenya sampai 2,147,483,647 sesuai referensi dari Internet di atas ?.
Mohon pencerahannya.
Terima Kasih.
Wed Apr 5, 2017 2:11 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Tio,
Data type untuk VB/VBA (VB6.x sampai VB7.x) disini
<https://msdn.microsoft.com/en-us/library/aa263420(v=vs.60).aspx>.
atau di VBA Editor -> tekan F1 -> ditextbox search ketik Data Type Summary
-> lakukan search
atau rangkumannya disini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-004-tipe-data-variabel.html>
.
Regards,
Kid
2017-04-05 15:24 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Salam BeExceller,
>
>
>
> Saya lihat di internet nilai Integer rangenya sbb. :
> https://msdn.microsoft.com/en-us/library/06bkb8w2.aspx
> Integer Data Type (Visual Basic)
>
> *Visual Studio 2015 *
>
> Other Versions
>
> [image:
> https://i-msdn.sec.s-msft.com/Areas/Epx/Content/Images/ImageSprite.png?v=636256477425040586]
>
> Updated: July 20, 2015
>
> For the latest documentation on Visual Studio 2017, see Visual Studio
> 2017 Documentation <http://docs.microsoft.com/visualstudio>.
>
> Holds signed 32-bit (4-byte) integers that range in value from *-2,147,483,648
> through 2,147,483,647.*
>
> Saya coba di excel 2010 untuk test dengan menuju baris terakhir di Excel
> dengan code sbb. :
>
> '=====
>
> Private Sub CommandButton5_Click()
>
> *Dim x As Long*
>
> x = ActiveCell.End(xlDown).Row
>
> MsgBox x
>
> End Sub
>
> '=====
>
> Hasilnya 1.048.576
>
> Tapi kalau saya ganti x dengan integer (*Dim x as integer*) ternyata
> hasilnya Error (Runtime error '6' over flow), kenapa ya ? Bukankah integer
> rangenya sampai 2,147,483,647 sesuai referensi dari Internet di atas ?.
>
> Mohon pencerahannya.
>
> Terima Kasih.
>
>
>
>
>
>
>
>
>
>
>
>
>
Data type untuk VB/VBA (VB6.x sampai VB7.x) disini
<https://msdn.microsoft.com/en-us/library/aa263420(v=vs.60).aspx>.
atau di VBA Editor -> tekan F1 -> ditextbox search ketik Data Type Summary
-> lakukan search
atau rangkumannya disini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-004-tipe-data-variabel.html>
.
Regards,
Kid
2017-04-05 15:24 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Salam BeExceller,
>
>
>
> Saya lihat di internet nilai Integer rangenya sbb. :
> https://msdn.microsoft.com/en-us/library/06bkb8w2.aspx
> Integer Data Type (Visual Basic)
>
> *Visual Studio 2015 *
>
> Other Versions
>
> [image:
> https://i-msdn.sec.s-msft.com/Areas/Epx/Content/Images/ImageSprite.png?v=636256477425040586]
>
> Updated: July 20, 2015
>
> For the latest documentation on Visual Studio 2017, see Visual Studio
> 2017 Documentation <http://docs.microsoft.com/visualstudio>.
>
> Holds signed 32-bit (4-byte) integers that range in value from *-2,147,483,
> through 2,147,483,647.
>
> Saya coba di excel 2010 untuk test dengan menuju baris terakhir di Excel
> dengan code sbb. :
>
> '=====
>
> Private Sub CommandButton5_
>
> *Dim x As Long*
>
> x = ActiveCell.End(
>
> MsgBox x
>
> End Sub
>
> '=====
>
> Hasilnya 1.048.576
>
> Tapi kalau saya ganti x dengan integer (*Dim x as integer*) ternyata
> hasilnya Error (Runtime error '6' over flow), kenapa ya ? Bukankah integer
> rangenya sampai 2,147,483,647 sesuai referensi dari Internet di atas ?.
>
> Mohon pencerahannya.
>
> Terima Kasih.
>
>
>
>
>
>
>
>
>
>
>
>
>
Wed Apr 5, 2017 2:14 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Tio,
Data type untuk VB/VBA (VB6.x sampai VB7.x) disini
<https://msdn.microsoft.com/en-us/library/aa263420(v=vs.60).aspx>.
atau di VBA Editor -> tekan F1 -> ditextbox search ketik Data Type Summary
-> lakukan search
atau rangkumannya disini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-004-tipe-data-variabel.html>
.
Regards,
Kid
2017-04-05 15:24 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Salam BeExceller,
>
>
>
> Saya lihat di internet nilai Integer rangenya sbb. :
> https://msdn.microsoft.com/en-us/library/06bkb8w2.aspx
> Integer Data Type (Visual Basic)
>
> *Visual Studio 2015 *
>
> Other Versions
>
> [image:
> https://i-msdn.sec.s-msft.com/Areas/Epx/Content/Images/ImageSprite.png?v=636256477425040586]
>
> Updated: July 20, 2015
>
> For the latest documentation on Visual Studio 2017, see Visual Studio
> 2017 Documentation <http://docs.microsoft.com/visualstudio>.
>
> Holds signed 32-bit (4-byte) integers that range in value from *-2,147,483,648
> through 2,147,483,647.*
>
> Saya coba di excel 2010 untuk test dengan menuju baris terakhir di Excel
> dengan code sbb. :
>
> '=====
>
> Private Sub CommandButton5_Click()
>
> *Dim x As Long*
>
> x = ActiveCell.End(xlDown).Row
>
> MsgBox x
>
> End Sub
>
> '=====
>
> Hasilnya 1.048.576
>
> Tapi kalau saya ganti x dengan integer (*Dim x as integer*) ternyata
> hasilnya Error (Runtime error '6' over flow), kenapa ya ? Bukankah integer
> rangenya sampai 2,147,483,647 sesuai referensi dari Internet di atas ?.
>
> Mohon pencerahannya.
>
> Terima Kasih.
>
>
>
>
>
>
>
>
>
>
>
>
>
Data type untuk VB/VBA (VB6.x sampai VB7.x) disini
<https://msdn.microsoft.com/en-us/library/aa263420(v=vs.60).aspx>.
atau di VBA Editor -> tekan F1 -> ditextbox search ketik Data Type Summary
-> lakukan search
atau rangkumannya disini
<http://b-excel.blogspot.co.id/2013/07/belajarvba-004-tipe-data-variabel.html>
.
Regards,
Kid
2017-04-05 15:24 GMT+07:00 Tio Adi Bayu Adjie tio.adjie@ptssb.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Salam BeExceller,
>
>
>
> Saya lihat di internet nilai Integer rangenya sbb. :
> https://msdn.microsoft.com/en-us/library/06bkb8w2.aspx
> Integer Data Type (Visual Basic)
>
> *Visual Studio 2015 *
>
> Other Versions
>
> [image:
> https://i-msdn.sec.s-msft.com/Areas/Epx/Content/Images/ImageSprite.png?v=636256477425040586]
>
> Updated: July 20, 2015
>
> For the latest documentation on Visual Studio 2017, see Visual Studio
> 2017 Documentation <http://docs.microsoft.com/visualstudio>.
>
> Holds signed 32-bit (4-byte) integers that range in value from *-2,147,483,
> through 2,147,483,647.
>
> Saya coba di excel 2010 untuk test dengan menuju baris terakhir di Excel
> dengan code sbb. :
>
> '=====
>
> Private Sub CommandButton5_
>
> *Dim x As Long*
>
> x = ActiveCell.End(
>
> MsgBox x
>
> End Sub
>
> '=====
>
> Hasilnya 1.048.576
>
> Tapi kalau saya ganti x dengan integer (*Dim x as integer*) ternyata
> hasilnya Error (Runtime error '6' over flow), kenapa ya ? Bukankah integer
> rangenya sampai 2,147,483,647 sesuai referensi dari Internet di atas ?.
>
> Mohon pencerahannya.
>
> Terima Kasih.
>
>
>
>
>
>
>
>
>
>
>
>
>
Wed Apr 5, 2017 5:42 am (PDT) . Posted by:
"Kusnadi Bin zain" kbinzain
Maaf mungkin kasus seperti ini sudah pernah dibahas.mohon pencerahan untuk mengambil data Desa, Kecamatan dan kabupaten dalam sebuah data text yang dibatasi dengan tanda koma
terima kasih
terima kasih
============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
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
---------------------------------------------------------------------
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
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