Hello everyone,
I have a listbox in a form that contains table names which may contain 1 or more table names. Assuming there are three tables in the list, each table has different data, I am trying to put all the field items in one master table. The code snipt below is doing it successfully except, it doesn't start in the first row of the master when a new table fields are inserted . After running the code the master table looks like:

Code:
fld1   fld2   fld3   fld4   fld5   fld6
 3      5
 4      6
              12       15
              13       16
              14       17
                            33       34

and I would like it to look like this:
fld1   fld2   fld3   fld4   fld5   fld6
 3      5      12     15     33     34
 4      6      13     16
               14     17 
Please help, I can't figure out what I am doing wrong, thank you.

Dim db As Database
Dim rs1, rs2 As Recordset
Dim lst As Integer


Set db = CurrentDb()

x = 0
f1 = 0
f2 = 1
lst = Me![mLst].ListCount
For j = 1 To lst
ItemNm = mLst.ItemData(x)
Set rs1 = CurrentDb.OpenRecordset(ItemNm)
Set rs2 = CurrentDb.OpenRecordset("MstrTbl")
cnt = (rs1.RecordCount) / 2
If Not rs2.BOF Then
rs2.MoveFirst
rs2.Fields.Refresh
End If
rs1.MoveFirst
For i = 1 To cnt
rs2.AddNew
rs2.Fields(f1) = rs1.Fields(0) 'Trim(rs1![Equipment) & "" ' save the item in table
rs2.Fields(f2) = rs1.Fields(1) 'Trim(rs1![Weight]) & "" ' save the item in table
rs1.MoveNext
rs2.Update
Next

x = x + 1
f1 = f1 + 2
f2 = f1 + 1
rs2.Close
rs1.Close
Set rs1 = Nothing
Set rs2 = Nothing
Next

Thank you,
Haj