remise à 1 autonuméro base access Fermé

Question

bonjour 
je cherche du code vba pour base access
l'objectif est de remettre à 1 le champ "Numéro Auto"

j'avais trouvé le code ci-dessous, mais la seconde ligne ne fonctionne pas
j'arrive à supprimer la data, mais je n'arrive pas à remettre le champ "numéro auto" qui s'appelle myid à 1
mon code bug sur la seconde ligne de code

DoCmd.RunSQL "DELETE FROM test" 'cette ligne est ok elle supprime la data
CurrentDb.Execute "ALTER TABLE test ALTER COLUMN myid COUNTER(1,1)"


Pouvez vous m'aider ?

Merci

Castours · Answer

bonjour
une suggestion 
dans ta table tu effaces le champ N° auto et tu en creais un autre.
Mais si ta table contient des enregistrements il y aura des N°

wil2168 · Answer

le champ numéro auto contient ma clé primaire
je ne peux la supprimer en l'état actuel

pour supprimer le champ Numéro auto il faudrait que je change la champ qui contien la clé primaire

Castours · Answer

bonjour
si tu ne peux pas effacer le champ N° auto  comment veux remettre a zero
Si je peux t'aider comprime ta base en zip et copies  la dans un lien avec ci joint.com que tu mettras dans comment ca marche

yg_be · Answer

bonjour, est-ce que la commande "DROP TABLE test" fonctionne?

yg_be · Answer

je pense qu'il est nécessaire de supprimer et recréer la table:
CurrentDb.Execute "DROP TABLE testddl "
CurrentDb.Execute _
    "CREATE TABLE testddl ( myid COUNTER PRIMARY KEY, Nom CHAR, Prenom CHAR ) "

wil2168 · Answer

cela fonctionne
Merci pour l'aide

RV71 · Answer

En supprimant les champs déjà numérotés, et en comptactant la base (outils de base de données, compacter) cela va les remettre à zéro...

A+

Remise à 1 autonuméro base access

7 réponses

Discussions similaires