ник: Анатолий (Киев)
1. Для всех записей с Группа=100 в таблице-источнике:
CurrentDB.Execute "UPDATE Таблица SET [Группа] = 109 WHERE [Группа] = 100;"
Me.Refresh
|
2.Только для тех, что могут быть отфильтрованы в форме:
With Me.RecordsetClone
.FindFirst "[Группа] = 100"
Do Until .NoMatch
.Edit
![Группа] = 109
.Update
.FindNext "[Группа] = 100"
Loop
End With
|
В любом случае перед выполнением операции нужно сохранить изменения в текущей записи формы, например так:
If Me.Dirty Then Me.Dirty = False