This post is a response to a video I have on Youtube:
“After running your solution in different databases, I found out that it only works if there are no duplicate values within the Number field (in your tblRunningSum). Once there are duplicate values, the row numbering gets corrupted. Any idea how to fix this? I’m desperately trying to find a solution for numbering row in a query when there are duplicates values in my main field.”
I see the issue, the way to order the records with Dcount works when we don’t have any duplicates, but when there are duplicates, all the records containing the same value get the same order by value.
Here is the way I probably would deal with it according to the knowledge I have about the issue:
1. Add a field to “tblRunningSumDups” (just a copy of tblRunningSum)
…and then I would run the following code (new module, then press F5 to run the code) to add some numbers to put the records to order by.
Dim rst As Recordset
Dim intCounter As Integer
Set rst = CurrentDb.OpenRecordset("SELECT OrderBy FROM tblRunningSumDups ORDER BY number", dbOpenDynaset)
intCounter = 1
Do Until rst.EOF
rst.Fields("OrderBy") = intCounter
intCounter = intCounter + 1
Set rst = Nothing
Here is the result:
Please let me know if you have any questions.