Microsoft Access : How to create account tracking system Part 2 | explained step by step

This video will guide you on How to create account tracking system .

This system is very useful particularly on tracking collectibles, Payables, Bank Account Transactions, Loans Amortization, lending's Payment Tracking , daily collections, vs daily collections and financial transactions flow documentation by account.

Featuring: Run Sum Function

For your convenience I added Available Subtitles
(Click in video settings to select your language Subtitles)
English
Hindi
Urdu
Arabic
French
Bangla
Malay
Vietnamese
Urdu

#AccountTrackingSystem #FinancialTracking #DailyAccountTracking

#AccountTrackingSystem
#FinancialTracking
#AccountTracking
#DailyFinancialTracking
#DailyAccounting
#LoanAmortizationPaymentsTracking
#LendingPaymentTracking

#RUN SUM MODULE
'credit to the origin/creator of this module

Option Compare Database

Function RunSum(F As Form, KeyName As String, KeyValue, _
FieldToSum As String)
Dim rs As DAO.Recordset
Dim result

On Error GoTo Err_RunSum

' Get the form Recordset.
Set rs = F.RecordsetClone

' Find the current record.
Select Case rs.Fields(KeyName).Type
' Find using numeric data type key value?
Case DB_INTEGER, DB_LONG, DB_CURRENCY, _
DB_SINGLE, DB_DOUBLE, DB_BYTE
rs.FindFirst "[" & KeyName & "] = " & KeyValue
' Find using date data type key value?
Case DB_DATE
rs.FindFirst "[" & KeyName & "] = #" & KeyValue & "#"
' Find using text data type key value?
Case DB_TEXT
rs.FindFirst "[" & KeyName & "] = '" & KeyValue & "'"
Case Else
MsgBox "ERROR: Invalid key field data type!"
GoTo Bye_RunSum
End Select

' Compute the running sum.
Do Until rs.BOF
result = result + rs(FieldToSum)

' Move to the previous record.
rs.MovePrevious
Loop

Bye_RunSum:
RunSum = result
Exit Function

Err_RunSum:
Resume Bye_RunSum

End Function

✅ Recommended playlists:

Worksheet Basics

Microsoft Excel Essentials

Ms Access Fundamentals Series

Microsoft Access Essentials

[phoenix]

Thanks for shring this informational video.

[ayubkhanccnpp]

Dear kamayo ako, Thanks for this womerful tutorial and i was not able to find the module in video description. pls send the description