magogaНа форме есть несколько CombBox-ов, где я выбираю значения а потом сохраняю всё одной командой INSERT в таблицу. Некоторые параметры в ComboBox-ах не играют большой роли и могут оставаться пустыми. Вот когда я ничего в этих ComboBox-ах не выбираю и сохраняю запись, то выходит ошибка. Что, в этом случае нужно заменять значение Null ComboBoxa?
Вот команда:

If (IsNull(Me![ComboModel])) Then
MsgBox "Chose model!"
Else

CurrentProject.Connection.Execute "INSERT INTO Assets (Model, SerNum, InvNr, RcvDate, Deliverer, CalCycle, UserID) " _
& "VALUES ('" & Me![ComboModel] & "', '" & Me![txtSerialNr] & "', '" & Me![txtInventoryNr] & "', " _
& "'" & Format(Me.txtReceiveDate, "yyyymmdd") & "', " & Me![ComboDeliverer] & ", " _
& " " & Me![ComboCalibration] & "," & Me![ComboUser] & ")"
DoCmd.Close

End If


Попробуй если не выбрано ничего, тогда не указывай это поле в инсерте( списке полей в таблице и значениях)

magogaА если попробовать с командой
IIf(expr, truepart, falsepart)?
Я вот только не знаю, какое значение отправляет ComboBox в ячейку таблицы, если ничего не выбрано. Мне нужно, чтобы в этом случае ничего не посылалось, тоесть, чтобы ячейка пустой оставалась.
я предлагаю такое:
If (IsNull(Me![ComboModel])) Then
'MsgBox "Chose model!"
CurrentProject.Connection.Execute "INSERT INTO Assets (SerNum, InvNr, RcvDate, Deliverer, CalCycle, UserID) " _
& "VALUES ('" & Me![txtSerialNr] & "', '" & Me![txtInventoryNr] & "', " _
& "'" & Format(Me.txtReceiveDate, "yyyymmdd") & "', " & Me![ComboDeliverer] & ", " _
& " " & Me![ComboCalibration] & "," & Me![ComboUser] & ")"
DoCmd.Close

Else

CurrentProject.Connection.Execute "INSERT INTO Assets (Model, SerNum, InvNr, RcvDate, Deliverer, CalCycle, UserID) " _
& "VALUES ('" & Me![ComboModel] & "', '" & Me![txtSerialNr] & "', '" & Me![txtInventoryNr] & "', " _
& "'" & Format(Me.txtReceiveDate, "yyyymmdd") & "', " & Me![ComboDeliverer] & ", " _
& " " & Me![ComboCalibration] & "," & Me![ComboUser] & ")"
DoCmd.Close

End If
называется найди пару различий))