Answer: How do I skip a row in a recordset?

Is yours now like this?

   Dim rs As DAO.Recordset

   Do While Not rs.EOF  

      intSkipRow = rs("SkipRow")

      If intSkipRow <> 1 Then
      
             'Do stuff for any real rows

      End If

      rs.MoveNext

   Loop