Numérotation et enregistrement automatique des factures

Bonjour
je cherche quelq'un qui m'aide a écrire procédure en vba
etant donnée numéro facture en A74 comme :
So/2008/01001
So étant nom sté, 2008 : l'année, 01: le mois, 000, le numéro de facture qui commencera biensur par 001 et ensuite 002 ....
je cherche comment écrire en VBA pour faire incrémentation automatique en cliquand sur un Bouton
"Valider".

• dans feuille liste _facture

chaque Facture une fois Valider j'enregistre les données dans un tableau
chaque année dans un tableau.(et si c'est possible dans une feuille)
merci d'avance.

Bonjour,
Juste au passage avec la formule suivante en cellule [A74]

="SO-"&ANNEE(C74)&"-"&TEXTE(NBVAL(liste_facture!C4:C46)+1;"00#")

Bonsoir,
Vous insérez la formule

&TEXTE(MOIS(C74);"0#")

à cette endroit :

Bonjour

La formule de Le Pingou (salut amical) mise en place
https://www.cjoint.com/c/KHmoK7tklzB

Si tu veux aller un peu plus loin, j'ai créé une feuille modèle qui sera dupliquée chaque année, et les feuilles recap porteront le nom de l'année (plus logique), tu complètes la feuille Facture comme demandé.
Il y a deux feuilles masquées, sont elles utiles ici ?

Cdlmnt

Bonjour

Un début
https://www.cjoint.com/c/KHnlL2T56DB

RQ1.J'ai fait un peu de ménage
RQ2. Ne tester que pour l'année 2018

Cdlmnt

1. il ya un message d'erreur au niveaux nouvelle Facture .
essaies avec celui là
https://www.cjoint.com/c/KHoiapeAYcB
2. est ce que je peux changer la mise en page de la feuille Facture
oui, il suffira de changer les valeurs des constantes en début de code
3. chaque année dans une feuille n'est ce pas
oui, lorsque la feuille qui a pour nom l'année de la date , n'existe pas, elle sera créée automatiquement

Cdlmnt

Allez, une dernière
J'ai récupéré (il y a longtemps) la fonction chiffrelettre que j'ai adaptée pour traiter les millimes (en euro on se contente de centimes)
Tu testes, et si tout va bien, tu pourras supprimer les feuilles masquées
https://mon-partage.fr/f/ySwWiJfO/

je veux bien et si c'est possible bien sûr, me faire une mise ajour dans le 3ém classeur TVA
j'attend votre réponce (je veux bien votre intervopntion)
???

Bonne suite dans ton travail

Cdlmnt

Bonjour,
Bonjour,
J'ai donné un œil à votre classeur et c'est incompréhensible donc impossible de dire quoi que ce soit.
Est- possible se savoir d'où viennent les données et à quoi serve les zones de textes... ?

Bonjour

Comme dit l'ami Le Pingou, très difficile, voire impossible d'y voir clair, aussi bien dans les feuilles que dans le code des macros

Quelques remarques quand même

1. Les cellules fusionnées créent (toujours) des problèmes avec les macros
J'ai dé-fusionné A7:B7 et C7:D7
et je les ai centré sur 2 colonnes (pour conserver ton visu)

2. j'ai nommé les cellules
A7 > annee et C7 > mois

3. Dans le code : Module Constantes
j'ai attribué un nom (qui parle un minimum) à chacune des ces 2 cellules
Public Const celannee = "annee"
Public Const celmois = "mois"
comme ça, tu auras dans ce module la liste des cellues/plages clés de ta feuille

4. et dans le code
If [C7].Value = 12 Then
deviendra
if [celmois] = 12 then
ce qui est déjà plus lisible
Attention, faire ces manips sur une copie du fichier

Si tu inseres/supprimes des lignes dans ta feuille, excel conservera la correspondance nom-cellule, et tu n'auras pas à toucher au code dans tes macros (voir les précédents fichiers)

Il te reste à faire la même chose pour toutes les cellules touchées par la macro

c'est à peu près tout ce que je peux te proposer

Si un jour tu veux vraiment tout reprendre, il y aura un gros chantier

- faire une feuille modèle où les données seront organisées (beaucoup) plus clairement/simplement
actuellement, en Feuille 2021,
En A7 on a 2021 comme année
entre A7 et A768
- des dessins Picture 2, .... dont les noms ne parlent pas beaucoup
- des pseudos-boutons Groupe 59, ... idem
- des valeurs B11, ...
- des formules B25, ...
tout ça, un peu partout.
en A768:A798 un tableau Vente juin/2021
etc...
en A850:A851 un tableau de report tva
puis
En A856 on a 2020 comme année
et à partir de A857 ça recommence avec des tableaux différents jusqu'en A1705 !!!

en l'état, c'est illisible/ingérable pour quelqu'un qui n'est pas à l'origine du fichier

- écrire un cahier des charges précis décrivant ce que doivent faire les macros

Question, est ce que ça vaut le coup, si le fait de nommer les cellules/plages suffit ......

https://www.cjoint.com/c/KHppCVciGDB

Cdlmnt

bonjour
j'ai appliquer la forumle mais il me donne comme résutat:SO-2018-003
or que j'ai comme derniere facture SO-2019-022 je veux avoir comme resultat: SO-2019-023
peut etre il faut integrer la fonction STXT mais je sais pas comment faire.
salutations

Bonjour,
Et voici la nouvelle formule

="SO-"&ANNEE(C74)&"-"&TEXTE(CNUM(DROITE(INDEX(liste_facture!C1:C46;NBVAL(liste_facture!C4:C46)+3);3))+1;"00#")

bonsoir
merci ca marche tres bien et comment est ce q'oun peu introduir dans cette fameux formule
le mois cad avoir comme résultat :SO-2019-07023(07:mois en cours ou bien mois de c74)
salutations

Bonjour
oui ca marche trés bien
maintenanat ya t'il des trucs sans VBA pour ajouter automatiquement un 1 dans dans numero facture .
comme case a cocher ou autre chose pour avoir comme resultat : SO-2018-07024 en cochant sur nouvelle facture ou bien case a cocher valider par exemple.
merci beaucoup.

Bonjour,
Je pense que vous n'avez pas compris, la formule génère automatiquement le numéro suivant.
Lorsque vous aurez renseigné [liste_facture] vous aurez le nouveau numéro en [A74]

Re
alors là c'est vrais je n'est pas compris commennt ca ce fait sauf que j'ai essayyer d'appliquer la formule et ca fonctionne mais comment incrementer je ne sais pas (comment renseigné [liste_facture] vous aurez le nouveau numero)
je veux bien comprendre comment et oû appliquer cette formule( si c'est possible m'envoyer un fichier pour mieux comprendre)
a vous lire
merci

Bonjour Mr
Oui bien sur j'aime bien, ce que vous m'avez proposé est plus logique et pratiquable
les deux feuilles masquées pour tranformer en toute lettre le montant TTC(si c'est possible une petite révision
https://www.cjoint.com/c/KHmpoSMvJr6
merci beaucoup.

Bonjour
https://www.cjoint.com/c/KHnitRxnXvt
j'ai oublier d'ajouter les nouveaux Feuilles
A vous lire
Bonne journée et merci.

Bonjour
il ya un message d'erreur au niveaux nouvelle Facture .

• est ce que je peux changer la mise en page de la feuille Facture parceque l'orsque j'affiche le préimprimer de la facture la mise en page ne tombe pas juste.(parfois j'utilise le préimprimer de la facture avec entete (boton affiche/masqué)pour imprimer)
• chaque année dans une feuille n'est ce pas?(création de nouvelle feuille automatique)

Cdlmnt.

Bonjour
Ca Marche Bien
est ce q'on peu fusionner les deux boutons transfert et nouvelle facture en un seul bouton (enregitrer et nouvelle facture) cad en cliquand sur un seul bouton en fait le transfert et j'aurais la main de saisir une nouvelle facture avec nouveau N° incrementer et afficher la date du jour par défaut tout en effaçant les données de l'ancien facture(raz)
une fois le tableau est rempli est ce qu'il ya création de nouveau tableau tout en tenant compte de l'ancien pour faire la suite
les feuilles masquer pour transformer en toute lettre que vous en dite(est ce qu'il ya mise a jour)
merci beaucoup.

Oui

• j'ai changer dans date l'année au lieu de 2021 je veux revenir a l'année 2018 pour saisir une autre Facture en 2018 : le numéro ne prend pas ;

SO-2018-09-024(puisque la derniére en 2018 est ............-023 tandisque dans Hakim-12 l'incrémentation en 2018 marche bien .

• une fois le tableau est rempli est ce qu'il ya création de nouveau tableau tout en tenant compte de l'ancien pour faire la suite

Cdlmnt.