[Ruk_grupp].Value = DLookup("[Ruk_grupp]", "[]", [Uchet1] = [Uchet1])
[Uchet2].Value = Nz(DLookup([Uchet2], "[]", [Uchet1] = [Uchet1]), 0)
http://www.sql.ru/forum/1068607/dlookup-dlya-obnovleniya-chislovogo-polya