Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > Modélisation
Modélisation Le forum qui vous aide à résoudre vos questions relatives à la modélisation (tables et relations) de votre base de données sous Access. Pour les états et les formulaires, postez dans le forum IHM.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 01/06/2007, 16h22   #1
Invité régulier
 
Inscription : juin 2007
Messages : 47
Détails du profil
Informations personnelles :
Âge : 36
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2007
Messages : 47
Points : 7
Points : 7
Par défaut une entrée pour plusieurs enregistrement

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
mindar est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 01/06/2007, 17h14   #2
Membre émérite
 
Avatar de jean-paul lepetit
 
Inscription : février 2005
Messages : 809
Détails du profil
Informations personnelles :
Âge : 56

Informations forums :
Inscription : février 2005
Messages : 809
Points : 830
Points : 830
Salut,

Possible en vba avec une boucle for next

Code :
1
2
3
For x=1 to Nb_Fraterie
DoCmd.RunSQL "Insert into ta_table champ1,champ2,etc.... value valeur1,valeur2,etc...;"
Next x
__________________
Ils ne savaient pas que c'était impossible, alors il le réalisèrent (Mark Twain)
jean-paul lepetit est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/06/2007, 09h47   #3
Invité régulier
 
Inscription : juin 2007
Messages : 47
Détails du profil
Informations personnelles :
Âge : 36
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2007
Messages : 47
Points : 7
Points : 7
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 :
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
mindar est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 07h21.


 
 
 
 
Partenaires

Hébergement Web