aşağıdaki 2 kodu dener misiniz bunlar alt forma eklenecek

Private Sub Form_AfterDelConfirm(Status As Integer)

With Me.Recordset

.MoveFirst

Do Until .EOF

   Me.Mat_Queue_No = .AbsolutePosition + 1

  .MoveNext

Loop

End With



End Sub



Private Sub Form_AfterInsert()

Me.Mat_Queue_No = Me.Recordset.AbsolutePosition + 1

End Sub