Discussion :

[automa]

bonjour
j'ai une table qui contient numérotation automatique, et date, je veux réinitialiser la numérotation a chaque nouvelle an , retour a 1 sans effacer les données de l'année précédente.
j ai pensé a faire une requête avec condition date et numéro mais je n'arrive pas
pouvez vous m'aidé sachant que je ne maîtrise pas actuellement le vba.
merci pour votre aide
bon courage

[marot_r]

Bonjour.

la numérotation automatique n'est pas desrtinée à te fournir un compteur d'enregistrement. Elle est prévue pour te donner un numéro garanti unique dans la table pour identifier ton enregistrement.

Ce que tu demandes n'est pas possible. Si tu veux vraiment faire cela alors il te faut avoir ton propre champ NumFature (entier long par exemple) et un champ AnneeFacure où tu vas toi-même mettre le numéro via du VBA en gérant le retour à un en début d'année.

Personnellement je te recommande de garder en interne le numéro automatique et de t'en servir pour faire tes relations et de n'avoir les champs NumFacture et AnneeFacture que pour l'affichage.

Tu as dans la FAQ un exemple pour trouver le prochain numéro :
https://access.developpez.com/faq/?p...elNumAutoHoles
qu'on peut adapter pour y adjoindre l'année.

Attention avec la solution de la FAQ il est impératif que NumFacture + AnneeFacture soit défini comme un index unique ou comme une clef primaire pour garantir que le système ne crée pas 2 factures avec le même numéro. La probablilité est très très faible mais elle existe.

Il y a quelque part sur le site un tutoriel avec une solution plus avancée mais je n'arrive pas à le localiser.

A+

[automa]

bonsoir

"Personnellement je te recommande de garder en interne le numéro automatique et de t'en servir pour faire tes relations et de n'avoir les champs NumFacture et AnneeFacture que pour l'affichage."


j ai pensé a cette solution mais pour la réalisé je tatonne,
merci pour votre proposition, je continu a cherché, et je vous tiens au courant
merci a vous tous

[hyperion13]

Salut
Je ne fais que passer
Ce que tu souhaites réaliser, sauf erreur, est une numérotation personnalisée.
Alors c'est ici.

[automa]

bonjour, merci pour votre aide
pour ce lien :
https://warin.developpez.com/tutorie...s/numauto2010/

c flou pour moi, je pense faire une requête mais comment écrire les critères !!!!

pour

https://access.developpez.com/faq/?p...elNumAutoHoles
j ai rien figé

d'autre astuces svp je n arrive pas a faire ma propre numérotation personnalisé
merci pour vos suggestions

[User]

Comme indiqué dans le tutoriel, il te faut garder ton champ Numéro-auto et créer en plus un champ Indice de type entier long pour ta numérotation personnalisé.

Ensuite, sur l'événement BeforeUpdate (avant Maj) d'un formulaire base sur la table, mettre un code de ce type, pour mettre à jour le champ Indice :

Code :

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

1
2
3
4
5
6
Private Sub Form_BeforeUpdate(Cancel As Integer)
 
    ' Incrémente de 1 l'indice maxi de l'année inscrite dans le champ DateFacture du formulaire :
    Me.Indice = nz(DMax("Indice","T_Facture", "Year(DateFacture)=" & Year(Me.DateFacture) ,0) + 1
 
End Sub

Ici je suppose que les champs de table "T_Facture" se nomment "DateFacture" et "Indice".

et j'utilise la fonction :

DMax (Expr, domaine, critères)

expr : le nom du champ
domaine : le nom de la table ou de la requête
critere : l'expression pour filtrer les données

la fonction nz renvoie 0 si la fonction DMax renvoie une valeur Nulle.

Cdlt,