Berikut ini contoh kalau querynya hanya ada 12 bulan, dan masing2 hanya ada satu
value.

Bulan di sini digunakan angkanya. Jadi januari = 1, februari =2 dst.

 

Karena ini pakenya Dsum , ya pastinya akan lama eksekusinya tabel dengan banyak
record.

 

SELECT 

tblContoh_SumRecord.Bulan, 

tblContoh_SumRecord.Jumlah, 

CInt(DSum("Jumlah","tblContoh_SumRecord","[Bulan]<=" & [Bulan])) AS RunningSum

FROM tblContoh_SumRecord;

 



 

Sdgkan kalau baris yang di olah panjang dan lebaar. Ya harus pake vba lagi.

 

Misalnya untuk penjumlahan harian selama 365 hari sbb:

 

TBL_B

     DDATE

     DBLVALUE

     RunningSum --> untuk menampung penjumlahan

 

 

Sub RunningSum()

    Dim rst As DAO.Recordset

    a = 0

    Set rst = CurrentDb.OpenRecordset("SELECT * FROM TBL_B ORDER BY DDATE")
'--> kalau mau dihitungnya bener, data mesti di URUT sesuai kebutuhan.

    If Not rst.EOF And Not rst.BOF Then

        Do Until rst.EOF

           a = a + rst!dblValue

           rst.Edit

           rst!RunningSum = a

           rst.Update

           rst.MoveNext

        Loop

    

    End If

    

    Set rst = Nothing

  

End Sub

 

 

 

Salam, MBA

  _____  

From: [email protected] [mailto:[email protected]] On
Behalf Of Budi.P
Sent: Monday, November 02, 2009 11:42
To: Belajar Access
Subject: [belajar-access] Sum Record

 






siang teman2,

sy mau punya data sbb,

bulan  jumlah
jan      10
feb      15
mar      20
dst...

yg ingin sy tanyakan bagaimana cara buat query agar data tsb menjadi:

bulan  jumlah
jan      10
feb      25 (dijumlah dgn rec sebelumnya)
mar      45
dst...

thks atas bantuannya..

salam,
Budi

 

  _____  

Coba Yahoo! Mail baru yang LEBIH CEPAT. Rasakan bedanya sekarang!
<http://id.mail.yahoo.com> 






No virus found in this incoming message.
Checked by AVG - www.avg.com
Version: 9.0.698 / Virus Database: 270.14.43/2474 - Release Date: 11/01/09
14:38:00


<<image002.jpg>>

Kirim email ke