Weten hoe u programmatisch een tabel maken en voeg vervolgens een auto nummer veld met behulp van Visual Basic for Applications ( VBA ) kunt u tijd besparen bij het werken met Microsoft Office Access . Access is een relationele database management systeem opgenomen in de Microsoft Office suite . VBA is een programmeertaal gebruikt in Microsoft Office-toepassingen om handmatige processen, zoals het maken van tabellen te automatiseren . In een paar stappen kunt u VBA code om een tabel te maken , de gegevens toe te voegen en voeg een automatische nummer veld om het te schrijven . Instructies
1 Open Microsoft Office Access 2007 en klik op " Lege database , " en selecteer "Create . " Klik op ' Hulpmiddelen voor databases , " selecteer " Visual Basic "om de Microsoft Visual Basic venster te openen . Selecteer het veld "Invoegen" en klik
Copy 2 en plak de volgende code in de module " Module . " : Private Sub createAutoNumberField
( ) Set
dbs = Application.CurrentDb SQLString
= " CREATE TABLE InstrumentInfo ( Instrument TEKST , SerialNumber TEXT ) " DoCmd.SetWarnings
False DoCmd.RunSQL ( SQLString ) op Twitter strSQL = " INSERT INTO InstrumentInfo VALUES ( ' MXA ' , '83456 ' ) " DoCmd.RunSQL ( strSQL ) strSQL
= " INSERT INTO InstrumentInfo VALUES ( ' Signal Generator ' , '1244532 ' ) " DoCmd.RunSQL ( strSQL ) op
Stel TBLDEF = dbs.TableDefs ( " InstrumentInfo " ) op Twitter Stel AutoField = tblDef.CreateField ( " AutoColumn " , dbLong ) op p Met AutoField
. attributen = dbAutoIncrField End met
Met tblDef.Fields
. Append AutoField < br > . Vernieuwen Einde
met End Sub
3
Ren de subroutine door op " F5 . "
< br >
|
