durumu alanının güncelleştirme sonrası olay yordamına
Me.SiraNo = DCount("[AdiveSoyadi]", "KisiData", "Durumu='" & [Durumu] & "' and Kimlik=" & [Kimlik]) + 1

bu kodu eklersen aynı kimlik numarasına sahip ve durumu aynı olan kayıt sayısının bir fazlasını sıra noya yazacaktır.