Connaître comment créer par programme une table, puis ajouter un champ de numéro automatique à l'aide de Visual Basic pour Applications ( VBA ) peut vous faire gagner du temps lorsque vous travaillez avec Microsoft Office Access . Access est un système de gestion de base de données relationnelle inclus dans la suite Microsoft Office . VBA est un langage de programmation informatique utilisé dans les applications Microsoft Office pour automatiser les processus manuels tels que la création de tableaux . En quelques étapes, vous pouvez écrire du code VBA pour créer un tableau , y ajouter des données et ajouter un champ de numéro automatique à elle. Instructions
1
Ouvrez Microsoft Office Access 2007 , puis cliquez sur " Base de données vide ", puis sélectionner "Créer". Cliquez sur " Database Tools ", puis sélectionner " Visual Basic " pour ouvrir la fenêtre de Microsoft Visual Basic . Sélectionnez le champ "Insérer" et cliquez
2
Copiez et collez le code suivant dans le module "Module ". :
Private Sub createAutoNumberField ()
Set DBS = Application.CurrentDb
SQLString = "CREATE TABLE InstrumentInfo (Instrument TEXTE , SerialNumber texte)"
DoCmd.SetWarnings Faux
DoCmd.RunSQL ( SQLString )
strsql = "INSERT INTO VALUES InstrumentInfo ( ' MXA ' , '83456 ')"
DoCmd.RunSQL ( strsql )
strsql = " INSERT INTO VALUES InstrumentInfo (' signal Generator ' , '1244532 ') "
DoCmd.RunSQL ( strsql )
Set TBLDEF = dbs.TableDefs ( " InstrumentInfo " )
Set AutoField = tblDef.CreateField ( " AutoColumn », dbLong )
AutoField
. attributes = dbAutoIncrField
End With
tblDef.Fields
. Append AutoField
. Actualiser
End With End Sub
3
Exécutez le sous-programme en appuyant sur la touche "F5 ".
< br >
