Discussion :

[boubilescu]

Bonjour

J'aurais besoin dans une appli que je développe de pouvoir écrire des enregistrements (factures) par lots dans une table avec une procédure qui trouve le dernier numéro de facture puis l'incrémente.

pour touver le dernier numéro, mon code suivant fonctionne.

C'est pour le réutiliser dans une boucle et écrire les données que j'ai du mal... si quelqu'un à une idée de procédure...

merci d'avance

[boubilescu]

J'ai oublié de coller mon bout de code pour trouver le dernier no de facture

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Dim Db As DAO.Database
Dim rst As DAO.Recordset
Dim DerFacture As Long
Dim monsql As String
Set Db = CurrentDb
Set rst = Db.OpenRecordset("SELECT Max(FactureDonnees.RefFact) AS DerFact FROM FactureDonnees")
DerFacture = rst!DerFact