ник: osmor
читаете Help по ItemsSelected
колучаете кодНакладной для каждой выбранной записи
запросом на добавление добавляете запись с кодомв таблицу "оплаты"
currentdb.Execute "INSERT INTO [Оплаты] ([КодНакладной]) Vulues (" & КодИзСписка & ")"
(если нужны еще какие-то поля можно их сразу добавить
или добавляйте используя метод AddNew объекта recordset