Budi
Dari: Murid Belajar Access <[email protected]>
Kepada: [email protected]
Terkirim: Sen, 2 November, 2009 12:49:43
Judul: RE: [belajar-access] Sum Record
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.OpenRecor dset("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:
belajar-access@ yahoogroups. com [mailto:belajar- acc...@yahoogrou ps.com] 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!
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
Lebih aman saat online.
Upgrade ke Internet Explorer 8 baru dan lebih cepat yang dioptimalkan untuk Yahoo! agar Anda merasa lebih aman. Gratis. Dapatkan IE8 di sini!
