Créer un nbr d'enregistrement en fonction d'une qt

merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour.
Je reçois du matériel dont je voudrais gérer la distribution auprès des membres de mon club.
En me basant sur les factures je peux facilement créer une table, une requête, un tableau croisé dynamique, avec le numéro de facture, la référence de chaque article, et la quantité de chaque article.


Mais j'aimerais qu'a partir de là access me génère automatiquement un nombre d'enregistrement par article correspondant à la quantité renseignée.
Ainsi je pourrais compléter les enregistrement avec le nom du destinataire de chaque article. (exemple réalisé sous excel)


SOS.
Je débute avec les macros avec l'assistant...
Merci d'avance
A voir également:

1 réponse

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, je pense que cela peut se faire, en VBA.
0
merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Je pense même qu'il n'y a pas d'autre solution... et c'est là que j'ai besoin d'aide...
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
voici un exemple:
Sub creation()
Dim rsin As DAO.Recordset, rsout As DAO.Recordset
Dim i As Long
Set rsin = CurrentDb.OpenRecordset("mer_in")
Set rsout = CurrentDb.OpenRecordset("mer_out")
Do While Not rsin.EOF
    For i = 1 To rsin!quantite
        rsout.AddNew
        rsout!facture = rsin!facture
        rsout!Reference = rsin!article
        rsout!quantite = 1
        rsout.Update
    Next i
    rsin.MoveNext
Loop ' Do While Not rsin.EOF
End Sub
0
merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Je viens de copier la séquence et de faire des test avec des tables bidon mer_in et mer_out.
Ca semble correspondre a ce que je cherche.
Je vais maintenant tenter d'adapter le code à mes tables.
Merci beaucoup :-)
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
merci de l'info. ne torture pas tes tables, en principe c'est le code qui doit s'adapter à ta situation.
0
merlinc Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
CA MARCHE :-) étape 2 validée!
Oui j'ai adapté le code à mes tables.

Maintenant je m'attaque à l'ajout des lignes ainsi générées dans une table qui ne ce fera pas écraser à chaque exécution de la macro.
0