Rabu, 07 September 2011

]] XL-mania [[ Digest Number 2245

Microsoft Excel Community

Messages In This Digest (12 Messages)

Messages

1a.

Re: VBA run in OpenOffice 3.0

Posted by: "Jonathan Susanto" jonathan.susanto@gmail.com   jonathan_susanto

Tue Sep 6, 2011 6:23 pm (PDT)



Kl open office default emang susah.. Karena belum di tune.

Coba pake Go-oo open office ato libreoffice.

Macro saya bisa jalan di go-oo open office.

BeHappy!

-----Original Message-----
From: "dhai" <f12eshf12uit@yahoo.co.id>
Sender: XL-mania@yahoogroups.com
Date: Tue, 06 Sep 2011 09:04:32
To: <XL-mania@yahoogroups.com>
Reply-To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ VBA run in OpenOffice 3.0

Dear XL Mania

Saya mau tanya kenapa VBA macro ga bisa dijalankan di Oppenoffice ya , semua komponennya menjadi tidak muncul dan syntaxnya pun tidak bisa di execude , apa ada settingan yang mesti diatur terlebih dahulu di VBA atau di openoffice?

Mohon Bantuanya XL mania
Thanks n' Regards

1b.

Re: VBA run in OpenOffice 3.0

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Tue Sep 6, 2011 6:23 pm (PDT)



http://wiki.services.openoffice.org/wiki/Documentation/BASIC_Guide
http://documentation.openoffice.org/HOW_TO/various_topics/VbaStarBasicXref.pdf
http://www.jumpingbean.co.za/blogs/mark/writing_vba_macros_in_open_office

2011/9/6 dhai <f12eshf12uit@yahoo.co.id>

> Saya mau tanya kenapa VBA macro ga bisa dijalankan di Oppenoffice ya ,
> semua komponennya menjadi tidak muncul dan syntaxnya pun tidak bisa di
> execude , apa ada settingan yang mesti diatur terlebih dahulu di VBA atau di
> openoffice?
> Mohon Bantuanya XL mania
> Thanks n' Regards
2a.

Re: Tanya hasil dan validasi yang berbeda penamaannya

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Tue Sep 6, 2011 6:24 pm (PDT)



Dear Subkhan Zaeni,

Dengan menyusun data lebih baik, maka proses summary akan menjadi lebih
mudah.
Seluruh baris pada kolom Class harus memiliki nilai. Manfaatkan conditional
formatting untuk menyusun tampilan data yang menyembunyikan duplikasi nilai
class.

Pada hasil summary,
1. kolom Type menggunakan array formula :
=IF(ROW(1:1)>COUNTIF($D$9:$D$26,$O$8),"",INDEX($E$9:$E$26,MATCH(1,($D$9:$D$26=$O$8)*(COUNTIF(P$8:P8,$E$9:$E$26)=0),0)))

2. kolom Hasil menggunakan formula :
=IF(LEN(P9),SUMPRODUCT(($D$9:$D$26=$O$8)*($E$9:$E$26=$P9)*($F$8:$I$8=$N$8)*$F$9:$I$26),"")

Regards.
Kid.

2011/9/6 Subkhan Zaeni <subkhan.zaeni@id.panasonic.com>

> **
>
>
> Dear Pakar Excel dan Excel mania****
>
> ** **
>
> Terima kasih sebelumnya kepada Bu CTV dan Mr Kid yang telah membantu
> pertanyaan saya sebelumnya.****
>
> ** **
>
> Mohon bantuannya sekali lagi untuk pemecahan hasil dan validasi****
>
> Dari contoh sya sebelumnya antara type dan kelas part penamaannya tidak
> jauh berbeda…( typical)****
>
> Type A Kelas A1, A2, A3 dst ****
>
> Type B Kelas B1, B2 dst****
>
> ** **
>
> mohon pencerahaanya apabila type dan kelas penamaannya tidak sama… contoh
> terlampir****
>
> ** **
>
> sya sudah mencoba formula dari Bu CTV dan Mr Kid namun hasilnya tidak
> muncul****
>
> ** **
>
> ** **
>
> Terima kasih ****
>
> ** **
>
> Best regards,
>
> **Subkhan Zaeni******
>
> ** **
>
> ** **
>
>
>
> ****
>
> ** **
>
>
>
2b.

Re: Tanya hasil dan validasi yang berbeda penamaannya

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Tue Sep 6, 2011 6:24 pm (PDT)



1. solusi dengan makro:

Private Sub Worksheet_Change(ByVal Target As Range)
* ' hapsari / sept 6, 2011*
* '=======================*
If Target.Address = "$O$25" Then
If Len(Target.Value) > 0 Then

Dim dTabel As Range, Hasil As Range
Dim i As Long, n As Long, c As Integer

Target.CurrentRegion.Offset(2, 0).ClearContents
Set dTabel = Range("D9").CurrentRegion.Offset(2, 0)
Set dTabel = dTabel.Resize(dTabel.Rows.Count - 2, 1)

Set Hasil = Range("P26")
If WorksheetFunction.CountIf(Range("F8:I8"), Target.Offset(0, -1))
_
Then c = WorksheetFunction.Match(Target.Offset(0, -1),
Range("F8:I8"), 0) + 2

For i = 1 To dTabel.Rows.Count
If dTabel(i, 1) = Target Then
n = n + 1
Hasil(n, 1) = dTabel(i, 2)
Hasil(n, 2) = dTabel(i, c)
End If
Next i
End If
End If
End Sub

(2)
Solusi dengan formula, dengan syarat Class ditulis lengkap
(mengikuti kaidah database) dan SORTED

array formula multi hasil
=OFFSET($E$8,MATCH(O8,$D$9:$D$26,0), 0, COUNTIF($D$9:$D$26,O8), 1)

array formula multi hasil
=OFFSET($E$8,MATCH(O8,$D$9:$D$26,0), MATCH(N8,$F$8:$I$8,0),
COUNTIF($D$9:$D$26,O8), 1)

2011/9/6 Subkhan Zaeni <subkhan.zaeni@id.panasonic.com>

> **
>
> Dear Pakar Excel dan Excel mania****
>
> Terima kasih sebelumnya kepada Bu CTV dan Mr Kid yang telah membantu
> pertanyaan saya sebelumnya.
>
> Mohon bantuannya sekali lagi untuk pemecahan hasil dan validasi
>
> Dari contoh sya sebelumnya antara type dan kelas part penamaannya tidak
> jauh berbeda…( typical)****
>
> Type A Kelas A1, A2, A3 dst ****
>
> Type B Kelas B1, B2 dst****
>
> mohon pencerahaanya apabila type dan kelas penamaannya tidak sama… contoh
> terlampir
>
> sya sudah mencoba formula dari Bu CTV dan Mr Kid namun hasilnya tidak
> muncul
>
> Terima kasih
>
> Best regards,
>
> Subkhan Zaeni******
>
>
>
3a.

Lookup & sum dalam 1 cell

Posted by: "Iwan Kesuma" iwan.kesuma@yahoo.com   iwan.kesuma

Tue Sep 6, 2011 6:24 pm (PDT)



Dear Para Master XL,

Terima kasih bantuannya atas permasalahan saya sebelumnya.
Minta bantuan lagi. Bagaimana membuat rumus lookup dan menjumlahkan dalam 1 cell yang sama ?
Contoh terlampir.

Terima kasih,
Iwan
3b.

Re: Lookup & sum dalam 1 cell

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Wed Sep 7, 2011 2:08 am (PDT)



(#) Apa salahnya kalau kalkulasi *dibantu oleh tabel daftar *??
dalam hal tertentu tabel daftar malah mempermudah pemahaman formula dan juga
memperingkas text formula, malah jangan jangan mempegesit kinerja worksheet
!!

(#) Rumus di setiap cell di bawah Header Tanggal, dipersingkat, menjadi:
=IF(COUNTIF(OTime,C6),INDEX(OTime,MATCH(C6,OT,0),2),0)

(#) Menjumlah Range dengan kemungkinan kolom bertambah/berkurang; artinya
membuat range itu DINAMIS, tergantung dari kondisi yg berubah; misalnya
*banyaknya Kolom.*

Di dalam kasus pak Iwan Kesu, JELAS bahwa tanggal terakhir (apapun bulannya)
akan menunjukkan juga JUMLAH KOLOM

Jadi, rumus yg diusulkan
=SUM(OFFSET(B20,0,1,1,AC$19))

di bagian OFFSET - nya akan menghasilkan range
*** yang dimulai dari B20
*** bergesert vertikal 0 baris (=tidak bergeser),
*** bergeser horisonal 1 kolom (berarti mulai di C20)
*** tinggi range = 1 baris
*** lebar range = value yg ada di AC$19 (dlm contoh AC19 = 27)
Dengan demikian Offset menghasilkan Range C20 sampai AC20 (27 kolom x 1
baris )

Jika kemudian Range tersebut dimasukkan sebagai argument pada fungsi SUM
maka pembicaraan sudah tidak menarik lagi... (karena semua orang asudah
tahu)

Cara mendinamiskan range d atas hanyalah salah satu cara, dan belum tentu
benar,
karena "bertambah kolom" nya seperti apa, kita tidak melihat contohnya...

-haps-

2011/9/6 Iwan Kesuma <iwan.kesuma@yahoo.com>
> Dear Para Master XL,
> Terima kasih bantuannya atas permasalahan saya sebelumnya.
> Minta bantuan lagi. Bagaimana membuat rumus lookup dan menjumlahkan dalam
1 cell yang sama ?
> Contoh terlampir.
> Terima kasih,
> Iwan
3c.

Re: Lookup & sum dalam 1 cell

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 7, 2011 2:09 am (PDT)



Dear Iwan,

Formula kolom Total untuk baris 6 :
=SUMPRODUCT(COUNTIF(OFFSET(Sheet1!$C6,0,0,1,COUNT($5:$5)),Tabel!$A$4:$A$36)*Tabel!$B$4:$B$36)

Regards.
Kid.

2011/9/6 Iwan Kesuma <iwan.kesuma@yahoo.com>

> **
>
>
> Dear Para Master XL,
>
> Terima kasih bantuannya atas permasalahan saya sebelumnya.
> Minta bantuan lagi. Bagaimana membuat rumus lookup dan menjumlahkan dalam 1
> cell yang sama ?
> Contoh terlampir.
>
> Terima kasih,
> Iwan
>
>
>
4.

Bls: ]] XL-mania [[ Tanya hasil dan validasi yang berbeda penamaanny

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id   ghozialkatiri

Tue Sep 6, 2011 6:25 pm (PDT)



kalau setiap class dan kolom bulan sudah diberi define name maka formula bisa lebih praktis dan dinamis.
untuk mengisi kolom type formulanya:

=IF(ISERROR(INDEX(INDIRECT($O$8);ROW(1:1)));"";INDEX(INDIRECT($O$8);ROW(1:1)))

untuk kolom hasil formulanya:

=IF(P9="";"";INDEX(INDIRECT($N$8);MATCH(P9;INDIRECT($P$7);0)))

silahkan lihat di sheet solusi

wassalam

Ghozi Alkatiri

--- Pada Sel, 6/9/11, Subkhan Zaeni <subkhan.zaeni@id.panasonic.com> menulis:

Dari: Subkhan Zaeni <subkhan.zaeni@id.panasonic.com>
Judul: ]] XL-mania [[ Tanya hasil dan validasi yang berbeda penamaannya
Kepada: ""XL-mania@yahoogroups.com"" <XL-mania@yahoogroups.com>
Tanggal: Selasa, 6 September, 2011, 1:19 PM

5a.

perhitungan on time performance

Posted by: "wawan setiawan" inputdata_mkt@yahoo.com   inputdata_mkt

Tue Sep 6, 2011 6:25 pm (PDT)



para pakar excel bagaimana menghitung on time performance mengunakan
rumus.

dan saya lampirkan filenya.

thanks
5b.

Re: perhitungan on time performance

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 7, 2011 2:04 am (PDT)



Hai Wawan,

Hitung delay 15-30 menit : (di G5)
=IF(($F5=G$4)*($E5*24*60>=15)*($E5*24*60<31),G$4,"")
copy ke cell lainnya.

Hitung delay 31-60 menit : (di K5)
=IF(($F5=K$4)*($E5*24*60>=31)*($E5*24*60<61),K$4,"")
copy ke cell lainnya.

Gantinya formula di G13 yang berbunyi =COUNTIF(G5:G12,"nia") adalah
1. =COUNTIF(G5:G12,G4)
2. =SumProduct( (G5:G12=G4) * 1 )

Formula delay bisa disederhanakan menjadi : (di E5)
=MAX(0,D5-C5)

Regards.
Kid.

2011/9/7 wawan setiawan <inputdata_mkt@yahoo.com>

> **
>
>
> para pakar excel bagaimana menghitung on time performance mengunakan
> rumus.
> dan saya lampirkan filenya.
>
> thanks
>
>
>
>
5c.

Re: perhitungan on time performance

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Wed Sep 7, 2011 2:07 am (PDT)



dan ini salah satu rumusnya
=IF(($E5>=$H$2)*($E5<=$I$2)*($F5=G$4),$F5,"")
dan di atur juga conditional formattingnya
dan lebih lengkapnya lihat ke sheet lampiran (kalau mau)
dan wassalam

-haps-

2011/9/7 wawan setiawan <inputdata_mkt@yahoo.com>

> **
> para pakar excel bagaimana menghitung on time performance mengunakan
> rumus.
> *dan* saya lampirkan filenya.
> thanks
>
>
6.

Bls: ]] XL-mania [[ perhitungan on time performance

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id   ghozialkatiri

Wed Sep 7, 2011 2:08 am (PDT)



untuk delay 15 - 30 dimulai dari G5 formulanya
=IF(AND($E5*24*60>=15;$E5*24*60<=30;$F5=G$4);$F5;"")
copy ke seluruh tabel kuning

untuk delay 31- 60
=IF(AND($E5*24*60>30;$E5*24*60<=60;$F5=K$4);$F5;"")
copy ke seluruh tabel abu abu

untuk row total dimulai dari G13 copy sampai N13
=COUNTIF(G5:G12;G$4)

wassalam

Ghozi Alkatiri

--- Pada Rab, 7/9/11, wawan setiawan <inputdata_mkt@yahoo.com> menulis:

Dari: wawan setiawan <inputdata_mkt@yahoo.com>
Judul: ]] XL-mania [[ perhitungan on time performance
Kepada: "XL-mania" <XL-mania@yahoogroups.com>
Tanggal: Rabu, 7 September, 2011, 8:02 AM

 

para pakar excel bagaimana menghitung on time performance mengunakanrumus.
dan saya lampirkan filenya.
thanks

Recent Activity
Visit Your Group
Yahoo! Groups

Cat Owners Group

Connect and share with

others who love their cats

Yahoo! Groups

Mental Health Zone

Find support for

Mental illnesses

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
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| selamat idul fitri, mohon maaf lahir dan batin...                 |
| www.linkedin.com/company/xl-mania                                 |
| ayo pesan buku "mengapa boss benci chart anda"  :D :D :D          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
MARKETPLACE

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.


A bad score is 579. A good idea is checking yours at freecreditscore.com.

Tidak ada komentar:

Posting Komentar