Discussion :

[mindar]

bonjour je met en place une gestion informatisée d'un élevage

pour cela j'ai plusieurs point qui me chiffonne et me bloque


je voudrais avoir par le biais d'un formulaire et /ou du vba la possibilité de :

enregistrer 5 animaux identiques (fraterie) en une seule saisie ,

en clair je remplis mes champs une fois je donne le nombre de bestioles et il me duplique la saisie du nombre que je lui ai renseigné (bien sur l'id access s'incrémentera)

merci d'avance

[jean-paul lepetit]

Salut,

Possible en vba avec une boucle for next

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For x=1 to Nb_Fraterie
DoCmd.RunSQL "Insert into ta_table champ1,champ2,etc.... value valeur1,valeur2,etc...;"
Next x

[mindar]

bonjour j'ai essayé en rajoutant un champ pour saisir la valeur ça n'a rien donné est ce un probléme avec le value ,car le nombre de copie peut varier

donc j'avais mis le code suivant en sortie de champ mais j'ai aussi un bouton d'enregistrement des champs est ce lui qui m'a mis dedans ?

le code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Commande22_Exit(Cancel As Integer)
For x = 10 To Nb_fraterie
DoCmd.RunSQL "Insert into T_anx num_anx, value 0;"
Next x
End Sub