-----Message d'origine-----
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message de
news:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:75c701c3e751$69e30a00$a401280a@phx.gbl...
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message de
news:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message de
news:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:75c701c3e751$69e30a00$a401280a@phx.gbl...
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message de
news:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:78bb01c3e756$ed1e3750$
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivrepour ajouter le bon nombre d'enregistrement avec le
comptage de la bouclesur le nombre d'articles saisis. si tu veux un coup de
main pour la requêtetu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message denews:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentantN° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:78bb01c3e756$ed1e3750$a601280a@phx.gbl...
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:75c701c3e751$69e30a00$a401280a@phx.gbl...
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:78bb01c3e756$ed1e3750$
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivrepour ajouter le bon nombre d'enregistrement avec le
comptage de la bouclesur le nombre d'articles saisis. si tu veux un coup de
main pour la requêtetu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message denews:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentantN° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:78bb01c3e756$ed1e3750$
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivrepour ajouter le bon nombre d'enregistrement avec le
comptage de la bouclesur le nombre d'articles saisis. si tu veux un coup de
main pour la requêtetu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message denews:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentantN° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:78bb01c3e756$ed1e3750$a601280a@phx.gbl...
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:75c701c3e751$69e30a00$a401280a@phx.gbl...
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message de
news:78bb01c3e756$ed1e3750$
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivrepour ajouter le bon nombre d'enregistrement avec le
comptage de la bouclesur le nombre d'articles saisis. si tu veux un coup de
main pour la requêtetu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message denews:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table, je
voudrais dupliquer les enregistrements en incrémentant
de1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentantN° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
-----Message d'origine-----
bonjour
quand tu es dans l'editeur vba, tu vas dans
outils/références et tu coches la réf Microsoft dao 3.xx
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"didier" a écrit
dans le message de news: 7ad201c3e7db$c08bfe40
Bonjour
Le problème c'est que je commence en vba et j'ai du mal à
tout comprende donc j'ai copié tel quel ta procédure
Il me met une erreur de compilation : Type non défini par
l'utilisateur non défini.
Lla ligne surlignée est Dim Rst As DAO.Recordset-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement envba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tesenregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:78bb01c3e756$ed1e3750$
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivrepour ajouter le bon nombre d'enregistrement avec le
comptage de la bouclesur le nombre d'articles saisis. si tu veux un coup de
main pour la requêtetu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message denews:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque
enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête
ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table,
je
voudrais dupliquer les enregistrements en incrémentant
de1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentantN° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
.
-----Message d'origine-----
bonjour
quand tu es dans l'editeur vba, tu vas dans
outils/références et tu coches la réf Microsoft dao 3.xx
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de news: 7ad201c3e7db$c08bfe40
Bonjour
Le problème c'est que je commence en vba et j'ai du mal à
tout comprende donc j'ai copié tel quel ta procédure
Il me met une erreur de compilation : Type non défini par
l'utilisateur non défini.
Lla ligne surlignée est Dim Rst As DAO.Recordset
-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement en
vba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,
lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tes
enregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:78bb01c3e756$ed1e3750$a601280a@phx.gbl...
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide
-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivre
pour ajouter le bon nombre d'enregistrement avec le
comptage de la boucle
sur le nombre d'articles saisis. si tu veux un coup de
main pour la requête
tu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:75c701c3e751$69e30a00$a401280a@phx.gbl...
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque
enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception
-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête
ajout
pour ajouter 1
enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisie
dim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:746101c3e73d$f5477c70$a401280a@phx.gbl...
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table,
je
voudrais dupliquer les enregistrements en incrémentant
de
1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentant
N° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
.
-----Message d'origine-----
bonjour
quand tu es dans l'editeur vba, tu vas dans
outils/références et tu coches la réf Microsoft dao 3.xx
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"didier" a écrit
dans le message de news: 7ad201c3e7db$c08bfe40
Bonjour
Le problème c'est que je commence en vba et j'ai du mal à
tout comprende donc j'ai copié tel quel ta procédure
Il me met une erreur de compilation : Type non défini par
l'utilisateur non défini.
Lla ligne surlignée est Dim Rst As DAO.Recordset-----Message d'origine-----
Bonjour.
comme tu me l'as expliqué il n'y a pas besoin de
requête. directement envba.
tes 3 champs plus Qté sont sur le formulaire, le bouton
s'appelle Commande0,lorsque tu as fini ta saisie d'un enregistrement, clique
sur le bouton. tesenregistrements seront disponibles dans le formulaire.
N°Série est numérique pour pouvoir le générer.
Private Sub Commande0_Click()
Dim Rst As DAO.Recordset
Dim I As Integer
Dim w_N°Série As Long
Dim w_produits As Long
Dim w_N°version As String
w_produits = Me.Produits
w_N°Série = Me.N°Série
w_N°version = Me.N°Version
DoCmd.RunCommand acCmdSaveRecord
Set Rst = Me.Recordset
For I = 2 To Me.Qté
Rst.AddNew
w_N°Série = w_N°Série + 1
Rst!Produits = w_produits
Rst!N°Série = w_N°Série
Rst!N°Version = w_N°version
Rst.Update
Next I
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:78bb01c3e756$ed1e3750$
J'ai 1 table "produit" contenant les champs suivant :
"Produits" "N° série" "version"
j'ai crée un replica de cet table "replica produit" pour
créer mes enregistrements pour ma requête ajout
J'ai réer un formulaire pour rentrer la première ligne
"Produits" "N° série" "version" "quantité entrée""et un
bouton de commande et là je coince!
Je voudrais qu'en cliquant sur ce bouton il crée un
nombre d'enregistrement égal à "quantité entrée"-1 et
qu'il incrémente le champs "N° série" de 1 pour chaque
enregistrement créé
Une fois les enregistrement crées il nyaura plus quà
lancer la requête ajout
Merci beaucoup pour ton aide-----Message d'origine-----
Je ne te parlais pas de numauto; je t'ai simplement
donné la marche à suivrepour ajouter le bon nombre d'enregistrement avec le
comptage de la bouclesur le nombre d'articles saisis. si tu veux un coup de
main pour la requêtetu le dis, faudrait quelques noms de champs et de
tables.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le
message denews:75c701c3e751$69e30a00$
Re
Je ne peut pas utiliser numeroauto car mos N° de série
peuvent commencer par 04010001. Donc je veut pouvoir
incrémenter de 1 mon N° de série à chaque
enregistrement
et ceci pour un nombre d'enregistrement défini
Par exemple
nous recevons 30 produits toto dons le 1er N° de série
est 04010001 je veux rentrer 30 enregistrements avec
comme N° de série 04010001 à 04010030 et le nombre
d'enregistrement peut varier suivant la réception-----Message d'origine-----
bonjour.
après avoir saisie la ligne, tu crées une requête
ajout
pour ajouter 1enregistrement.
et tu la lances par :
nbre_article = 30 ' le contrôle de ta quantité
entrée en saisiedim I as integer
For I = 1 to nbre_article
docmd.runsql marequetecréée
next I
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"didier" a écrit
dans le message denews:746101c3e73d$f5477c70$
Bonjour
J'ai une table comportant un champs N° de série
en rentrant un enregistrement complet dans la table,
je
voudrais dupliquer les enregistrements en incrémentant
de1 le champs N° de série en fonction d'une quantité
Par exemple
Produit : "toto"
N° série : 0001
J'ai 30 article à rentrer
je voudrais qu'il créer 30 enregistrement en
incrémentantN° de série de 1 à chaque enregistrement
Cela est-il possible?
.
.
.
.