Bonjour Kevin et le forum,
J'avais été un peu vite avec ma 1ère proposition (qui marche également), mais voici une version 2 .
Le N° de facture apparait en cellule G7 avec la formule
=CONCATENER(TEXTE(G8;"jjmmaaaa-");SIERREUR(RECHERCHEV(FactureNom;Base;6;FAUX);""))
J'ai ajouté 2 boutons dans la feuille "Facture"
1. Pour initialiser la Base en fonction des ajouts éventuels dans la feuille "Présence Mai 2017" car je suppose que de nouvelles lignes vont être enregistrées.
2. Pour Imprimer la feuille Facture avec un choix (soit la facture présente à l'écran ou soit la totalité des factures)
Bien entendu dans le module1, il faut remplacer PrintPreview par PrintOut pour les 2 choix
ActiveWindow.SelectedSheets.PrintPreview
Cdt
Henri