bonjour, est-il possible de cr=E9er dans une table d=E9ja=20
existante, un champs X qui aurais un num=E9ro automatique=20
qui s'incr=E9menterais tout seul. Je veux le programmer=20
dans access 97 pour que par la suite je me cr=E9er un=20
bouton et cela mettrait a jour ma table avec ces num=E9ro=20
automatique. =20
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonsoir .
je n'ai pas tout compris mais peur-être que cette procédure te conviendra: Dim MaBase As DAO.Database Dim Matable As DAO.TableDef Dim fld As DAO.Field Dim idx As DAO.Index
Set MaBase = CurrentDb() Set Matable = MaBase.TableDefs("unetable")
' si clé primaire Set idx = Matable.CreateIndex("Numéro") idx.Primary = True idx.Required = True idx.Unique = True Set fld = idx.CreateField("Numéro") idx.Fields.Append fld Matable.Indexes.Append idx
MaBase.TableDefs.Refresh
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"léa" a écrit dans le message de news:43b301c3e44f$96112080$ bonjour, est-il possible de créer dans une table déja existante, un champs X qui aurais un numéro automatique qui s'incrémenterais tout seul. Je veux le programmer dans access 97 pour que par la suite je me créer un bouton et cela mettrait a jour ma table avec ces numéro automatique.
merci
Bonsoir .
je n'ai pas tout compris mais peur-être que cette procédure te conviendra:
Dim MaBase As DAO.Database
Dim Matable As DAO.TableDef
Dim fld As DAO.Field
Dim idx As DAO.Index
Set MaBase = CurrentDb()
Set Matable = MaBase.TableDefs("unetable")
' si clé primaire
Set idx = Matable.CreateIndex("Numéro")
idx.Primary = True
idx.Required = True
idx.Unique = True
Set fld = idx.CreateField("Numéro")
idx.Fields.Append fld
Matable.Indexes.Append idx
MaBase.TableDefs.Refresh
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"léa" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:43b301c3e44f$96112080$a301280a@phx.gbl...
bonjour, est-il possible de créer dans une table déja
existante, un champs X qui aurais un numéro automatique
qui s'incrémenterais tout seul. Je veux le programmer
dans access 97 pour que par la suite je me créer un
bouton et cela mettrait a jour ma table avec ces numéro
automatique.
je n'ai pas tout compris mais peur-être que cette procédure te conviendra: Dim MaBase As DAO.Database Dim Matable As DAO.TableDef Dim fld As DAO.Field Dim idx As DAO.Index
Set MaBase = CurrentDb() Set Matable = MaBase.TableDefs("unetable")
' si clé primaire Set idx = Matable.CreateIndex("Numéro") idx.Primary = True idx.Required = True idx.Unique = True Set fld = idx.CreateField("Numéro") idx.Fields.Append fld Matable.Indexes.Append idx
MaBase.TableDefs.Refresh
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"léa" a écrit dans le message de news:43b301c3e44f$96112080$ bonjour, est-il possible de créer dans une table déja existante, un champs X qui aurais un numéro automatique qui s'incrémenterais tout seul. Je veux le programmer dans access 97 pour que par la suite je me créer un bouton et cela mettrait a jour ma table avec ces numéro automatique.