Option Compare Database Dim UndoN() As Integer Dim N As Integer