[Résolu] Aide sur génération de code et remise à zéro

[guillaum]

Bonjour le Forum,

Je souhaite que la génération des numéros, que cela soit pour les factures, devis ou avoirs, se remettent à zéro tous les ans.

Pour être plus précis, c'est la fin des numéros qui doit reprendre à zéro. Les numéros sont composés comme ceci:
Devis: année (yyyy) & mois (mm) & numérotation (000)
Facture: année (yyyy) & mois (mm) & numérotation (000)
Avoir: A & année (yyyy) & mois (mm) & numérotation (000)

Je met un fichier en exemple pour que cela soit plus simple.

Je vous remercie par avance pour votre aide!

Guillaume.

 

[CHALET53]

Re : Aide sur génération de code et remise à zéro

Bonjour,

tu te sers du numéro de ligne pour générer ton numéro de facture. C'est sûr qu'au changement d'année, le numéro de ligne n'est pas 000 (ce que tu souhaites)
Tu as deux options :
1) tu gères le dernier numéro de facture dans une cellule (feuille Pilote par exemple) : à chaque facture générée, tu récupères ce numéro augmenté de 1 et tu le réinscris dans ta cellule (feuille Pilote) pour la facture suivante
A chaque changement d'année (année de facture différent de l'année de la facture précédente) tu remets la cellule à 0

2) tu testes l'année avec l'année de la ligne précédente de la feuille Histo : si elle est différente, tu stockes (un peu comme en 1 le dernier numéro de ligne de l'année précédente
ton numéro de facture devient c.row - la valeur inscrite dans la cellule où tu as stocké le numéro de la dernière ligne de l'année précédente

Bon courage

a+

 

[guillaum]

Re : Aide sur génération de code et remise à zéro

Bonjour CHALET53, le forum,

Merci CHALET53 pour ta réponse, cependant ce n'est pas moi qui utilisera ce fichier et par conséquent je cherche une solution qui soit automatique.

Je suis débutant en vba et ne vois pas comment faire. Je cherche et fais des tests mais pour l'instant c'est pas bon.

Je vous remercie pour l'aide que vous pouvez m'apporter.

Guillaume.

 

[CHALET53]

Re : Aide sur génération de code et remise à zéro

bonjour,

Un essai pour Facture et Devis
Cellules nommées en feuille Pilote :
Nofact : Numéro de facture
NoDevis : Numéro de devis
Lorsque la date du jour est différente de la date de la ligne précédente remise à 0 de la cellule concernée
puisqu'il y a changement d'année
Le programme va chercher le numéro de facture dans la cellule Nofact

Pour tester
Faire des saisies en 2013 (quelques unes)

Forcer la date système à 2014
et Ensuite, regénérer une facture
A la fin du test, remettre la date en 2013

a+

 

[guillaum]

Re : Aide sur génération de code et remise à zéro

Bonjour CHALET53,

Merci pour ta réponse, la fin des numéros générés reste a 1 même si je change d'année.

Si je comprend bien ton code, les cellules nofact et nodevis se remettent a zéro tout seul?

Je débute en VBA, je suis désolé de ne pas tout comprendre.

En tout cas merci pour ton aide.

Guillaume.

 

[CHALET53]

Re : Aide sur génération de code et remise à zéro

Oui, les cellules se remettent à 0 au changement d'année
correction dans cette version

 

[guillaum]

Re : Aide sur génération de code et remise à zéro

Bonjour CHALET53,

Merci pour cette réponse rapide, et cela fonctionne!

Je vais bien scruter tout le code pour bien comprendre complètement le fonctionnement.

Encore merci!

Guillaume.