В моей базе данных Access у меня есть таблица «Demande». Я хочу прочитать все записи в колонке "Numero de Commande" и прочитайте наибольшее число в столбце, чтобы я мог использовать этот номер для следующей новой записи.

Итак, вот мой стол:

Индекс ключа для Numero de Commande.

и вот мой код в настоящее время:

 Dim highestInt as Integer
 Dim newNumeroCommande as Integer

 Set currentDatabase = CurrentDb
 Set rstDemande = currentDatabase.OpenRecordset("Demande")

 ' Find the highest integer in the column "Numero de Commande"

 newNumeroCommande = highestInt + 1
 rstDemande.AddNew
 rstDemande("Numero de Commande").Value = newNumeroCommande 
 rstDemande.Update

Спасибо за всю помощь.