Å vite hvordan man skal lagre informasjon fra en tabell til en annen tabell kan du spare tid ved overføring av data i en database . Microsoft Office Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) er et programmeringsspråk utviklet av Microsoft. VBA kan brukes i Access å automatisere prosesser ellers utføres manuelt . I noen få trinn kan du skrive VBA -kode for å spørre data fra én tabell og lagre den i en annen tabell . Instruksjoner
en

start Microsoft Office Access 2007 og velg "Blank Database ," klikk " Opprett". Klikk på " Database Verktøy ", velg deretter " Visual Basic. "
2

Klikk på " Insert "-feltet og velg " Module ".

Kopier og lim inn følgende kode i modulen : en

Private Sub createNewTable ( )

Dim rst Som Recordset

Dim db As Database

Dim SQLstr As String

SQLstr = "CREATE TABLE CustomerInfo ( Fornavn TEKST ( 25 ) , Etternavn TEKST ( 25 )); "

DoCmd.RunSQL ( SQLstr )

SQLstr = " INSERT INTO CustomerInfo ( [Fornavn ] , [Etternavn ] ) "

SQLstr = SQLstr &" VALUES ( ' John ', ' Williams '); "

DoCmd.SetWarnings False

DoCmd.RunSQL ( SQLstr )

SQLstr = " INSERT INTO CustomerInfo ( [Fornavn ] , [Etternavn ] )"

SQLstr = SQLstr & " VALUES ( ' Charles ', ' Gonzalez '); "

DoCmd . VisAdvarsler False

DoCmd.RunSQL ( SQLstr )

SQLstr = "SELECT CustomerInfo.FirstName , "

SQLstr = SQLstr & " CustomerInfo.LastName INTO CharlesInfo "

SQLstr = SQLstr & " FROM CustomerInfo "

SQLstr = SQLstr & " WHERE ( ( ( CustomerInfo.FirstName ) = ' Charles ' )); "

DoCmd.SetWarnings False

DoCmd.RunSQL ( SQLstr )

End Sub
3

Trykk " F5 " for å kjøre din subrutine . Koden vil opprette en ny tabell og legge til to nye registreringer av data . En ny tabell opprettes der " Fornavn" er lik " Charles ".