Jumat, 27 Januari 2012

[belajar-excel] Digest Number 1491

Messages In This Digest (17 Messages)

Messages

1a.

Re: Combine Data dan Sorting

Posted by: "i Haps" hapsari.stlizbeth@gmail.com   liz_indri_haps

Thu Jan 26, 2012 4:28 pm (PST)



Betul apa kata Ki Ageng Semprul !
Menggabng bersyarat sudah ada yg berexperiment dan menghasilkan berita
menyedihkan

Ingin tahu sengsaranya menggabung bersyarat tanpa dibantu makro ?
Ada! di Workbook terlampir

Pekerjaan diselesaikan dengan 2 tahap

*Tahap 1 *
Array Formula Multi Hasil ( di G3:N3 ), yg menghasilkan data-data sesuai
syarat;
tetapi tiap SATU data tertulis di SATU cell (belum tergabung)

=TRANSPOSE(IFERROR(INDEX($B$3:$B$10,
SMALL(IF($A$3:$A$10=F3,ROW($1:$8)),ROW($1:$8))),""))
banyaknya Cell(kolom) tempat ditulisnya formula tsb = sebanyak Data-Unique
tabel yg dirujuk,

*Tahap 2*
Hasil cell-sell sebaris (G3:N3) di tahap 1 digabung menjadi 1 cell ( P3 )
dengan formula
seperti ini

=G3& IF(H3<>"", "," & H3, "") &
IF(I3<>"", "," & I3, "") & IF(J3<>"", "," & J3, "") &
IF(K3<>"", "," & K3, "") & IF(L3<>"", "," & L3, "") &
IF(M3<>"", "," & M3, "") & IF(N3<>"", "," & N3, "")

Setelah meringis bangga merasa berhasil mengerjakan hal spt ini tanpa
bantuan makro,
sekarang saatnya anda bayangkan bgmana kalau data di tabel referrensi
berisi 300 ROWs
tidak perlu seribu, tiga ratus rows saja !)

- i -

2012/1/26 Ki Semprul <semprul.ki@gmail.com>
>
> pakailah fungsi *ConcatIf *( pinjaman dari *boss siti *)
> (singkatan dari ConcatenateIf; = penggabunan bersyarat )
>
> =ConcatIf($A$2:$A$9,F2,$B$2:$B$9)
>
> kalau sempat dan berkenan lihatlah posting lawas di toko sebelah:
> ini link-nya http://tech.groups.yahoo.com/group/XL-mania/message/13436
> sudah saya mintaken ijin dari penulisnya: lampirannya posting tsb masih
> dapat diunduh di sini
> http://www.box.com/s/g42pi327ox1ta169ezfl
>
>
> *2012/1/26 Arie Bowo Witjaksono <arie_b_w@yahoo.com>
> *
>>
>> * *
>> *Dear Para Pakar Excel,*
>> *Mohon solusinya untuk penggabungan sorting dan concatenate seperti
>> terlampir. terima kasih.*
>> *Regards,*
>> *Arie*
>>
>
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1b.

Re: Combine Data dan Sorting

Posted by: "Mulki" mulki@aop.component.astra.co.id   mulki_akbar

Thu Jan 26, 2012 8:31 pm (PST)



ki semprul, niubi minta pencerahan :)

ini sebenarnya cm menggunakan formula concatif atau harus dibuatkan jg macronya seperti yg ada dlm file ?

thx & wassalam,
mulki

----- Original Message -----
From: Ki Semprul
To: belajar-excel@yahoogroups.com
Sent: Thursday, January 26, 2012 7:18 PM
Subject: Re: [belajar-excel] Combine Data dan Sorting

pakailah fungsi ConcatIf ( pinjaman dari boss siti )

(singkatan dari ConcatenateIf; = penggabunan bersyarat )

=ConcatIf($A$2:$A$9,F2,$B$2:$B$9)

kalau sempat dan berkenan lihatlah posting lawas di toko sebelah:
ini link-nya http://tech.groups.yahoo.com/group/XL-mania/message/13436

sudah saya mintaken ijin dari penulisnya: lampirannya posting tsb masih
dapat diunduh di sini
http://www.box.com/s/g42pi327ox1ta169ezfl

2012/1/26 Arie Bowo Witjaksono <arie_b_w@yahoo.com>

Dear Para Pakar Excel,
Mohon solusinya untuk penggabungan sorting dan concatenate seperti terlampir. terima kasih.
Regards,
Arie

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1c.

Re: Combine Data dan Sorting

Posted by: "Arie Bowo Witjaksono" arie_b_w@yahoo.com   arie_b_w

Thu Jan 26, 2012 8:32 pm (PST)



Dear Pakar Excel,
 
    Terima kasih atas pencerahannya. Sepertinya saya akan prefer menggunakan ConcatIf, karena penjelasan dari bu Hapsari sangat masuk akal dan data yang akan saya olah memang ratusan Row..... Untuk Ki Ageng Semprul terima kasih atas ConcatIf-nya...
 
Regards,
 
Arie

--- On Thu, 1/26/12, i Haps <hapsari.stlizbeth@gmail.com> wrote:

From: i Haps <hapsari.stlizbeth@gmail.com>
Subject: Re: [belajar-excel] Combine Data dan Sorting
To: belajar-excel@yahoogroups.com
Date: Thursday, January 26, 2012, 6:27 PM

 

Betul apa kata Ki Ageng Semprul !
Menggabng bersyarat sudah ada yg berexperiment dan menghasilkan berita menyedihkan

Ingin tahu sengsaranya menggabung bersyarat tanpa dibantu makro ?
Ada!  di Workbook terlampir

Pekerjaan diselesaikan dengan 2 tahap

Tahap 1 
Array Formula Multi Hasil ( di G3:N3 ), yg menghasilkan data-data sesuai syarat; 
tetapi tiap SATU data tertulis di SATU cell (belum tergabung)  

=TRANSPOSE(IFERROR(INDEX($B$3:$B$10,
 SMALL(IF($A$3:$A$10=F3,ROW($1:$8)),ROW($1:$8))),""))
banyaknya Cell(kolom) tempat ditulisnya formula tsb = sebanyak Data-Unique tabel yg dirujuk, 

Tahap 2
Hasil cell-sell sebaris (G3:N3) di tahap 1 digabung menjadi 1 cell ( P3 ) dengan formula
seperti ini

=G3& IF(H3<>"", "," & H3, "") & 
     IF(I3<>"", "," & I3, "") & IF(J3<>"", "," & J3, "") &
     IF(K3<>"", "," & K3, "") & IF(L3<>"", "," & L3, "") &
     IF(M3<>"", "," & M3, "") & IF(N3<>"", "," & N3, "")

Setelah meringis bangga merasa berhasil mengerjakan hal spt ini tanpa bantuan makro, 
sekarang saatnya anda bayangkan bgmana kalau data di tabel referrensi berisi 300 ROWs
tidak perlu seribu, tiga ratus rows saja !)

- i - 

2012/1/26 Ki Semprul <semprul.ki@gmail.com> 

pakailah fungsi ConcatIf ( pinjaman dari boss siti )
(singkatan dari ConcatenateIf; = penggabunan bersyarat )

=ConcatIf($A$2:$A$9,F2,$B$2:$B$9)

kalau sempat dan berkenan lihatlah posting lawas di toko sebelah:
ini link-nya   http://tech.groups.yahoo.com/group/XL-mania/message/13436 
sudah saya mintaken ijin dari penulisnya: lampirannya posting tsb  masih 
dapat diunduh di sini
http://www.box.com/s/g42pi327ox1ta169ezfl

2012/1/26 Arie Bowo Witjaksono <arie_b_w@yahoo.com>

Dear Para Pakar Excel,
Mohon solusinya untuk penggabungan sorting dan concatenate seperti terlampir. terima kasih.
Regards,
Arie

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1d.

Re: Combine Data dan Sorting

Posted by: "i Haps" hapsari.stlizbeth@gmail.com   liz_indri_haps

Thu Jan 26, 2012 11:35 pm (PST)



Tegasnya :
FUNGSI ConcatIf itu adalah sebuah UDF (User Defined Function) =
fungsi buatan sendiri / custom fungtion

Fungsi buatan sendiri dibuat dengan bantuan pemrograman VBA Excel
menyebabkan workboooknya pasti bermakro

Jadi: makro bekerja (otomatis) ketika FUNGSI ditulis di cel dan di enter
dan bekerja lagi (otomatis) setiap excel melakukan Re Calculate

Sudah pernah dengar UDF TERBILANG ??
Nah dia itu SODARA-nya di UDF ConcatIf !!!

Kalau UDF akan sering terpakai bisa dijadikan AddIn agar tidak semua
workbook anda bermakro

2012/1/27 Mulki <mulki@aop.component.astra.co.id>

> **
> ki semprul, niubi minta pencerahan :)
> ini sebenarnya cm menggunakan formula concatif atau harus dibuatkan jg
> macronya seperti yg ada dlm file ?
>
> thx & wassalam,
> mulki
>
>
>
> ----- Original Message -----
> *From:* Ki Semprul <semprul.ki@gmail.com>
> *Sent:* Thursday, January 26, 2012 7:18 PM
> *
> *
>
> pakailah fungsi *ConcatIf *( pinjaman dari *boss siti *)
> (singkatan dari ConcatenateIf; = penggabunan bersyarat )
>
> =ConcatIf($A$2:$A$9,F2,$B$2:$B$9)
>
> kalau sempat dan berkenan lihatlah posting lawas di toko sebelah:
> ini link-nya http://tech.groups.yahoo.com/group/XL-mania/message/13436
>
> sudah saya mintaken ijin dari penulisnya: lampirannya posting tsb masih
> dapat diunduh di sini
> http://www.box.com/s/g42pi327ox1ta169ezfl
>
>
>
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
2a.

How to be a Master in Excel (menggunakan Excel secara maksimal)

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

Thu Jan 26, 2012 6:50 pm (PST)



Menanggapi pertanyaan Pak Guru, saya ingin berbagi pengalaman (walaupun masih jauh dari Master) bagaimana saya mencoba menggunakan Excel secara maksimal.
- Rajin membaca buku, searching internet, diskusi dengan para Master (termasuk yang ada dalam milis ini)
- Menyerap intisari dari apa yang kita pelajari dan membuat pola untuk penyelesaian masalah
- Buat berbagai kombinasi masalah dan curahkan semua pengetahuan yang kita miliki baik mengenai Menu, Formula (termasuk Mega Formula), PivotTable maupun Macro.
- Latihan secara terus menerus, jika mentok cari solusinya di internet atau diskusikan di milis ini atau dengan teman sesama pengguna Excel.

Mengenai formula yang dibahas dalam buku memang pada umumnya hanya berupa formula2 dasar karena biasanya penulis tidak punya "stock masalah".

Hitung punya hitung, kayaknya untuk menjadi Master perlu waktu tidak kurang dari 5 tahun...

Salam,
Hendrik Karnadi

kutipan dari pertanyaan Pak Guru
Mengenai buku yang sempat disinggung oleh Pak Seno, sudah cukup banyak buku yg saya baca. Tetapi buku-buku itu hanya menyajikan formula-formula yg "lurus-lurus" saja. Artinya buku-buku tersebut hanya menyajikan penggunaan rumus-rumus dasar. Tidak membahas bagaimana mengkombinasikan suatu formula dengan formula lain untuk untuk memecahkan suatu masalah. 

Sebenarnya yg ingin saya ketahui adalah bagaimana para MASTER EXCEL ini belajar sehingga dia bisa menjadi seperti sekarang ini. Atau paling tidak buku apa yang telah 'mengubah kehidupan ber-excel' mereka-dari pengguna biasa menjadi MASTER EXCEL yg LUAR BIASA.
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
2b.

Re: How to be a Master in Excel (menggunakan Excel secara maksimal)

Posted by: "jkssxls Sudarsono" jkssxls@hotmail.com   jkssbma

Thu Jan 26, 2012 7:06 pm (PST)




Seperti Pak Hendrik , katakan saya juga masih jauh dikatakan sebagai master. Tetapi seperti umumnya dalam hal mempelajari sesuatu :1. Pemahami sesuatu ( function, macro, property, method , dsb ) secara detail , dengan menguji coba dengan beberapa kondisi dan kasus2. Penerapan apa yang dipelajari dalam kerja3. ikut membantu penyelesaian kasus di milisDengan berjalannya waktu dan proses belajar maka tiba2 anda disebut master oleh orang lain ( walaupun kemampuan belum dapat disebut master )
To: belajar-excel@yahoogroups.com
From: hendrikkarnadi@yahoo.com
Date: Thu, 26 Jan 2012 18:50:06 -0800
Subject: [belajar-excel] How to be a Master in Excel (menggunakan Excel secara maksimal)

Menanggapi pertanyaan Pak Guru, saya ingin berbagi pengalaman (walaupun masih jauh dari Master) bagaimana saya mencoba menggunakan Excel secara maksimal.- Rajin membaca buku, searching internet, diskusi dengan para Master (termasuk yang ada dalam milis ini)- Menyerap intisari dari apa yang kita pelajari dan membuat pola untuk penyelesaian masalah- Buat berbagai kombinasi masalah dan curahkan semua pengetahuan yang kita miliki baik mengenai Menu, Formula (termasuk Mega Formula), PivotTable maupun Macro.- Latihan secara terus menerus, jika mentok cari solusinya di internet atau diskusikan di milis ini atau dengan teman sesama pengguna Excel.
Mengenai formula yang dibahas dalam buku memang pada umumnya hanya berupa formula2 dasar karena biasanya penulis tidak punya
"stock masalah".
Hitung punya hitung, kayaknya untuk menjadi Master perlu waktu tidak kurang dari 5 tahun...
Salam,Hendrik Karnadi
kutipan dari pertanyaan Pak GuruMengenai buku yang sempat disinggung oleh Pak Seno, sudah cukup banyak buku yg saya baca. Tetapi buku-buku itu hanya menyajikan formula-formula yg "lurus-lurus" saja. Artinya buku-buku tersebut hanya menyajikan penggunaan rumus-rumus dasar. Tidak membahas bagaimana mengkombinasikan suatu formula dengan formula lain untuk untuk memecahkan suatu masalah. Sebenarnya yg ingin saya ketahui adalah bagaimana para MASTER EXCEL ini belajar sehingga dia bisa menjadi seperti sekarang ini. Atau paling tidak buku apa yang telah 'mengubah kehidupan ber-excel' mereka-dari pengguna biasa menjadi MASTER EXCEL yg LUAR BIASA.


Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
3a.

Re: Bls: [belajar-excel] Fungsi Sumproduct tidak mengkalkulasi

Posted by: "Contract Mining Assistant, Asam-Asam" apassistant@arutmin.com

Thu Jan 26, 2012 8:31 pm (PST)



Terima kasih semuanya atas penjelasan2 nya.


sekarang running well filenya


Salam: |Rasyid|

________________________________

From: belajar-excel@yahoogroups.com
[mailto:belajar-excel@yahoogroups.com] On Behalf Of jkssxls Sudarsono
Sent: Thursday, January 26, 2012 5:28 PM
To: Belajar-Excel Yahoo Groups
Subject: RE: Bls: [belajar-excel] Fungsi Sumproduct tidak mengkalkulasi

misal J33 sampai J34 berisi nilai yang jika menggunakan Value() akan
menghasilkan #Value! , misal value(J33) dan value (j34 ).

hal aneh :
1. =SUMPRODUCT(F33:F33,J33:J33) akan menghasilkan #Value!
2. =SUMPRODUCT(F33:F34,J33:J34) akan menghasilkan 0
jadi jika rangenya lebih dari satu sel akan menghasilkan 0

________________________________

To: belajar-excel@yahoogroups.com
From: jkssxls@hotmail.com
Date: Thu, 26 Jan 2012 09:16:26 +0000
Subject: RE: Bls: [belajar-excel] Fungsi Sumproduct tidak mengkalkulasi

karena sel J33:j1001 ada isinya dan bukan merupakan number sehingga :
=VALUE(J33) akan menghasilkan #Value!
bila isi sel j33 dihapus , alias dikosongkan :
=VALUE(J33) akan menghasilkan 0

=SUMPRODUCT(($D$2:$D$1001="January")*($F$2:$F$1001="SHE") *
$J$2:$J$1001) akan menghasilkan #Value!

bilai menggunakan :
=SUMPRODUCT(($D$2:$D$1001="January")*($F$2:$F$1001="SHE"),$J$2:$J$1001)
maka nilai perkalian antar sel yang bersesuaian akan menghasilkan 0 ,
walaupun sel di kolom J bukan bertipe number atau
bukan tipe yang dapat di konversikan ke number. misal
=SUMPRODUCT((D33:D3="January")*(F33="SHE"),J33)
perkalian/product nilai 0 (dari False * False ) dan #Value! akan
menghasilkan 0.




________________________________

To: belajar-excel@yahoogroups.com
From: saifmnp@ymail.com
Date: Thu, 26 Jan 2012 15:25:16 +0800
Subject: Bls: [belajar-excel] Fungsi Sumproduct tidak mengkalkulasi

boleh saya ralat SUMPRODUCTnya
=SUMPRODUCT(($D$2:$D$1001="January")*($F$2:$F$1001="SHE"),$J$2:$J$1001)

________________________________

Dari: "Contract Mining Assistant, Asam-Asam" <apassistant@arutmin.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 26 Januari 2012 14:08
Judul: [belajar-excel] Fungsi Sumproduct tidak mengkalkulasi

#VALUE! --> range data sampai baris 1001
224.00 --> range data hanya sampai cell input terakhir baris 32




Dear Para Pakar Excel
saya mempunyai masalah dengan sumproduct,

sumproduct yang saya tulis selalu error kalau range data

melebihi dari cell terakhir yang telah ter input


Mohon Solusi terbaiknya.


Terima Kasih

Salam: |Rasyid|

Disclaimer - This message including any attachments and information
contained
herein ("Message" ) may contain privileged information or otherwise
is protected
from disclosure. Any unauthorized use of this Message by any person
may lead to
legal consequences. If you receive this Message in error, or if the
recipient
of this Message is not the intended recipient or the employee or agent
authorized
for delivering this Message to the intended recipient you are hereby
notified that
any disclosure, dissemination, distribution or copying of this
Message or let or
cause this Message to be disclosed,disseminated, distributed, or copied
is strictly
prohibited, and please notify the sender by return message and
immediately delete
this Message from your system. Incoming and outgoing communications
using this
electronic mail may be monitored by PT Arutmin Indonesia,as permitted by
applicable
law and regulations. Unless it is made by the authorized person,any
views expressed
in this Message are those of the individual sender and may not
necessarily reflect
the views of PT Arutmin Indonesia.
You should check attachments for viruses and defects before opening or
using them.
We are not liable to recover any injuries caused by virused or defected
attachments.

Disclaimer - This message including any attachments and information contained
herein ("Message" ) may contain privileged information or otherwise is protected
from disclosure. Any unauthorized use of this Message by any person may lead to
legal consequences. If you receive this Message in error, or if the recipient
of this Message is not the intended recipient or the employee or agent authorized
for delivering this Message to the intended recipient you are hereby notified that
any disclosure, dissemination, distribution or copying of this Message or let or
cause this Message to be disclosed,disseminated, distributed, or copied is strictly
prohibited, and please notify the sender by return message and immediately delete
this Message from your system. Incoming and outgoing communications using this
electronic mail may be monitored by PT Arutmin Indonesia,as permitted by applicable
law and regulations. Unless it is made by the authorized person,any views expressed
in this Message are those of the individual sender and may not necessarily reflect
the views of PT Arutmin Indonesia.
You should check attachments for viruses and defects before opening or using them.
We are not liable to recover any injuries caused by virused or defected attachments.

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)
4a.

Re: Mengurutkan tanggal dan departement

Posted by: "Mulki" mulki@aop.component.astra.co.id   mulki_akbar

Thu Jan 26, 2012 8:31 pm (PST)



ki semprul, mumpung msh kasus yg sama. ini kan pake formula ya, tp kenapa di filenya saya liat ada dilampirkan attachment macronya ? adakah hubungan antara formula tadi dg macronya ?

thx & wassalam,
mulki

----- Original Message -----
From: Ki Semprul
To: belajar-excel@yahoogroups.com
Sent: Thursday, January 26, 2012 11:37 AM
Subject: Re: [belajar-excel] Mengurutkan tanggal dan departement

Tabel yg ada tetap dibiarkan; dan diangap sebagai INPUT
Tabel SEPERTI YG DIINGINKAN dibuat di Range lain ( sheet lain)
dengan FOR MU LA , yg kira kita sbb:

Data Tangal di-sejajarkan dengan angka urut
Sebuah tanggal harus ditempatkan DIMANA ?? diteksi Index BARIS-nya
Index Baris dicari dengan fungsi Match
Tetapi kerena angka urut dan angka tanggal itu LAIN; maka array tanggal
dalam fungsi Match: hanya diambil AgkaHarinya saja [ Day(DataTanggal) ]

=MATCH(A3,DAY(Olah!$B$3:$B$30),0)
menghasilkan Index baris

=IF(ISNA(MATCH(A3,DAY(Olah!$B$3:$B$30),0)),"",
(INDEX(Olah!$B$3:$B$30,
MATCH(A3,DAY(Olah!$B$3:$B$30),0))))
menghasilkan data tanggal (ex kolom Trans_Date) yg harus dituliskan di baris itu.

Demikan juga dengan KOLOM-KOLOMnya
kolom yg diambil dicari INDEX KOLOMNYA dengan MATCH

=MATCH(C$1,Olah!$C$2:$O$2,0)
menghasilkan Index kolom yg diperlukan

=IF(ISNA(MATCH($A3,DAY(Olah!$B$3:$B$30),0)),"",
INDEX(Olah!$C$3:$O$33,
MATCH($A3,DAY(Olah!$B$3:$B$30),0),
MATCH(C$1,Olah!$C$2:$O$2,0)))

menghasilkan data di KOLOM itu

Semua formula d i kolom B maupun C ke kanan; adalah Array formula Cell Tunggal
Mohon ampun kalau ternyata masih salah-salah...

Ki Semprul (semprull..ki! )

2012/1/26 jajang muhammad siddik <jajang_ms@yahoo.co.id>

Dear Agan2 master excel..
Saya lagi butuh bantuan ni...
gimana caranya mengurutkan tanggal dan departement, seperti file terlampir...
bisa dengan formula atau pun dengan macro
Regards
Jajang Ms

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
4b.

Re: Mengurutkan tanggal dan departement

Posted by: "i Haps" hapsari.stlizbeth@gmail.com   liz_indri_haps

Thu Jan 26, 2012 11:28 pm (PST)



halo mas mulki,
file yg Aki ampirkan pada posting Thu, Jan 26, 2012 at 11:37 AM = *tidak
ada makronya.*
( LPB_olah.xls_sofrmula_Semprul_Ki.xlsx - 67K )
coba di-rechek & kalau perlu download lagi
semua komputasi dilakukan dgn formula...

kalau mas mulki menerima ada makronya, bisakah copy workbook dikirim japri
ke Aki ya ...
(kalau *.xlsx mestinya tidak ada makronya kan?)
tegaskan apakah file tsb memang merupakan lampiran ex mail yg mulki kutip
tsb ?

tks tks tks

2012/1/27 Mulki <mulki@aop.component.astra.co.id>

> **
> ki semprul, mumpung msh kasus yg sama. ini kan pake formula ya, tp kenapa
> di filenya saya liat ada dilampirkan attachment macronya ? adakah hubungan
> antara formula tadi dg macronya ?
> thx & wassalam,
> mulki
>

> *----- Original Message -----
> From: Ki Semprul
> Sent: Thursday, January 26, 2012 11:37 AM
> Tabel yg ada tetap dibiarkan; dan diangap sebagai INPUT
> Tabel SEPERTI YG DIINGINKAN dibuat di Range lain ( sheet lain)
> dengan FOR MU LA , yg kira kita sbb:
>
> Data Tangal di-sejajarkan dengan angka urut
> Sebuah tanggal harus ditempatkan DIMANA ?? diteksi Index BARIS-nya
> Index Baris dicari dengan fungsi Match
> Tetapi kerena angka urut dan angka tanggal itu LAIN; maka array tanggal
> dalam fungsi Match: hanya diambil AgkaHarinya saja [ Day(DataTanggal) ]
>
> =MATCH(A3,DAY(Olah!$B$3:$B$30),0)
> menghasilkan Index baris
>
> =IF(ISNA(MATCH(A3,DAY(Olah!$B$3:$B$30),0)),"",
> (INDEX(Olah!$B$3:$B$30,
> MATCH(A3,DAY(Olah!$B$3:$B$30),0))))
> menghasilkan data tanggal (ex kolom Trans_Date) yg harus dituliskan di
> baris itu.
>
> Demikan juga dengan KOLOM-KOLOMnya
> kolom yg diambil dicari INDEX KOLOMNYA dengan MATCH
>
> =MATCH(C$1,Olah!$C$2:$O$2,0)
> menghasilkan Index kolom yg diperlukan
>
> =IF(ISNA(MATCH($A3,DAY(Olah!$B$3:$B$30),0)),"",
> INDEX(Olah!$C$3:$O$33,
> MATCH($A3,DAY(Olah!$B$3:$B$30),0),
> MATCH(C$1,Olah!$C$2:$O$2,0)))
>
> menghasilkan data di KOLOM itu
>
> Semua formula d i kolom B maupun C ke kanan; adalah Array formula Cell
> Tunggal
> Mohon ampun kalau ternyata masih salah-salah...
>
> Ki Semprul (semprull..ki! )*
>
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
4c.

Re: Mengurutkan tanggal dan departement

Posted by: "Mulki" mulki@aop.component.astra.co.id   mulki_akbar

Fri Jan 27, 2012 1:46 am (PST)



maaf mb haps, ini karna kebodohan saya.
di sheet (olah) saya melihat ada image yg di capture dari modulenya macro dan ada keterangan di image tersbt, tp setelah saya alt+f11 saya memang tidak melihat ada potongan kode di modulenya.

mungkin ada maksud tertentu kenapa menampilkan image hasil capture-an dari macro trsbt ya mb ?

thx & wassalam,
mulki

----- Original Message -----
From: i Haps
To: belajar-excel@yahoogroups.com
Sent: Friday, January 27, 2012 2:27 PM
Subject: Re: [belajar-excel] Mengurutkan tanggal dan departement

halo mas mulki,

file yg Aki ampirkan pada posting Thu, Jan 26, 2012 at 11:37 AM = tidak ada makronya.
( LPB_olah.xls_sofrmula_Semprul_Ki.xlsx - 67K )
coba di-rechek & kalau perlu download lagi
semua komputasi dilakukan dgn formula...

kalau mas mulki menerima ada makronya, bisakah copy workbook dikirim japri ke Aki ya ...
(kalau *.xlsx mestinya tidak ada makronya kan?)
tegaskan apakah file tsb memang merupakan lampiran ex mail yg mulki kutip tsb ?

tks tks tks

2012/1/27 Mulki <mulki@aop.component.astra.co.id>

ki semprul, mumpung msh kasus yg sama. ini kan pake formula ya, tp kenapa di filenya saya liat ada dilampirkan attachment macronya ? adakah hubungan antara formula tadi dg macronya ?
thx & wassalam,
mulki

----- Original Message -----
From: Ki Semprul
Sent: Thursday, January 26, 2012 11:37 AM
Tabel yg ada tetap dibiarkan; dan diangap sebagai INPUT
Tabel SEPERTI YG DIINGINKAN dibuat di Range lain ( sheet lain)
dengan FOR MU LA , yg kira kita sbb:

Data Tangal di-sejajarkan dengan angka urut
Sebuah tanggal harus ditempatkan DIMANA ?? diteksi Index BARIS-nya
Index Baris dicari dengan fungsi Match
Tetapi kerena angka urut dan angka tanggal itu LAIN; maka array tanggal
dalam fungsi Match: hanya diambil AgkaHarinya saja [ Day(DataTanggal) ]

=MATCH(A3,DAY(Olah!$B$3:$B$30),0)
menghasilkan Index baris

=IF(ISNA(MATCH(A3,DAY(Olah!$B$3:$B$30),0)),"",
(INDEX(Olah!$B$3:$B$30,
MATCH(A3,DAY(Olah!$B$3:$B$30),0))))
menghasilkan data tanggal (ex kolom Trans_Date) yg harus dituliskan di baris itu.

Demikan juga dengan KOLOM-KOLOMnya
kolom yg diambil dicari INDEX KOLOMNYA dengan MATCH

=MATCH(C$1,Olah!$C$2:$O$2,0)
menghasilkan Index kolom yg diperlukan

=IF(ISNA(MATCH($A3,DAY(Olah!$B$3:$B$30),0)),"",
INDEX(Olah!$C$3:$O$33,
MATCH($A3,DAY(Olah!$B$3:$B$30),0),
MATCH(C$1,Olah!$C$2:$O$2,0)))

menghasilkan data di KOLOM itu

Semua formula d i kolom B maupun C ke kanan; adalah Array formula Cell Tunggal
Mohon ampun kalau ternyata masih salah-salah...

Ki Semprul (semprull..ki! )

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
5a.

menampilkan foto dengan shape

Posted by: "neza ibaneza" nezaibaneza@yahoo.co.id   nezaibaneza

Thu Jan 26, 2012 10:16 pm (PST)



dear all,
salam be excel

saya punya program yg dulu dibantu sama um KID, untuk auto live picture
tapi yg saya bisa cuma pake insert activecontrol image pada tools.
gimana kalau mau pake shape.. apa VBA harus diubah banyak??

salam

Neza
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
5b.

menampilkan foto dengan shape

Posted by: "neza ibaneza" nezaibaneza@yahoo.co.id   nezaibaneza

Thu Jan 26, 2012 10:19 pm (PST)



dear all,
salam be excel

maaf lampirannya menyusul

saya punya program yg dulu dibantu sama um KID, untuk auto live picture
tapi yg saya bisa cuma pake insert activecontrol image pada tools.
gimana kalau mau pake shape.. apa VBA harus diubah banyak??

salam

Neza
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
5c.

Re: menampilkan foto dengan shape

Posted by: "i Haps" hapsari.stlizbeth@gmail.com   liz_indri_haps

Fri Jan 27, 2012 12:36 am (PST)



waduh lampirannya 635 KB
bgmana ini, milisnya sendiri kok di tabrak terus ??

saya suah isi lihat filenya
sebenarnya makro dari Mr. Kid sudah SANGAT SIAP untuk menangani SHAPE
makronya sudah disiapkan ; anda tinggal mn SET shp = nama Shape
tiap baris makro bahkan sudan diberi petunjuk

Sebenarnya (LAGI) milis ini tempat untuk belajar
Pelajaran sudah diberikan mestinya dibaca dan dipelajari
bukan tempat minta dibuatkan program:
Pelajaran yg sudah diberikan dan sangat jelas, *e... masih minta lagi!*
Maafkan saya selalu pakai "nada tinggi"... tapi itu semua sebenarnya
*didorong oleh rasa sayyyang kepada milis dan members nya, semua !*

ini kode yg sudah diperbaiki; hanya beberapa huruf saja

'-------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim sFileName As String
Dim shp As Shape

On Error Resume Next

'cek yang berubah nilai hanya 1 cell ?
If Target.Count = 1 Then
'cek yang berubah adalah b2 ?
If Target.Address(False, False) = "B2" Then
'cek trigger (b2) ada isinya ? (untung pakai data validation)
If LenB(Target.Value) <> 0 Then
'ini picture filename
sFileName = ThisWorkbook.Path & "\" & Target.Value & ".jpg"

'init object variable shape
Set shp = ActiveSheet.Shapes("Rounded Rectangle 2")
With shp
'set lebar dan tinggi object (contoh dengan shape)
.Width = 135
.Height = 158
'cek ada file picturenya ?
If LenB(Dir$(sFileName)) <> 0 Then
'kalau pakai object : ActiveX Image Control
'load si picture
Image1.Picture = LoadPicture(sFileName)

'kalau pakai shape
'fill dengan si picture
.Fill.UserPicture sFileName
Else
'kalau pakai object : ActiveX Image Control
'kosongkan object
Image1.Picture = Nothing

'kalau pakai shape
'ganti mode fill dengan solid
.Fill.Solid
'yang warnanya hijau
'diset dengan kombinasi Red Green Blue
.Fill.ForeColor.RGB = RGB(0, 128, 0)
End If
End With
End If
End If
End If
End Sub
'-------------------------------

2012/1/27 neza ibaneza <nezaibaneza@yahoo.co.id>

> **
> dear all,
> salam be excel
> saya punya program yg dulu dibantu sama um KID, untuk auto live picture
> tapi yg saya bisa cuma pake insert activecontrol image pada tools.
> gimana kalau mau pake shape.. apa VBA harus diubah banyak??
> salam
> Neza
>
>
>
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
5d.

Re: menampilkan foto dengan shape

Posted by: "i Haps" hapsari.stlizbeth@gmail.com   liz_indri_haps

Fri Jan 27, 2012 1:37 am (PST)



lampiran (diambil bagian yg perlu saja...)

2012/1/27 i Haps <hapsari.stlizbeth@gmail.com>

> waduh lampirannya 635 KB
> bgmana ini, milisnya sendiri kok di tabrak terus ??
>
> saya suah isi lihat filenya
> sebenarnya makro dari Mr. Kid sudah SANGAT SIAP untuk menangani SHAPE
> makronya sudah disiapkan ; anda tinggal mn SET shp = nama Shape
> tiap baris makro bahkan sudan diberi petunjuk
>
> Sebenarnya (LAGI) milis ini tempat untuk belajar
> Pelajaran sudah diberikan mestinya dibaca dan dipelajari
> bukan tempat minta dibuatkan program:
> Pelajaran yg sudah diberikan dan sangat jelas, *e... masih minta lagi!*
> Maafkan saya selalu pakai "nada tinggi"... tapi itu semua sebenarnya
> *didorong oleh rasa sayyyang kepada milis dan members nya, semua !*
>
>
> ini kode yg sudah diperbaiki; hanya beberapa huruf saja
>
> '-------------------------------
> Private Sub Worksheet_Change(ByVal Target As Range)
> Dim sFileName As String
> Dim shp As Shape
>
> On Error Resume Next
>
> 'cek yang berubah nilai hanya 1 cell ?
> If Target.Count = 1 Then
> 'cek yang berubah adalah b2 ?
> If Target.Address(False, False) = "B2" Then
> 'cek trigger (b2) ada isinya ? (untung pakai data validation)
> If LenB(Target.Value) <> 0 Then
> 'ini picture filename
> sFileName = ThisWorkbook.Path & "\" & Target.Value & ".jpg"
>
> 'init object variable shape
> Set shp = ActiveSheet.Shapes("Rounded Rectangle 2")
> With shp
> 'set lebar dan tinggi object (contoh dengan shape)
> .Width = 135
> .Height = 158
> 'cek ada file picturenya ?
> If LenB(Dir$(sFileName)) <> 0 Then
> 'kalau pakai object : ActiveX Image Control
> 'load si picture
> Image1.Picture = LoadPicture(sFileName)
>
> 'kalau pakai shape
> 'fill dengan si picture
> .Fill.UserPicture sFileName
> Else
> 'kalau pakai object : ActiveX Image Control
> 'kosongkan object
> Image1.Picture = Nothing
>
> 'kalau pakai shape
> 'ganti mode fill dengan solid
> .Fill.Solid
> 'yang warnanya hijau
> 'diset dengan kombinasi Red Green Blue
> .Fill.ForeColor.RGB = RGB(0, 128, 0)
> End If
> End With
> End If
> End If
> End If
> End Sub
> '-------------------------------
>
>
>
> 2012/1/27 neza ibaneza <nezaibaneza@yahoo.co.id>
>
>> **
>> dear all,
>> salam be excel
>> saya punya program yg dulu dibantu sama um KID, untuk auto live picture
>> tapi yg saya bisa cuma pake insert activecontrol image pada tools.
>> gimana kalau mau pake shape.. apa VBA harus diubah banyak??
>> salam
>> Neza
>>
>>
>>
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
5e.

Bls: [belajar-excel] menampilkan foto dengan shape

Posted by: "neza ibaneza" nezaibaneza@yahoo.co.id   nezaibaneza

Fri Jan 27, 2012 1:42 am (PST)



terima kasih banyak mr. happs, maaf kalau lampirannya lebih dari 200Kb,,
ternyata cuma ganti name shape.. kemarin dah coba ganti nama di propertiesnya tapi g fungsi..
maaf baru belajar..

neza

________________________________
Dari: i Haps <hapsari.stlizbeth@gmail.com>
Dikirim: Jumat, 27 Januari 2012 16:36

waduh lampirannya 635 KB
bgmana ini, milisnya sendiri kok di tabrak terus ??

saya sudah lihat isi filenya
sebenarnya makro dari Mr. Kid sudah SANGAT SIAP untuk menangani SHAPE
makronya sudah disiapkan ; anda tinggal men SET shp = nama Shape
tiap baris makro bahkan sudan diberi petunjuk

Sebenarnya (LAGI) milis ini tempat untuk belajar
Pelajaran sudah diberikan mestinya dibaca dan dipelajari
bukan tempat minta dibuatkan program:
Pelajaran yg sudah diberikan dan sangat jelas, e... masih minta lagi!
Maafkan saya selalu pakai "nada tinggi"... tapi itu semua sebenarnya
didorong oleh rasa sayyyang kepada milis dan members nya, semua !

ini kode yg sudah diperbaiki;hanya beberapa huruf saja

'-------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
'init object variable shape
Set shp = ActiveSheet.Shapes("Rounded Rectangle 2")
End Sub
'-------------------------------

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
5f.

Re: menampilkan foto dengan shape

Posted by: "jkssxls Sudarsono" jkssxls@hotmail.com   jkssbma

Fri Jan 27, 2012 1:46 am (PST)




Jika Shape yang berasal dari menu Insert Picture ( excel 2007/2010 ) atau Insert , Picture, From File ( excel 2003 ) tak dapat diubah dengan metode : UserPicture. Bila Shape berasal dari menu insert , Shapes ( excel 2007/2010 ) atau Insert, Picture , AutoShapes ( excel 2003 ) dapat diubah dengan metode : UserPicture. <Shapeobject>.Fill.userPicture <File gambar lengkap dengan pathnya >
To: belajar-excel@yahoogroups.com
From: hapsari.stlizbeth@gmail.com
Date: Fri, 27 Jan 2012 15:36:26 +0700
Subject: Re: [belajar-excel] menampilkan foto dengan shape

waduh lampirannya 635 KB bgmana ini, milisnya sendiri kok di tabrak terus ??

saya suah isi lihat filenya

sebenarnya makro dari Mr. Kid sudah SANGAT SIAP untuk menangani SHAPEmakronya sudah disiapkan ; anda tinggal mn SET shp = nama Shape

tiap baris makro bahkan sudan diberi petunjuk

Sebenarnya (LAGI) milis ini tempat untuk belajarPelajaran sudah diberikan mestinya dibaca dan dipelajari

bukan tempat minta dibuatkan program: Pelajaran yg sudah diberikan dan sangat jelas, e... masih minta lagi!

Maafkan saya selalu pakai "nada tinggi"... tapi itu semua sebenarnya didorong oleh rasa sayyyang kepada milis dan members nya, semua !

ini kode yg sudah diperbaiki; hanya beberapa huruf saja

'-------------------------------

Private Sub Worksheet_Change(ByVal Target As Range) Dim sFileName As String Dim shp As Shape

On Error Resume Next 'cek yang berubah nilai hanya 1 cell ? If Target.Count = 1 Then

'cek yang berubah adalah b2 ? If Target.Address(False, False) = "B2" Then 'cek trigger (b2) ada isinya ? (untung pakai data validation)

If LenB(Target.Value) <> 0 Then 'ini picture filename sFileName = ThisWorkbook.Path & "\" & Target.Value & ".jpg"

'init object variable shape Set shp = ActiveSheet.Shapes("Rounded Rectangle 2")

With shp 'set lebar dan tinggi object (contoh dengan shape) .Width = 135

.Height = 158 'cek ada file picturenya ? If LenB(Dir$(sFileName)) <> 0 Then

'kalau pakai object : ActiveX Image Control 'load si picture Image1.Picture = LoadPicture(sFileName)

'kalau pakai shape 'fill dengan si picture

.Fill.UserPicture sFileName Else 'kalau pakai object : ActiveX Image Control

'kosongkan object Image1.Picture = Nothing

'kalau pakai shape 'ganti mode fill dengan solid .Fill.Solid

'yang warnanya hijau 'diset dengan kombinasi Red Green Blue .Fill.ForeColor.RGB = RGB(0, 128, 0)

End If End With End If End If

End IfEnd Sub'-------------------------------

2012/1/27 neza ibaneza <nezaibaneza@yahoo.co.id>

dear all,salam be excelsaya punya program yg dulu dibantu sama um KID, untuk auto live picture

tapi yg saya bisa cuma pake insert activecontrol image pada tools.gimana kalau mau pake shape.. apa VBA harus diubah banyak??salamNeza

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
6a.

Re: mensummary data tanpa pivot table

Posted by: "firman 21" firman.2121@gmail.com

Fri Jan 27, 2012 12:03 am (PST)



Terima kasih atas nasehatnya dan masukkannya
semoga besok kedepannya jika bertanya akan semakin jelas

salam
f

2012/1/26 Ki Semprul <semprul.ki@gmail.com>

>
> Contoh contoh yg anda ajukan ( di tabel tabal di baris 7 sampai 19 (sheet
> report)
> anda ajukan tanpa penjelasan apapun: yg berarti sudah anda anggap benar.
> Maka kita mengikuti logika yg sudah anda buat di tabel itu.
>
> Belakangan anda mengubah pendapat bahwa harusnya penghitungan berdasarkan
> SUMMARY/Rekapitulasi (misal 1 orang mengikuti 5 kali training dalm rekap
> hanya
> ditulis 1 orang tetapi durasi trainingnya yg merupakan penambahan dari 5
> events)
> (hanya bahasanya tidak seperti itu)
>
> Jadi sekarang makin terbukti bahwa tanya-jawab itu bukan hanya "tanya dan
> jawab"
> tetapi harus didahului oleh pemaparan masalah, maksud dan tujuan, lebih
> dulu.
> Bagaimana mau menjawab kalau masalahnya kita tidak paham...
> *Hal ini lah yg di milis ini (dan milis lain) tidak "dianggap" oleh para
> members.*
> *Banyak pengaju kasus datang menenteng sebuah tabel dan hanya bilang*
> *( "Mohon bantuan ; kasus terlampir !!", .... huenake... rek !!)*
> *Maaf keluh-kesah ini bukan ditujukan kepada anda, tetapi untuk kita
> semua...*
>
>
> Mudah mudahan berikut ini tidak terlalu jauh dari harapan:
> Rumusnya menjadi seperti ini (hanya menghilangkan keterlibatan kolom J)
> berdasarkan TABEL SUMMARY / RAKAP !
>
> =SUM(IF(
> ('data entry'!$D$25:$D$31=C$25)*
> ('data entry'!$C$25:$C$31=C$26)*
> ('data entry'!$K$25:$K$31>24),1))
>
> Trus mengenai satu *kriteria* lagi : *"Permanent Employee"*
> bisa dibedakan di kolom mana ya ?

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (10)
Recent Activity
Visit Your Group
Dog Fanatics

on Yahoo! Groups

Find people who are

crazy about dogs.

Yahoo! Groups

Small Business Group

Own a business?

Connect with others.

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Need to Reply?

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

Create New Topic | Visit Your Group on the Web
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 07.33

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)