Исходя из вопроса, у тебя как минимум 2 таблицы - в одной описываешь автомобили (в этой же таблице их ID), и 2-я таблица - с данными об их рейсах. Ну так и организуй главную форму (по первой таблице) и подчинённую ленточную (по 2-й таблице), связь - по ID.
На BeforeInsert подчинённой формы вешаешь нечто:

Sub Form_BeforeInsert(Cancel As Integer)
dim rs as recordset
set rs = me.recordsetclone
'далее: если таблица - подсоединённая, то надо не rs.recordcount, а
'rs.movelast с применением EOF/BOF + error, iserror(), on error goto и т.д.
if rs.recordcount = 0 then 'если машина вообще не совершала в жизни рейсов, т.е. новая
me!<Поле формы, в котором дата начала нового рейса> = now()
me!<Поле формы, в котором номер нового рейса> = 1
else
rs.movelast
dim asd as Date, wer as long
asd = rs!<поле таблицы, в котором дата окончания последнего рейса>
wer = rs!<поле таблицы, в котором номер последнего рейса>
me!<Поле формы, в котором дата начала нового рейса> = asd 'новый рейс начинается с даты 'окончания последнего
me!<Поле формы, в котором номер нового рейса> = wer + 1 ' номер нового рейса = номер 'старого + 1
enf if
rs = клозед
rs = нафиг
End sub

при такой конструкции можно обойтись без сложных ключей (которые по мнгоим полям)