OVH Cloud OVH Cloud

Initialisation NumAuto

9 réponses
Avatar
Janus
Bonjour à tous,

Après moultes recherches, je ne parviens à trouver comment peut-on
initialiser un champ NumAuto

j'ai essayé de copier ma table et de la coller en ne gardant que la
structure mais cela ne fonctionne pas


Merci pour votre aide

9 réponses

Avatar
Frédéric
Hello,

Une fois que tu as vidé la table, il faut que tu compactes la base de
données. Dans le menu Outils/Utilitaires de base de données/Compacter une
base de données...
Ensuite tes numéros seront réinistialisés.

A bientôt
Frédéric
Avatar
Janus
Merci frédéric,

elle s'est réinitialisé,
Je vais peut être abusé un peu, mais si je voudrais le faire commencer à
50000, comment dois je procéder

Merci d'avance


"Frédéric" <Frédé a écrit dans le message de
news:
Hello,

Une fois que tu as vidé la table, il faut que tu compactes la base de
données. Dans le menu Outils/Utilitaires de base de données/Compacter une
base de données...
Ensuite tes numéros seront réinistialisés.

A bientôt
Frédéric


Avatar
Eric
Bonjour,

Copies ça dans un module global et exécutes - adapter les noms de table
et champ:

Sub zz()
CurrentDb.Execute "Insert into LaTable(NumAuto) Values(49999);"
CurrentDb.Execute "Delete from LaTable"
End Sub

La 1ere ligne crée un enregistrement avec le numauto a 49999
la 2eme supprime cet enregistrement. Résultat, le NUmAuto commencera à
50000.


Merci frédéric,

elle s'est réinitialisé,
Je vais peut être abusé un peu, mais si je voudrais le faire commencer à
50000, comment dois je procéder

Merci d'avance




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Frédéric
Tu vas dans la table en mode création.
Puis tu sélectionnes ton champ (numéroauto)
Dans le format (partie en bas de l'écran) tu tapes 50000

Le tour est joué.

A+

Frédéric
Avatar
3stone
"Frédéric"
[...]
| Le tour est joué.


Avec un leurre !

;-))


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Janus
merci grandement pour vos réponses

mais je ne dois pas être doué car aucune des 2 propositions ne fonctionne
j'ai essayé avec le format 50000 cela ne m'a rien donné

idem pour l'exécution du code

ma table s'appelle numbc et le champ numauto se nomme également numbc (c'est
peut être pas l'idéal)

j'ai donc rentré le code :
Sub zz()
CurrentDb.Execute "Insert into numbc(numbc) Values(49999);"
CurrentDb.Execute "Delete from numbc"
End Sub

il s'exécute correctement mais ne produit pas l'effet escompté dès que je
veux saisir un nouvel enregistrement

Cordialement

"Eric" a écrit dans le message de news:

Bonjour,

Copies ça dans un module global et exécutes - adapter les noms de table et
champ:

Sub zz()
CurrentDb.Execute "Insert into LaTable(NumAuto) Values(49999);"
CurrentDb.Execute "Delete from LaTable"
End Sub

La 1ere ligne crée un enregistrement avec le numauto a 49999
la 2eme supprime cet enregistrement. Résultat, le NUmAuto commencera à
50000.


Merci frédéric,

elle s'est réinitialisé,
Je vais peut être abusé un peu, mais si je voudrais le faire commencer à
50000, comment dois je procéder

Merci d'avance




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
Eric
re,

je viens de tester avec tes noms et je n'ai pas de problème. Le 1er
enregistrement suivant l'exécution de la procédure a bien pour numbc la
valeur de 50000. ( Access2K)

merci grandement pour vos réponses

mais je ne dois pas être doué car aucune des 2 propositions ne fonctionne
j'ai essayé avec le format 50000 cela ne m'a rien donné

idem pour l'exécution du code

ma table s'appelle numbc et le champ numauto se nomme également numbc (c'est
peut être pas l'idéal)

j'ai donc rentré le code :
Sub zz()
CurrentDb.Execute "Insert into numbc(numbc) Values(49999);"
CurrentDb.Execute "Delete from numbc"
End Sub

il s'exécute correctement mais ne produit pas l'effet escompté dès que je
veux saisir un nouvel enregistrement

Cordialement




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Janus
re,

j'ai pas de chance j'ai repris le code en recréant un module, je l'exécute
puis je retourne dans le formulaire, je clique sur suivant et le n° 3
apparait

je te remercie pour tes efforts, mais bon c'est pas dramatique

encore merci

"Eric" a écrit dans le message de news:

re,

je viens de tester avec tes noms et je n'ai pas de problème. Le 1er
enregistrement suivant l'exécution de la procédure a bien pour numbc la
valeur de 50000. ( Access2K)

merci grandement pour vos réponses

mais je ne dois pas être doué car aucune des 2 propositions ne fonctionne
j'ai essayé avec le format 50000 cela ne m'a rien donné

idem pour l'exécution du code

ma table s'appelle numbc et le champ numauto se nomme également numbc
(c'est peut être pas l'idéal)

j'ai donc rentré le code :
Sub zz()
CurrentDb.Execute "Insert into numbc(numbc) Values(49999);"
CurrentDb.Execute "Delete from numbc"
End Sub

il s'exécute correctement mais ne produit pas l'effet escompté dès que je
veux saisir un nouvel enregistrement

Cordialement




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
Tisane
Bonjour Janus,

j'ai pas de chance j'ai repris le code en recréant un module, je l'exécute
puis je retourne dans le formulaire, je clique sur suivant et le n° 3
apparait


Essaie avec une requête Ajout :
- dans une nouvelle requête vide, menu Requête | Requête Ajout
- sélectionne la table concernée
- dans la ligne Champ, tape Num: 50000
(Num peut être remplacé par n'importe quoi)
- sélectionne ton champ NumAuto dans la ligne "Ajouter à"
- clique sur le bouton Exécuter

--
Tisane

je viens de tester avec tes noms et je n'ai pas de problème. Le 1er
enregistrement suivant l'exécution de la procédure a bien pour numbc la
valeur de 50000. ( Access2K)

merci grandement pour vos réponses

mais je ne dois pas être doué car aucune des 2 propositions ne
fonctionne
j'ai essayé avec le format 50000 cela ne m'a rien donné

idem pour l'exécution du code

ma table s'appelle numbc et le champ numauto se nomme également numbc
(c'est peut être pas l'idéal)

j'ai donc rentré le code :
Sub zz()
CurrentDb.Execute "Insert into numbc(numbc) Values(49999);"
CurrentDb.Execute "Delete from numbc"
End Sub

il s'exécute correctement mais ne produit pas l'effet escompté dès que
je veux saisir un nouvel enregistrement

Cordialement




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr