ник: osmor
Что с рекордсетом.... Рекордсет у вас по ходу пустой.
Поскольку присоединенный столбец в поле со списком "Группа" это столбец 1, то поле со списком принимает значения из поля КОД. т.е.
Me!Группа - вернет код который соответвует выбранной группе (1,2,3 и т.п.)
т.е. выш рекордсет будет пустой, т.е. в таблице нет записей у которых поле Группа равнялось бы числу.
ЧТо бызаработал Ваш вариант код должен быть таким
lSum = Nz(DLookup("SumInDay", "Группы", "код = " & Me!Группа), 0)
Me![Сумма].Value = lSum
|
или если реализовывать вариант с столбцом с ценой в поле со списком
Private Sub Группа_AfterUpdate()
Me![Сумма].Value = Nz(Me!Группа.Column(2), 0)
End Sub
|