Tecnologia, programação e muito Visual FoxPro.

sexta-feira, 15 de janeiro de 2010

Re: ]] XL-mania [[ Sum Subtotal

 

kalau boleh memanfaatkan keadaan di kolom B
(where cells in kolom B yg setentang dgn SubTotal selalu berisi 1 karakter)
=SUMIF(B1:B39,"=?",C1:C39)
 
kalau hanya boleh merujuk kolom C saja, ya terpaksa begini:
=SumSubtotal(C1:C39)
 
tapi harus dipenuhi syarat bahwa di dalam array "itu" :
[v] data biasa (data yg di-subtotal) adalah konstanta bilangan
[v] data subtotal adalah formula yg menghasilkan bilangan
 
dan .....
(syarat tambahannya ini kok ndak enak sekalee yaa..
 pasti Mr.Kid & Mr.Abee kurang setuju karena pakai looping,
 do'i benci looping karena kelamaan prosesnya... he hi hi )
harus"mbikin" dulu udf spt dibawah ini /di VBA module umum (level aplikasi)

Function SumSubTotal(dRange As Range)
   ' siti Vi / menjumlah data yg berupa formula
   '-------------------------------------------
   Dim jumlah, dat As Range
   For Each dat In dRange
      If dat.HasFormula Then jumlah = jumlah + dat.Value
   Next
   SumSubTotal = jumlah
End Function
 


----- Original Message -----
From: Stanley Naibaho
To: XL-mania@yahoogroups.com
Sent: Wednesday, January 13, 2010 5:38 PM
Subject: ]] XL-mania [[ Sum Subtotal

Dear all,
Kalau ada satu arrayada beberapa subtotal bagaimana caranya menjumlahkan
subtotalnya saja atau reversal?
saya lagi perlu, tapi yang saya tau harus tambahkan kriteria tertentu kemudia pake sumif
(time consuming karena kriteria/description/items array nya tidak teratur per subtotal).
Thanks a lot for sharing
Maaf kalau mungkin sudah pernah ada yang bertanya hal yang sama

Regards,
Stanley Naibaho
 

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Tahun baru, kejar setoran lagi... Ada lowongan jadi direktur? :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