VBA Access - Incrémentation

Fermé

EmilieRose - 2 mars 2010 à 09:30
loacked - 20 juil. 2011 à 15:23

Bonjour,

Je suis sous Access 2007. J'ai un certain nombres de factures, je souhaite dans mon formulaire facture, incrémenter un champ de un en un à partir du dernier num facture.

Merci d'avance.

EmilieRose

A voir également:

VBA Access - Incrémentation
Access appdata - Guide
Find vba - Astuces et Solutions
Excel compter cellule couleur sans vba - Guide
Vba attendre 1 seconde ✓ - Forum VB / VBA
Acer quick access - Forum logiciel systeme

16 réponses

Réponse 1 / 16

EmilieRose
2 mars 2010 à 15:58

C'est bon ça fonctionne. Merci bcp de ton aide Balou. :-*

blux Messages postés 26703 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 4 mars 2025 3 328
2 mars 2010 à 16:23

Moi, c'est pas Balou...

Tu peux dire ce que tu as fait, ça peut intéresser les autres ?

loacked
20 juil. 2011 à 15:23

je pense qu'elle a du faire ça :

nom_du_champ = DMax("Num_facture","table-facture") +1

car ça marche chez moi :-)

merci à tous les deux !

Réponse 2 / 16

EmilieRose
2 mars 2010 à 14:29

UP :(

Réponse 3 / 16

balou
2 mars 2010 à 14:40

as tu une base de donnée ou est géré tes factures?

Réponse 4 / 16

EmilieRose
2 mars 2010 à 14:44

Balou, j'ai envoyé les tuples de la table facture sur ma nouvelle base de donnée.

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 16

balou
2 mars 2010 à 14:46

en fait tu voudrai que quand tu aille sur ton formulaire il te mette automatiquement un numéro de facture?
(je cherche a comprendre)

Réponse 6 / 16

EmilieRose
2 mars 2010 à 14:47

Voilà tout à fait. Sachant qu'il ne part pas de 0 mais du dernier numéro enregistrement.

Réponse 7 / 16

balou
2 mars 2010 à 14:49

une petite seconde n'étant pas expert access je regarde si je trouve une soluce

Réponse 8 / 16

EmilieRose
2 mars 2010 à 14:53

Merci c'est mimi comme tout Balou :-*

Réponse 9 / 16

blux Messages postés 26703 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 4 mars 2025 3 328
2 mars 2010 à 15:01

Salut,

une requête peut suffire, à mon avis :

SELECT MAX(num_facture)+1 FROM table_facture;

Réponse 10 / 16

EmilieRose
2 mars 2010 à 15:05

Je la place dans quelle procédure ? En form_load ?

Réponse 11 / 16

blux Messages postés 26703 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 4 mars 2025 3 328
2 mars 2010 à 15:12

Tu veux en faire quoi ?

Réponse 12 / 16

EmilieRose
2 mars 2010 à 15:18

Bah faut bien qu'elle soit affecté quelque part.......

blux Messages postés 26703 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 4 mars 2025 3 328
2 mars 2010 à 15:27

Ca, j'ai bien compris, mais tu veux en faire quoi, au juste : la mettre dans un champ de formulaire, l'utiliser pour générer un nouvel enregistrement...

Parce qu'on peut utiliser aussi la fonction DMax("Num_facture","table-facture").

Réponse 13 / 16

EmilieRose
2 mars 2010 à 15:29

L'insérer dans un champ du formulaire. Dès l'enregistrement d'une nouvelle facture, qu'il y ait direct le numéro d'afficher.

Réponse 14 / 16

blux Messages postés 26703 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 4 mars 2025 3 328
2 mars 2010 à 15:30

nom_du_champ = DMax("Num_facture","table-facture")

Réponse 15 / 16

EmilieRose
2 mars 2010 à 15:34

Cela ne marche pas, je l'ai pourtant mise dans "Private Sub numfacture_BeforeUpdate(Cancel As Integer)"

blux Messages postés 26703 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 4 mars 2025 3 328
2 mars 2010 à 15:46

et tu as mis quoi ?

Réponse 16 / 16

EmilieRose
2 mars 2010 à 15:51

C'est bon Balou, cela marche. Pas contre, cela me met le dernier enregistrement (qui existe déjà) alors que c'est le prochain que j'iamerai.

Cela me met le 220, qui existe déjà dans ma table (c'est le dernier), je souhaite le 221 vu que c'est un nouveau enregistrement.

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

C'est quoi le runtime Access ?

Acer quick access

ouverture d'un fichier excel à partir d'un code VBA