Expand|Select|Wrap|Line Numbers
- Private Sub Command260_Click()
- Dim r As DAO.Recordset
- Set r = Form_frmABCD.Form.RecordsetClone
- r.MoveFirst
- Do
- If Nz(r(2)) = "" Then
- Stop
- 'Need to move form to this record. Bookmark??
- Form_frmABCD.RunSelectForm (1)
- DoEvents
- End If
- r.MoveNext
- Loop Until r.EOF
- End Sub
but it sees only the current row in the datasheet. r.MoveNext does not 'move' to the next row.
I understand why, but unsure what is a good solution. I could use the recordset values and write a new routine.
But if I could move to the next row in the Form automatically within the Do Loop nothing more would be needed.
But what command might do this, if it is possible?
Thanks for any help.