pak Budi, Terimakasih penjelasannya
________________________________ From: Budi.P <[email protected]> To: [email protected] Sent: Thu, November 5, 2009 9:37:36 AM Subject: Bls: Bls: [belajar-access] Sum Record CInt(DSum("Jumlah" ,"tblContoh_ SumRecord" ,"[Bulan]<=" & [Bulan])) Cint = mengubah ke Integer "Jumlah" = nama field yg akan dijumlah "tblContoh_ SumRecord" = nama table atau query dari field jumlah "[Bulan]<=" & [Bulan] = kriteria/kondisi utk menjumlahkan field "jumlah" bulan sekarang dengan bulan sebelumnya Budi ________________________________ Dari: Masyruchi Se <mas_masyruchi@ yahoo.com> Kepada: belajar-access@ yahoogroups. com Terkirim: Rab, 4 November, 2009 14:55:44 Judul: Re: Bls: [belajar-access] Sum Record Pak rumus berikut kalau di kalimatkan gmn pak? CInt(DSum("Jumlah" ,"tblContoh_ SumRecord" ,"[Bulan]<=" & [Bulan])) AS RunningSum FROM tblContoh_SumRecord ; thank's ________________________________ From: Budi.P <bd...@yahoo. com> To: belajar-access@ yahoogroups. com Sent: Tue, November 3, 2009 4:10:23 PM Subject: Bls: [belajar-access] Sum Record thks mas sudah berhasil walaupun loadnya agak lambat... Budi ________________________________ Dari: Murid Belajar Access <murid.belajaraccess @yahoo.co. id> Kepada: belajar-access@ yahoogroups. com 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! ________________________________ Yahoo! Mail Kini Lebih Cepat dan Lebih Bersih. Rasakan bedanya sekarang!
