VBA/access Generation numero

Fermé
tuany Messages postés 19 Date d'inscription vendredi 31 octobre 2003 Statut Membre Dernière intervention 9 février 2008 - 22 janv. 2005 à 01:18
random Messages postés 1612 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 30 mars 2006 - 22 janv. 2005 à 07:40
je voudrai dans le formulaire Etudiants (sous Access) dans la case Num_etudiant generer automatiquement un Nombre a partir du derniere entree ( ex: si etudiant a la 4eme ligne son num c'est 4)
et ca s'execute a l'entree du formulaire et je rentre le code suivant :

Private Sub Num_étud_Enter()
Dim i As interger
i = 0

Do
If [tables]![Etudiants]![Num_étud] <> "" Then
i = i + 1
Loop Until [table]![Etudiants]![Num_étud] = ""

Num_étud = i + 1

End Sub

mais si je met "Public sub", ca fait rien, et si je met "Sub" aussi
merci d'avance!!!
A voir également:

1 réponse

random Messages postés 1612 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 30 mars 2006 155
22 janv. 2005 à 07:40
si tu faisais une requête
avec fonction de regroupement et max tu obtiendrais la plus grande valeur
tu y ajouterais 1
puis tu ferais pour l'enregistrement suivant requete.requery
elle est pas belle, la vie ?
0