I already have a report which uses running total overall and gives a running total of all records against each record .
It would be so useful for it to appear when a record is added to the continuous form rather than running the report.
I can get a full total to appear at the end of the record using
Private Sub Paid_in_AfterUpdate()
Dim rst As DAO.Recordset
Dim Paid_in As Integer
Dim Money1 As Integer
Set rst = Me.RecordsetClone
rst.MoveFirst
Do Until rst.EOF
If Not IsNull(rst![Paid_in]) Then
[Money1] = [Money1] + rst!Paid_in
End If
[Total_cash] = [Money1]
rst.MoveNext
Loop
End Sub
but it's the value of the entire recordset not the total at that point
[Total_cash needs to catch the value for the recordset up to and including the record any point in the record set.
Ive tried moving [Total_cash] = [Money1] around but just can't think it through.
Is there any way of acheiving this?
All help welcome
Thanks
Pete