|
? Sachant comment créer un champ d' incrémentation automatique dans une table Access en utilisant Visual Basic pour Applications, ou VBA , peut rendre votre application plus dynamique . Un champ d' incrémentation automatique est un champ dans une table qui incrémente automatiquement pour chaque nouvel enregistrement. Microsoft Office Access est un système de gestion de base de données relationnelle utilisée pour les petites bases de données. VBA est un langage de programmation développé par Microsoft et est utilisé pour automatiser des tâches de routine dans les applications Microsoft Office. Instructions
1 Démarrer Microsoft Office Access 2007 et sélectionnez « Nouvelle base de données ", puis cliquez sur " Créer". Cliquez sur " Database Tools ", puis sélectionnez " Visual Basic. "
2 Cliquez sur le champ Insérer et sélectionnez " Module ".
3 Copiez et collez le code suivant dans votre module :
privé autoIncrementField Sub ( )
Set dbs = Application.CurrentDb
Set TBLDEF = dbs.TableDefs ( " addressTbl " )
Set Newfield = tblDef.CreateField ( " AutoField " , dbLong )
newField
. attributes = dbAutoIncrField
End With
TBLDEF . les champs
. Append newField
. Actualiser
End With End Sub
4 Modifiez la ligne de code suivante et tapez le nom de votre table :
Set TBLDEF = dbs.TableDefs ( " addressTbl " )
presse "F5" pour exécuter votre routine
.
|
