|
Visual Basic pour Applications ou VBA , peut être utilisé pour automatiser des processus autrement effectuées manuellement . Microsoft Office Access - un système de base de données relationnelle proposé dans la suite Microsoft Office - permet aux programmeurs d'utiliser VBA pour modifier des tables dans leurs bases de données. Le champ NuméroAuto sert à identifier de manière unique les enregistrements d'une table. Enregistrements uniques dans une table sont utilisées comme clés primaires et secondaires dans d'autres tables. Instructions
1 Ouvrez Microsoft Office Access 2007, cliquez sur la " base de données vide ", puis sélectionner "Créer". Cliquez sur " Database Tools ", puis sélectionnez " Visual Basic ".
2 Cliquez sur le champ " Insertion", puis sélectionner "Module ".
3 copie et collez ce code dans votre nouveau module.
Private Sub newAutoIncColumn ()
Set dbase = Application.CurrentDb
Set TableDef = dbase.TableDefs ( " MyTableName " )
Set newClmn = TableDef.CreateField ( " AutoField " , dbLong )
newClmn
. attributes = dbAutoIncrField
End With
avec TableDef.Fields
. Append newClmn
. Actualiser
End With End Sub
4 Modifier cette ligne de code et tapez le nom de votre table.
Set TableDef = dbase.TableDefs ( " MyTableName " )
" AutoField " vont incrémenter automatiquement par "1" lorsque de nouvelles données sont entrées dans la table. Le " AutoField " sera utilisé pour identifier de façon unique chaque enregistrement de la table.
|
