Compteur de serie

bnac11 -  
pilas31 Messages postés 1878 Statut Contributeur -
Bonjour,
j'ai tracer un model de bon de sortie avec excel;et j"aimerai bien savoir comment utiliser une macro de sorte que le nbre de suivi de serie change apres chaque impression c-a-d:
bs n°1/2013 apres tirage il faut que je trouve sur mon model de bon sortie bs n°2/2013

A voir également:

1 réponse

pilas31 Messages postés 1878 Statut Contributeur 647
 
Bonjour,
Voici une suggestion :
Dans une feuille que j'ai nommée « Paramètres »
On gère deux cellules, par exemple A2 qui contient l'année et B2 qui contient le n° de Bon de sortie.
Dans le bon de sortie lui-même on utilise la valeur calculée =B2 & "/" & A2
Ainsi la valeur est bien de la forme 2/2013
On place ensuite la macro VBA suivante :
Dans le dossier de macro « ThisWorkbook » (pour aller dans l'éditeur VBA faire ALT+F11)
Private Sub Workbook_BeforePrint(Cancel As Boolean)  
Sheets("Paramètres").Cells(2, 2) = Sheets("Paramètres").Cells(2, 2) + 1  
End Sub

Ainsi à chaque impression la cellule B2 est incrémentée de 1.
Si des impressions ont été faites par erreur on peut aller modifier le compteur manuellement et au changement d'année on peut modifier l'année en A2

A+

Cordialement,
0