If Not IsNull(Form_.) Then = DLookup("", "", "= '" & Form_. & "'") = + 1 DoCmd.SetWarnings False DoCmd.RunSQL "UPDATE SET = '" & & "' WHERE = " & Form_. & "" Me..Requery
http://www.sql.ru/forum/1120700/pochemu-ne-rabotaet-dlookup