coba gunakan code ini:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
  If PrintCount = 1 Then
    txtPagePcs = txtPagePcs + Pcs
  End If
End Sub

Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As
Integer)
  txtPagePcs = 0
End Sub

buat satu object textbox beri nama txtPagePcs pada PageHeader, dan
kasus di atas kolom Pcs yg saya total

semoga membantu



Nurhasim




--- In [email protected], "s3kl3b4t" <[EMAIL PROTECTED]> wrote:

salam kenal semua

saya mau tanya bagaimana cara menghitung jumlah per halaman pada report.

misal:
ada tabel gaji isinya nama, gaji. recordnya ada 50
dibuat report per lembarnya 5 orang


               gaji bulan september
                                              lembar 1
-------------------------------------------------------
no  |  Nama                  |    Gaji 
-------------------------------------------------------
1   | Budi                   | 5000
2   | Adi                    | 5000
3   | Cici                   | 5000
4   | Yudi                   | 5000  
5   | Rudi                   | 5000
-------------------------------------------------------
Jumlah lembar 1              | 25000
-------------------------------------------------------

lembar kedua bentuknya sama cuma beda data yaitu record 6 dan seterusnya.
mohon pencerahan. thanks b4

salam

--- End forwarded message ---


Kirim email ke