Kamis, 27 Juni 2013

[belajar-excel] Digest Number 2386

15 New Messages

Digest #2386
1b
Re: Bekerja dengan banyak sheets by "Mr. Kid" nmkid.family@ymail.com
1d
Re: Bekerja dengan banyak sheets by "Mr. Kid" nmkid.family@ymail.com
2a
Re: Kasus Tanpa IF Bertingkat by "Mr. Kid" nmkid.family@ymail.com
2b
Re: Kasus Tanpa IF Bertingkat by "Ferry Setiawan" ferry_2005_skom
2c
Re: Kasus Tanpa IF Bertingkat by "Mr. Kid" nmkid.family@ymail.com
3a
4a
4b
Re: padanan sumproduct yang lebih ringan by "Mr. Kid" nmkid.family@ymail.com
5a
6a
Re: Filter Data by "ChordJR" indra_gustian
7
VBA (error pada perbandingan nilai) by "lapendosol opik" lapendosol
8
BelajarVBA yuk... by "Mr. Kid" nmkid.family@ymail.com

Messages

Thu Jun 27, 2013 6:35 am (PDT) . Posted by:

"De Premor"

nyumbang ide terlampir

Rgds,
[dp]

On 27/06/2013 16:41, Mr. Kid wrote:
> Wa'alaikumussalam Wr. Wb.
>
> Pak Dede,
>
> Yang membuat error bukan Option Explicit-nya, tetapi typo di baris :
> applicationscreenupdating=false
> dan
> applicationscreenupdating=true
>
> yang seharusnya :
> application.screenupdating=false
> dan
> application.screenupdating=true
>
> Jadi Option Explicit tidak pernah berpengaruh hingga munculnya error
> suatu script.
> Jika Option Explicit dihilangkan, maka
> bunyi :
> applicationscreenupdating
> akan menjadi sebuah variabel bertipe Variant yang saat itu akan diisi
> FALSE atau TRUE akan membuat variant bertipe boolean
>
> Hal ini berbeda sama sekali dengan maksud diadakannya baris tersebut,
> yaitu :
> application.screenupdating=false
> dan
> application.screenupdating=true
> yang bertujuan menghindari proses refresh layar oleh Excel. Umumnya,
> dengan mencegah proses refresh layar ini, akan dapat mempercepat proses.
>
> Wassalamu'alaikum Wr. Wb.
> Kid.
>
>
>
>
>
>
>
> 2013/6/27 Dede Suparman <dede_suparman111@yahoo.com
> <mailto:dede_suparman111@yahoo.com>>
>
> Assalamu'alaikum Wr. Wb.
>
> Dear Bpk Hendrik, Para Master & Be_Excel,
> saya sudah mencoba nya (tapi kalau ada "Option Explicit" nya jadi
> ERR ya ?)
> sekarang saya mau membuat combobox yang list nya dari nama sheet.
> Bisakah list pada combobox flexibel mengikuti perubahan jumlah dan
> nama sheet ?
> file saya lampirkan terimakasih sebelum nya.
>
> Wassalam,
> Del
>
> ----------------------------------------------------------
> *Dari:* hendrik karnadi <hendrikkarnadi@yahoo.com
> <mailto:hendrikkarnadi@yahoo.com>>
> *Kepada:* "belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com>"
> <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com>>
> *Dikirim:* Kamis, 27 Juni 2013 14:31
> *Judul:* [belajar-excel] Bekerja dengan banyak sheets
>
> Rekan2 Be-Excel,
>
> Buat anda yang terpaksa harus bekerja dengan banyak sheets (lebih
> dari 50 sheets) dan menemukan kesulitan dalam mencari sheet yang
> diinginkan dengan cepat (dalam hitungan detik) sila mampir ke
> b-excel.blogspot.com <http://b-excel.blogspot.com> (blog Be-Excel).
>
> Salam,
> HK
>
>
>
>

Thu Jun 27, 2013 6:48 am (PDT) . Posted by:

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

Sedikit nyumbang,

Sebaiknya sebelum for each...next didahului dengan menghapus daftar yang
lama.

Wassalam,
Kid.

2013/6/27 De Premor <de@premor.net>

> **
>
>
> nyumbang ide terlampir
>
> Rgds,
> [dp]
>
>
> On 27/06/2013 16:41, Mr. Kid wrote:
>
>
> Wa'alaikumussalam Wr. Wb.
>
> Pak Dede,
>
> Yang membuat error bukan Option Explicit-nya, tetapi typo di baris :
> applicationscreenupdating=false
> dan
> applicationscreenupdating=true
>
> yang seharusnya :
> application.screenupdating=false
> dan
> application.screenupdating=true
>
> Jadi Option Explicit tidak pernah berpengaruh hingga munculnya error
> suatu script.
> Jika Option Explicit dihilangkan, maka
> bunyi :
> applicationscreenupdating
> akan menjadi sebuah variabel bertipe Variant yang saat itu akan diisi
> FALSE atau TRUE akan membuat variant bertipe boolean
>
> Hal ini berbeda sama sekali dengan maksud diadakannya baris tersebut,
> yaitu :
> application.screenupdating=false
> dan
> application.screenupdating=true
> yang bertujuan menghindari proses refresh layar oleh Excel. Umumnya,
> dengan mencegah proses refresh layar ini, akan dapat mempercepat proses.
>
> Wassalamu'alaikum Wr. Wb.
> Kid.
>
>
>
>
>
>
>
> 2013/6/27 Dede Suparman <dede_suparman111@yahoo.com>
>
>>
>> Assalamu'alaikum Wr. Wb.
>>
>> Dear Bpk Hendrik, Para Master & Be_Excel,
>> saya sudah mencoba nya (tapi kalau ada "Option Explicit" nya jadi ERR ya
>> ?)
>> sekarang saya mau membuat combobox yang list nya dari nama sheet.
>> Bisakah list pada combobox flexibel mengikuti perubahan jumlah dan nama
>> sheet ?
>> file saya lampirkan terimakasih sebelum nya.
>>
>> Wassalam,
>> Del
>>
>> ------------------------------
>> *Dari:* hendrik karnadi <hendrikkarnadi@yahoo.com>
>> *Kepada:* "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
>>
>> *Dikirim:* Kamis, 27 Juni 2013 14:31
>> *Judul:* [belajar-excel] Bekerja dengan banyak sheets
>>
>>
>> Rekan2 Be-Excel,
>>
>> Buat anda yang terpaksa harus bekerja dengan banyak sheets (lebih dari
>> 50 sheets) dan menemukan kesulitan dalam mencari sheet yang diinginkan
>> dengan cepat (dalam hitungan detik) sila mampir ke b-excel.blogspot.com(blog Be-Excel).
>>
>> Salam,
>> HK
>>
>>
>>
>
>
>

Thu Jun 27, 2013 8:22 am (PDT) . Posted by:

"De Premor"

Oh iya, tidak kepikiran kalau user menghapus sheet :-)

Thanks,
[dp]

Pada 27/06/2013 20:41, Mr. Kid menulis:
> Sedikit nyumbang,
>
> Sebaiknya sebelum for each...next didahului dengan menghapus daftar
> yang lama.
>
> Wassalam,
> Kid.
>
>
>
> 2013/6/27 De Premor <de@premor.net <mailto:de@premor.net>>
>
> nyumbang ide terlampir
>
> Rgds,
> [dp]
>
>
>
> On 27/06/2013 16:41, Mr. Kid wrote:
>> Wa'alaikumussalam Wr. Wb.
>>
>> Pak Dede,
>>
>> Yang membuat error bukan Option Explicit-nya, tetapi typo di baris :
>> applicationscreenupdating=false
>> dan
>> applicationscreenupdating=true
>>
>> yang seharusnya :
>> application.screenupdating=false
>> dan
>> application.screenupdating=true
>>
>> Jadi Option Explicit tidak pernah berpengaruh hingga munculnya
>> error suatu script.
>> Jika Option Explicit dihilangkan, maka
>> bunyi :
>> applicationscreenupdating
>> akan menjadi sebuah variabel bertipe Variant yang saat itu akan
>> diisi FALSE atau TRUE akan membuat variant bertipe boolean
>>
>> Hal ini berbeda sama sekali dengan maksud diadakannya baris
>> tersebut, yaitu :
>> application.screenupdating=false
>> dan
>> application.screenupdating=true
>> yang bertujuan menghindari proses refresh layar oleh Excel.
>> Umumnya, dengan mencegah proses refresh layar ini, akan dapat
>> mempercepat proses.
>>
>> Wassalamu'alaikum Wr. Wb.
>> Kid.
>>
>>
>>
>>
>>
>>
>>
>> 2013/6/27 Dede Suparman <dede_suparman111@yahoo.com
>> <mailto:dede_suparman111@yahoo.com>>
>>
>> Assalamu'alaikum Wr. Wb.
>>
>> Dear Bpk Hendrik, Para Master & Be_Excel,
>> saya sudah mencoba nya (tapi kalau ada "Option Explicit" nya
>> jadi ERR ya ?)
>> sekarang saya mau membuat combobox yang list nya dari nama
>> sheet. Bisakah list pada combobox flexibel mengikuti
>> perubahan jumlah dan nama sheet ?
>> file saya lampirkan terimakasih sebelum nya.
>>
>> Wassalam,
>> Del
>>
>> ----------------------------------------------------------
>> *Dari:* hendrik karnadi <hendrikkarnadi@yahoo.com
>> <mailto:hendrikkarnadi@yahoo.com>>
>> *Kepada:* "belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com>"
>> <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com>>
>> *Dikirim:* Kamis, 27 Juni 2013 14:31
>> *Judul:* [belajar-excel] Bekerja dengan banyak sheets
>>
>> Rekan2 Be-Excel,
>>
>> Buat anda yang terpaksa harus bekerja dengan banyak sheets
>> (lebih dari 50 sheets) dan menemukan kesulitan dalam mencari
>> sheet yang diinginkan dengan cepat (dalam hitungan detik)
>> sila mampir ke b-excel.blogspot.com
>> <http://b-excel.blogspot.com> (blog Be-Excel).
>>
>> Salam,
>> HK
>>
>>
>>
>
>
>

Thu Jun 27, 2013 10:56 am (PDT) . Posted by:

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

*Untuk No 1.
*
Jika ingin tetap ada variabel kriteria, maka perlu pendifinisian variabel
bernama kriteria tersebut.
Misal tipe datanya akan menampung data bertipe text, maka setelah baris
deklarasi nama prosedur berbunyi private sub blabla diberi baris :
dim Kriteria as string

Jika tidak ingin menggunakan variabel (dalam kasus ini, variabel bernama
kriteria bisa tidak diperlukan), maka baris yang dihapus adalah :
Kriteria = Range("A1").Value
dan baris yang diubah adalah baris :
Range("BOM").AutoFilter Field:=1, Criteria1:=*Kriteria*
menjadi :
Range("BOM").AutoFilter Field:=1, Criteria1:=*Range("A1").Value*

Jika data pada kolom pertama (field:=1) dari area range bernama 'BOM'
tersebut adalah bertipe string, sedangkan range A1 bisa jadi berisi nilai
bertipe numerik (misal ada nama sheet yang diberi nama 1234), maka
dibutuhkan pemaksaan tipe data agar menjadi string dengan fungsi CStr,
sehingga baris yang tadinya berbunyi (lihat di atas) :
Range("BOM").AutoFilter Field:=1, Criteria1:=*Range("A1").Value*
menjadi :
Range("BOM").AutoFilter Field:=1, Criteria1:=*CStr(Range("A1").Value)*

*Untuk Nomor 2.
*
Jika yang dimaksud adalah agar combobox memiliki area listfillrange sesuai
jumlah record datanya, coba tambahkan baris berikut ini tepat setelah baris
Next (sebaiknya Next diganti menjadi Next Sh) : [pastikan kolom B tidak
pernah terisi data apapun]
combobox1.listfillrange=vbnullstring
combobox1.listfillrange=range("a1").currentregion.address

Wassalam,
Kid.

2013/6/27 Dede Suparman <dede_suparman111@yahoo.com>

> **
>
>
> Dear Mr Kid & Bpk. Hendrik,
>
> woow ada dua master di sini hee. ooh jadi itu yaa, Option Explicit selama
> ini saya belajar macro
> menghiraukan nya..
>
> 1.ini saya pakai untuk filter tapi klo pakai Option Explicit jadi ERR
> Kriteria jadi "kuning"
> cara membuat deklarasinya bagaimana ? (maaf kan atas ketidak fahaman saya)
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> Application.ScreenUpdating = False
> If Target.Address = "$A$1" Then
> If ActiveSheet.FilterMode Then
> ActiveSheet.ShowAllData
> End If
> If Range("A1").Value = "" Then
> Exit Sub
> Else
> Kriteria = Range("A1").Value
> Range("BOM").AutoFilter Field:=1, Criteria1:=Kriteria
> End If
> End If
> Application.ScreenUpdating = True
> End Sub
>
> 2.pertanyaan kedua (maaf saya hanya bisa bertanya), menggunakan fungsi
> Offset untuk combobox seperti apa yaa??
> file nya saya lampirkan lagi,sekarang dengan Option Explicit..
> Terimakasih sebelumnya,
>
> Salam,
> Del
>
> ------------------------------
> *Dari:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *Kepada:* "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
> *Dikirim:* Kamis, 27 Juni 2013 17:28
> *Judul:* Re: [belajar-excel] Bekerja dengan banyak sheets
>
>
> Mr. Kid,
> Terima kasih atas koreksinya.
>
> Salam,
> HK
>
>
> ------------------------------
> *From:* Mr. Kid <mr.nmkid@gmail.com>
> *To:* BeExcel <belajar-excel@yahoogroups.com>
> *Sent:* Thursday, 27 June 2013, 16:41
> *Subject:* Re: [belajar-excel] Bekerja dengan banyak sheets
>
>
> Wa'alaikumussalam Wr. Wb.
>
> Pak Dede,
>
> Yang membuat error bukan Option Explicit-nya, tetapi typo di baris :
> applicationscreenupdating=false
> dan
> applicationscreenupdating=true
>
> yang seharusnya :
> application.screenupdating=false
> dan
> application.screenupdating=true
>
> Jadi Option Explicit tidak pernah berpengaruh hingga munculnya error
> suatu script.
> Jika Option Explicit dihilangkan, maka
> bunyi :
> applicationscreenupdating
> akan menjadi sebuah variabel bertipe Variant yang saat itu akan diisi
> FALSE atau TRUE akan membuat variant bertipe boolean
>
> Hal ini berbeda sama sekali dengan maksud diadakannya baris tersebut,
> yaitu :
> application.screenupdating=false
> dan
> application.screenupdating=true
> yang bertujuan menghindari proses refresh layar oleh Excel. Umumnya,
> dengan mencegah proses refresh layar ini, akan dapat mempercepat proses.
>
> Wassalamu'alaikum Wr. Wb.
> Kid.
>
>
>
>
>
>
>
> 2013/6/27 Dede Suparman <dede_suparman111@yahoo.com>
>
> **
>
> Assalamu'alaikum Wr. Wb.
>
> Dear Bpk Hendrik, Para Master & Be_Excel,
> saya sudah mencoba nya (tapi kalau ada "Option Explicit" nya jadi ERR ya ?)
> sekarang saya mau membuat combobox yang list nya dari nama sheet. Bisakah
> list pada combobox flexibel mengikuti perubahan jumlah dan nama sheet ?
> file saya lampirkan terimakasih sebelum nya.
>
> Wassalam,
> Del
>
> ------------------------------
> *Dari:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *Kepada:* "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
> *Dikirim:* Kamis, 27 Juni 2013 14:31
> *Judul:* [belajar-excel] Bekerja dengan banyak sheets
>
>
> Rekan2 Be-Excel,
>
> Buat anda yang terpaksa harus bekerja dengan banyak sheets (lebih dari 50
> sheets) dan menemukan kesulitan dalam mencari sheet yang diinginkan dengan
> cepat (dalam hitungan detik) sila mampir ke b-excel.blogspot.com (blog
> Be-Excel).
>
> Salam,
> HK
>
>
>
>
>
>
>
>
>

Thu Jun 27, 2013 6:37 am (PDT) . Posted by:

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

Lupa,

Data induk sort ascending berdasar kolom Start (kolom A).
Formula di cell hasil (H3)
="AREA
"&LOOKUP(F3+0.1,$A$3:$A$47,$C$3:$C$47)&IF(LOOKUP(G3+0.1,$A$3:$A$47)=LOOKUP(F3,$A$3:$A$47),"","
- "&LOOKUP(G3+0.1,$A$3:$A$47,$C$3:$C$47))
lalu copy ke bawah.

Jika regional setting komputer setempat adalah Indonesia, ganti seluruh
karakter koma menjadi karakter titik koma.

Wassalam,
Kid.

2013/6/27 Mr. Kid <mr.nmkid@gmail.com>

> Coba formula :
> ="AREA
> "&LOOKUP(F3+0.1,$A$3:$A$47,$C$3:$C$47)&IF(LOOKUP(G3+0.1,$A$3:$A$47)=LOOKUP(F3,$A$3:$A$47),"","
> - "&LOOKUP(G3+0.1,$A$3:$A$47,$C$3:$C$47))
>
> Wassalam,
> Kid.
>
>
>
> 2013/6/27 Zerlinda Seismica <seismica@yahoo.com>
>
>> **
>>
>>
>> Salam excel
>>
>> Buka group langsung mau repotin sesepuh nih.
>> Saya ga bisa cara lain selain menggunakan IF, tapi IF hanya bisa sampai
>> 7/8 kriteria..mohon dikoreksi..
>>
>> Wasalam
>> Seismica
>>
>>
>>
>
>

Thu Jun 27, 2013 7:06 am (PDT) . Posted by:

"Ferry Setiawan" ferry_2005_skom

Sorry kelupaan, Input formula ini di kolom H3, kemudian copykan kebawah
hingga row terakhir

Thanks
Ferry

Pada 27 Juni 2013 17.05, Ferry Setiawan <fset2006@gmail.com> menulis:

> Hi Seismica,
>
> Saya coba bantu barangkali berhasil
> Silahkan gunakan formula berikut ini
>
> =IF(SUMIFS($C$3:$C$47,$A$3:$A$47,"<="&F3,$B$3:$B$47,">="&F3)=SUMIFS($C$3:$C$47,$A$3:$A$47,"<="&G3,$B$3:$B$47,">="&G3),"AREA
> "&SUMIFS($C$3:$C$47,$A$3:$A$47,"<="&F3,$B$3:$B$47,">="&F3),"AREA
> "&SUMIFS($C$3:$C$47,$A$3:$A$47,"<="&F3,$B$3:$B$47,">="&F3)&" -
> "&SUMIFS($C$3:$C$47,$A$3:$A$47,"<="&G3,$B$3:$B$47,">="&G3))
>
> Logikanya adalah bandingkan dulu apakah hasil dari sumifs pertama sama
> dengan yang kedua, jika sama maka cukup ditulis salah satu saja, jika tidak
> sama maka ditulis dua duanya
>
> Thanks
> Ferry
>
> Pada 27 Juni 2013 16.05, Zerlinda Seismica <seismica@yahoo.com> menulis:
>
> **
>>
>>
>> Salam excel
>>
>> Buka group langsung mau repotin sesepuh nih.
>> Saya ga bisa cara lain selain menggunakan IF, tapi IF hanya bisa sampai
>> 7/8 kriteria..mohon dikoreksi..
>>
>> Wasalam
>> Seismica
>>
>>
>>
>
>

Thu Jun 27, 2013 10:10 am (PDT) . Posted by:

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

Coba formula :
="AREA
"&LOOKUP(F3+0.1,$A$3:$A$47,$C$3:$C$47)&IF(LOOKUP(G3+0.1,$A$3:$A$47)=LOOKUP(F3,$A$3:$A$47),"","
- "&LOOKUP(G3+0.1,$A$3:$A$47,$C$3:$C$47))

Wassalam,
Kid.

2013/6/27 Zerlinda Seismica <seismica@yahoo.com>

> **
>
>
> Salam excel
>
> Buka group langsung mau repotin sesepuh nih.
> Saya ga bisa cara lain selain menggunakan IF, tapi IF hanya bisa sampai
> 7/8 kriteria..mohon dikoreksi..
>
> Wasalam
> Seismica
>
>
>

Thu Jun 27, 2013 6:46 am (PDT) . Posted by:

"Dede Suparman" dede_suparman111

Dear Mr Kid & Bpk. Hendrik,

woow ada dua master di sini hee. ooh jadi itu yaa, Option Explicit selama ini saya belajar macro
menghiraukan nya..

1.ini saya pakai untuk filter tapi klo pakai Option Explicit  jadi ERR Kriteria jadi "kuning" 
cara membuat deklarasinya bagaimana ? (maaf kan atas ketidak fahaman saya)

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Target.Address = "$A$1" Then
If ActiveSheet.FilterMode Then
ActiveSheet.ShowAllData
End If
If Range("A1").Value = "" Then
Exit Sub
Else
Kriteria = Range("A1").Value
Range("BOM").AutoFilter Field:=1, Criteria1:=Kriteria
End If
End If
Application.ScreenUpdating = True
End Sub

2.pertanyaan kedua (maaf saya hanya bisa bertanya), menggunakan fungsi Offset untuk combobox seperti apa yaa??
file nya saya lampirkan lagi,sekarang dengan Option Explicit..

Terimakasih
salam,
Del

________________________________
Dari: hendrik karnadi <hendrikkarnadi@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Kamis, 27 Juni 2013 16:53
Judul: Re: Bls: [belajar-excel] Bekerja dengan banyak sheets


 

Hi Dede,
Option Explicit memang bertujuan untuk mengontrol apakah ada Variable yang belum dideklarasikan. Jika ada yang belum dideklarasikan maka akan muncul Error.

Manfaatnya adalah untuk mencegah kesalahan penulisan Variabel dalam penulisan macro selanjutnya.

Jika sumber ComboBox adalah nama-nama sheet yang ada dalam Daftar maka, agar fleksibel, nama range tersebut (range yang mengandung nama-nama sheet) harus dibuat fleksibel pula dengan menggunakan fungsi Offset.

Salam,
HK

________________________________
From: Dede Suparman <dede_suparman111@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Thursday, 27 June 2013, 16:31
Subject: Bls: [belajar-excel] Bekerja dengan banyak sheets


 
Assalamu'alaikum Wr. Wb.

Dear Bpk Hendrik, Para Master & Be_Excel,
saya sudah mencoba nya (tapi kalau ada "Option Explicit" nya jadi ERR ya ?)
sekarang saya mau membuat combobox yang list nya dari nama sheet. Bisakah list pada combobox flexibel mengikuti perubahan jumlah dan nama sheet ?
file saya lampirkan terimakasih sebelum nya.

Wassalam,
Del

________________________________
Dari: hendrik karnadi <hendrikkarnadi@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Kamis, 27 Juni 2013 14:31
Judul: [belajar-excel] Bekerja dengan banyak sheets


 
Rekan2 Be-Excel,

Buat anda yang terpaksa harus bekerja dengan banyak sheets (lebih dari 50 sheets) dan menemukan kesulitan dalam mencari sheet yang diinginkan dengan cepat (dalam hitungan detik) sila mampir ke b-excel.blogspot.com (blog Be-Excel).

Salam,
HK

Thu Jun 27, 2013 6:52 am (PDT) . Posted by:

"mardi" hekerkampoeng

Terima kasih Mr
Ketiga cara belum aku coba bandingkan cuma saya cenderung modif cara 3 dengan cara pivotnya yang di fliter blok hasil grand total di pivot dan copy lalu paste di sheet output. Dengan kerja manual sedikit tapi lebih efisien waktu. Apakah cara ini bisa direkomendasikan, atau ada kemungkinan tercopynya baris pivot yang terhide karena filter ? Mohon pencerahan lagi Mr...

Wassalam
mardi

From: Mr. Kid
Sent: Wednesday, June 26, 2013 11:34 PM
To: BeExcel
Subject: Re: [belajar-excel] padanan sumproduct yang lebih ringan

Coba file terlampir yang mencoba dengan 3 cara, yaitu :

1. Formula vlookup terhadap pivot table

2. Formula SumIF terhadap raw data

3. Kolom filter pembentuk filter data untuk pivot table

Semoga ada salah satu yang sesuai harapan.

Mohon dikabari, cara mana yang tercepat untuk data yang buanyak (at least 200K records)

Wassalam,

Kid.

2013/6/26 mardi <sumardiana596@gmail.com>

Sebenernya masih kasus yang dulu Mr, sumproduct dari sebuah pivot. Dan saya harus mengambil data sebagiannya saja tanpa harus centang dan uncentang filter pivot karena miripnya data dan banyak shg memakan waktu lama juga. File terlampir.
Terima kasih
mardi

From: Mr. Kid
Sent: Wednesday, June 26, 2013 8:56 PM
To: BeExcel
Subject: Re: [belajar-excel] padanan sumproduct yang lebih ringan

Wa'alaikumussalam Wr. Wb.

Dengan mengetahui bentuk data yang diolah akan relatif lebih bisa tepat memutuskan ada atau tidaknya formula yang lebih efisien dibanding SumProduct yang ada. Pada dasarnya, fungsi SumIFs pada Excel 2007 ke atas lebih efisien dibanding SumProduct, tetapi penggunaannya tidak serta merta akan pasti bisa menggantikan fungsi SumProduct pada kasus-kasus tertentu.

Beberapa baris contoh data, yang mewakili selengkap mungkin varian data yang ada, yang dilampirkan ke milis akan mempermudah usaha BeExceller untuk mencari ide solusi yang lebih efisien. Bisa jadi fitur Excel seperti Pivot Table dapat menjadi solusi yang efisien.

Wassalamu'alaikum Wr. Wb.
Kid.

2013/6/26 mardi <sumardiana596@gmail.com>

Assalamu�alaikum,

Dear all master dan be excel, Selamat kepada belajar excel atas terlaksana dan suksenya kopdar #1 , maaf kemarin tidak bisa hadir krn masih harus nguli. Melihat uforia kopdar kemarin jadi timbul lagi nih semangat belajarku....he..he..( dasarnya pamalas ). Perkenankan saya bertanya di sini apakah ada formula layaknya sumproduct yang lebih ringan kalkulasinya, mungkin memang terlalu dipaksakan sih karena banyaknya record shg buat kerja excel berat. Barangkali dan mudah-mudahan ada. Atau mungkin ada solusi lain dari rekan sekalian. Sebelumnya terima kasih.

Wassalamu�alaikum,
mardi

Thu Jun 27, 2013 10:14 am (PDT) . Posted by:

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

Kalau memang pivot table menjadi helper table, mungkin sebaiknya ndak perlu
di-hide.
Jika grand total tidak dibutuhkan, maka atur options pivot table agar tidak
menampilkan grand total disisi row dan column.
Kemudian, Pak Mardi bisa sekalian belajar VBA dengan membuat sebuah tombol
yang harus dipencet setelah update daftar filter.
Proses dalam tombol tersebut :
1. set kalkulasi Excel pasti jadi automatic
2. refresh pivot table
3. hapus area output yang lama
4. blok area pivot table yang dicopy (manfaatkan properti TableRange1 [yang
tanpa pivot page fields]), kemudian offset 1 kolom dan copy
5. paste values ke area output

Wassalam,
Kid.

2013/6/27 mardi <sumardiana596@gmail.com>

> Terima kasih Mr
> Ketiga cara belum aku coba bandingkan cuma saya cenderung modif cara 3
> dengan cara pivotnya yang di fliter blok hasil grand total di pivot dan
> copy lalu paste di sheet output. Dengan kerja manual sedikit tapi lebih
> efisien waktu. Apakah cara ini bisa direkomendasikan, atau ada kemungkinan
> tercopynya baris pivot yang terhide karena filter ? Mohon pencerahan lagi
> Mr...
>
> Wassalam
> mardi
>
> *From:* Mr. Kid <mr.nmkid@gmail.com>
> *Sent:* Wednesday, June 26, 2013 11:34 PM
> *To:* BeExcel <belajar-excel@yahoogroups.com>
> *Subject:* Re: [belajar-excel] padanan sumproduct yang lebih ringan
>
> Coba file terlampir yang mencoba dengan 3 cara, yaitu :
> 1. Formula vlookup terhadap pivot table
> 2. Formula SumIF terhadap raw data
> 3. Kolom filter pembentuk filter data untuk pivot table
>
> Semoga ada salah satu yang sesuai harapan.
> Mohon dikabari, cara mana yang tercepat untuk data yang buanyak (at least
> 200K records)
>
> Wassalam,
> Kid.
>
>
>
> 2013/6/26 mardi <sumardiana596@gmail.com>
>
>> Sebenernya masih kasus yang dulu Mr, sumproduct dari sebuah pivot. Dan
>> saya harus mengambil data sebagiannya saja tanpa harus centang dan
>> uncentang filter pivot karena miripnya data dan banyak shg memakan waktu
>> lama juga. File terlampir.
>> Terima kasih
>> mardi
>>
>> *From:* Mr. Kid <mr.nmkid@gmail.com>
>> *Sent:* Wednesday, June 26, 2013 8:56 PM
>> *To:* BeExcel <belajar-excel@yahoogroups.com>
>> *Subject:* Re: [belajar-excel] padanan sumproduct yang lebih ringan
>>
>>
>> Wa'alaikumussalam Wr. Wb.
>>
>> Dengan mengetahui bentuk data yang diolah akan relatif lebih bisa tepat
>> memutuskan ada atau tidaknya formula yang lebih efisien dibanding
>> SumProduct yang ada. Pada dasarnya, fungsi SumIFs pada Excel 2007 ke atas
>> lebih efisien dibanding SumProduct, tetapi penggunaannya tidak serta merta
>> akan pasti bisa menggantikan fungsi SumProduct pada kasus-kasus tertentu.
>>
>> Beberapa baris contoh data, yang mewakili selengkap mungkin varian data
>> yang ada, yang dilampirkan ke milis akan mempermudah usaha BeExceller untuk
>> mencari ide solusi yang lebih efisien. Bisa jadi fitur Excel seperti Pivot
>> Table dapat menjadi solusi yang efisien.
>>
>> Wassalamu'alaikum Wr. Wb.
>> Kid.
>>
>>
>>
>>
>> 2013/6/26 mardi <sumardiana596@gmail.com>
>>
>>> **
>>>
>>> Assalamu�alaikum,
>>>
>>> Dear all master dan be excel, Selamat kepada belajar excel atas
>>> terlaksana dan suksenya kopdar #1 , maaf kemarin tidak bisa hadir krn masih
>>> harus nguli. Melihat uforia kopdar kemarin jadi timbul lagi nih semangat
>>> belajarku....he..he..( dasarnya pamalas [image: Smile]). Perkenankan
>>> saya bertanya di sini apakah ada formula layaknya sumproduct yang lebih
>>> ringan kalkulasinya, mungkin memang terlalu dipaksakan sih karena banyaknya
>>> record shg buat kerja excel berat. Barangkali dan mudah-mudahan ada. Atau
>>> mungkin ada solusi lain dari rekan sekalian. Sebelumnya terima kasih.
>>>
>>> Wassalamu�alaikum,
>>> mardi
>>>
>>
>>
>
>

Thu Jun 27, 2013 10:17 am (PDT) . Posted by:

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

Coba ganti karakter ' menjadi '' (2 bijik ' dan bukan petik dua ")

Misal ada variabel koneksi bernama con dan telah terkoneksi ke server data
ke sebuah database tertentu.
Kemudian nama tabel yang yang akan di-insert data bernama myTable dengan
nama kolom myKolom, scriptnya :
con.execute "INSERT INTO myTable (myKolom) VALUES '" &
replace$(range("a1").value,"'","&#39;'") & "'"

Wassalam,
Kid.

2013/6/27 Rahmat Hermawan <ione_1984@yahoo.com>

> **
>
>
>
> Selamat Malam BeExceler...
>
> Mau tanya lagi yak..
>
> gimana ya caranya untuk input cell yang nilai di dalamnya terdapat
> karakter ( ' ), misalnya di cell A1 berisi "Erfan&#39;s studio", pada saat klik
> tombol simpan (menyimpan isi cell ke database mysql), selalu error.
>
> Terimakasih....
>
>
>

Thu Jun 27, 2013 11:14 am (PDT) . Posted by:

"De Premor"

Coba dibuat sebaris code yang fungsinya untuk meng-escape tanda petik
tersebut, kalau diphp ada fungsinya mysql_real_escape

misal :
sql_query = Replace(sql_query, "'", "\&#39;")

Rgds,
[dp]

Pada 27/06/2013 19:46, Rahmat Hermawan menulis:
>
> Selamat Malam BeExceler...
>
> Mau tanya lagi yak..
>
> gimana ya caranya untuk input cell yang nilai di dalamnya terdapat
> karakter ( ' ), misalnya di cell A1 berisi "Erfan&#39;s studio", pada saat
> klik tombol simpan (menyimpan isi cell ke database mysql), selalu error.
>
> Terimakasih....
>

Thu Jun 27, 2013 10:35 am (PDT) . Posted by:

"ChordJR" indra_gustian

Maaf Min & Mod, menyingkapi kasus pada topik ini, sapatau ada yang
pernah mengalami seperti saya...Ini contoh perbandingan ada atau tidak
nya data pada kolom B dan kolom D (Rekonsiliasi)

Cth:
Bagaimana pula bila tidak berlaku untuk data ke-3 dan ke-4
Padahal yang bernilai 15.000 hanya 2 saja�???
File saya lampirkan...contoh kasus pada yang bewarna...

Salam,

Indra

On 6/26/2013 1:19 PM, Mr. Kid wrote:
> Coba di E2 diisi formula :
> =IFERROR(MATCH(D2,$B$2:$B$231,0),0)
> lalu klik kanan -> format cells -> tab number -> custom -> isi di
> textbox :
> "YA";;"TIDAK&quot;
> copy ke seluruh baris data.
>
> Lakukan auto filter.
>
> Wassalam,
> Kid.
>
>
>
>
>
> 2013/6/26 Eko Noviyanto <eko_ny77@yahoo.co.id
> <mailto:eko_ny77@yahoo.co.id>>
>
> Dear all,
>
> Tolong dibantu untuk mengfilter data dari dua kolom yang terdiri
> dari banyak baris.
>
> Terima kasih saya ucapkan atas bantuannya.
>
> Salam,
> Nopenk
>
>
>

Thu Jun 27, 2013 11:08 am (PDT) . Posted by:

"lapendosol opik" lapendosol

Dear Be-Excel,
Saya memiliki script dimana fungsinya untuk membandingkan nilai/angka pada jumlah pembelian dengan stok barang, tapi punya kendala. Misal stok barang ada 30, ketika txtJumlahBeli diisi angka 4 malah msgboxnya, sedangkan kalo di isi angka 123 tidak muncul msgboxnya. Kayanya lblStok.Caption nya hanya terbaca angka depannya saja. Jika stoknya berubah jadi 71 tetep sama, txtJumlahBeli diisi angka 8 keluar msgbox, diisi angka 2344 malah tidak muncul.
1. Mohon bantuannya untuk memperbaiki script saya yg salah ini
2. (pertanyaan bonus) Gimana caranya agar txtJumlahBeli.Text hanya bisa diisi dengan Numeric saja
Lebih jelasnya lihat file terlampir.

Private Sub txtJumlahBeli_Change()
If lblHarga.Caption = 0 Then
MsgBox "Tentukan barang terlebih dahulu"
txtKodeBarang.SetFocus
txtJumlahBeli.Text = vbNullString
ElseIf txtJumlahBeli.Text > lblStok.Caption Then
MsgBox "Jumlah pembelian melebihi stok barang"
txtJumlahBeli.Text = ""
txtJumlahBeli.SetFocus
ElseIf txtJumlahBeli.Text = "" Then
lblTotalHarga.Caption = ""
Else
lblTotalHarga = lblHarga.Caption * txtJumlahBeli.Text
End If
End Sub

Sebelum dan sesudahnya saya ucapkan banyak terimakasih
Wassalam,

Thu Jun 27, 2013 11:45 am (PDT) . Posted by:

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

Bismillah

Assalamu'alaikum Wr. Wb.

Dear BeExceller,

e... :( speechless dah...

gini aja, berdoa dulu kemudian....
:) xixixixi... coba lihat aja
sendiri...<http://b-excel.blogspot.com/2013/06/belajarvba-000-kenalan.html>

Moga-moga nanti bisa berkelanjutan ya...
Tapi kita mulai dari dummiest n konservatif aja ya,
yang gampang nulisnya...
maklum, orang baru,
sungkan sama yang udah hariannya ngubek-ubek VBA.

Yang udah pada pinter, sempetkanlah melihat-lihat kesana, supaya bisa
mengoreksi segala sesuatu yang salah yang ada disana dengan segera.

Mohon diingatkan ya kalau ndak muncul tulisan baru yang terlalu lama (3
bulan misalnya) wakakaka...

yuk belajar vba perlahan-lahan, supaya ndak puyeng apalagi sampai
menganggap vba itu susah. Kalo memang VBA itu susah, Kid juga bakalan gak
bisa kali... ;)

Wassalamu'alaikum Wr. Wb.
Kid.
GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================

---------------------------------------------------------------------
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