Tecnologia, programação e muito Visual FoxPro.

segunda-feira, 8 de fevereiro de 2010

Re: ]] XL-mania [[ Data Aktifitas

 

maaf ya tulisan ini sudah terlalu kesiangan; mungkin bagi pak Fajar S Gumai
kasus ini sudah selesai.
siti ngeyel tetap mengirim tanggapan karena ada teman yg masih menanyakan
"prakateknya bgmana"? (prakterk atas saran dari mas Kid)

Dlm workbook "contoh.xls" kiriman pak fajar; ada tabel kiri; ada tabel kanan
Tabel KIRI, oleh pak Fajar sudah dikatakan sebagai database; ya boleh saja.
Tetapi menurut pendapatku tabel tsb baru "dikatakan sbg database"; tetapi
belum berstruktur database 'beneran'.
Dia (Tabel KIRI) itu malah dapat dikatakan sebngai REPORT (yaitu tabel yg
disusun berdasarkan database, untuk keperluan tertentu)

Keinginan menyusun REPORT LAIN (yaitu seperti Tabel KANAN) teryata
sulit dilakukan kalau berdasarkan Tabel KIRI (Database-nya pak Fajar),
Kesulitan ini pun merupakan salah satu bukti bahwa tabel KIRI = strukturnya
belum berupa struktur tabel database.
(karena 'tabel database beneran' PASTI DAPAT DENGAN MUDAH dapat dibuat
tabel report dlm bentuk bagaimana pun): bahkan dengan pilihan berbagai cara
antara lain: dengan formula, dengan makro, dengan sql, dengan pivot tabel )


Jadi Jawaban kpd teman yg menanyakan "bgmana prakteknya"...

(1).
Kita konversi dulu Tabel KIRI tsb menjadi tabel dengan struktur tabel database;
semula (aslinya) seperti ini:
Nama Level Senin Selasa Rabu Kamis
Simon L1     ABC123      
Heru L1     ABC123      
Anton L1     ABC123      
Fajri L1     ABC123      
Simon   L2   ABC1234      
Heru   L2   ABC1234      
Anton   L2   ABC1234      
Fajri   L2   ABC1234      
Simon   L2     ABCD12    
Heru   L2     ABCD12    
Fajri   L2     ABCD12    
Simon     L3     AB1234  
Heru     L3     AB1234  
Anton     L3     AB1234  
Simon   L2         EFG123
Heru   L2         EFG123
Anton   L2         EFG123
Fajri   L2         EFG123

menjadi seperti ini (caranya dengan: "klik tombol" saja lah biar gampang)
Nama Level Hari dValue
Simon L1 Senin ABC123
Heru L1 Senin ABC123
Anton L1 Senin ABC123
Fajri L1 Senin ABC123
Simon L2 Senin ABC1234
Heru L2 Senin ABC1234
Anton L2 Senin ABC1234
Fajri L2 Senin ABC1234
Simon L2 Selasa ABCD12
Heru L2 Selasa ABCD12
Fajri L2 Selasa ABCD12
Simon L3 Rabu AB1234
Heru L3 Rabu AB1234
Anton L3 Rabu AB1234
Simon L2 Kamis EFG123
Heru L2 Kamis EFG123
Anton L2 Kamis EFG123
Fajri L2 Kamis EFG123

(2)
Jika anda sudah punya tabel berstruktur "database beneran"
maka membuat report dlm bentuk macem-macem tidak terlau sulit lagi
Tabel KANAN yg diinginkan pak Fajar itu, dapat di buat hanya dengan
SATU FORMULA Universal spt ini

=IF(SUMPRODUCT(($L$4:$L$21=$R5)*($M$4:$M$21=S$4)*($N$4:$N$21=S$3))=0,"",
  OFFSET($O$3,
  SUMPRODUCT(($L$4:$L$21=$R5)*($M$4:$M$21=S$4)*($N$4:$N$21=S$3)*(ROW($1:$18))),0))
(3)
'-------code vba agar tombol mau bekerja seperti diceritakan di atas--------
Private Sub CommandButton1_Click()
   '---RepToTdb---------------------------
   '  siti Vi / 8 feb 2010; for  milis XL-mania
   '-----------------------------------------

   Dim Rep As Range, Tdb As Range, HariBar As Range
   Dim n As Long, r As Long, c As Integer
  
   Set Rep = Cells(3, 2).CurrentRegion.Offset(1, 0)
   Set Tdb = Rep.Offset(0, Rep.Columns.Count + 2)
   Tdb(0, 1) = "Nama": Tdb(0, 2) = "Level":
   Tdb(0, 3) = "Hari": Tdb(0, 4) = "dValue"
   Set HariBar = Rep(0, 5).Resize(1, Rep.Columns.Count - 4)
   Application.Calculation = xlCalculationManual
   For r = 1 To Rep.Rows.Count - 1
      For c = 1 To Rep.Columns.Count - 4
         If Len(Rep(r, 4 + c)) > 0 Then
            n = n + 1
            Tdb(n, 1) = Rep(r, 1)
            Tdb(n, 2) = Rep(r, 2) & Rep(r, 3) & Rep(r, 4)
            Tdb(n, 3) = HariBar(c)
            Tdb(n, 4) = Rep(r, 4 + c)
         End If
      Next c
   Next r
   Application.Calculation = xlCalculationManual
   Me.Calculate
End Sub




----- Original Message -----
From: Mr. Kid
To: XL-mania@yahoogroups.com
Sent: Wednesday, January 27, 2010 9:33 PM
Subject: Re: ]] XL-mania [[ Data Aktifitas

Dear Pak Fajar,
Susun tabel dengan header : Nama, Level, Tanggal
Format as table atau buat named range dinamis untuk tabel normal tersebut
Summary bisa dengan pivot tables atau formula-formula summary
Regards.
Kid.



2010/1/27 Fajar S Gumay <fajarsg@huawei.com>
Dear Para Master XL,
Mohon bantuannya dengan file terlampir.
Saya mempunyai database aktifitas per orang per hari.
Inginnya sih data tersebut dapat lebih disingkat sehingga lebih mudah
membaca aktivitas orang tersebut.
Masalahnya datanya sudah mencapai ribuan, kalau dipindahkan satu persatu
akan merepotkan dan membuang banyak waktu.
Sudah dicoba pakai vlookup dan index tapi ga bisa juga atau mungkin ada trik lainnya?
Mohon petunjuknya agar dapat otomatis mencari data2 tersebut.
Terima kasih sebelumnya.
Fajar Sidik Gumay | PT. Huawei Tech Investment | 08119001195 | fajarsg@huawei.com

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Member ke 13,013 siapa ya? Sini mau dikirimin coklat :D           |
| Member ke 31,031 dapet iPod dehh.... :D :D :D                     |  
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| 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              |
+-------------------------------------------------------------------+
.

__,_._,___

Nenhum comentário:

Arquivo do blog