Å vite hvordan du raskt lage en spørring i Microsoft Access , og deretter bruke den med Visual Basic for Applications ( VBA ) kan spare deg for tid . Access er en relasjonsdatabase styringssystem som er inkludert i Microsoft Office-pakken. En spørring brukes til å hente data fra en database tabell . VBA er et programmeringsspråk som brukes til å automatisere rutineoppgaver i Access og andre Microsoft Office-programmer . I noen få trinn kan du lage en subrutine bruke VBA til å spørre data fra tabellen Ansatte i Northwind database. Du trenger
Microsoft Office Access
Vis flere instruksjoner
en

Åpne Northwind Access database . The Northwind database er inkludert i Microsoft Office-pakken.
2

Klikk på " Create" og velg " Query Design. " Velg " bord" , velg " Ansatte " og deretter " Legg til". Velg " Close".
3

Dobbeltklikk på " Selskapet ", " Etternavn " og " Fornavn " for å legge til felt . Velg "SQL View" i " Resultater " -panelet . Trykk "Ctrl " og " C " for å kopiere Velg spørringen .
4

Klikk "Database Verktøy" og velg deretter " Visual Basic. " Skriv inn følgende for å opprette en ny subrutine : " . Enter"

Private Sub createVBAQuery ( )

Trykk
5

Skriv inn følgende å erklære variabler :

Dim strSQL As String

Dim rst Som Recordset

Dim dBS Som Database

Set dBS = CurrentDb
6

Press "Ctrl " og " V" for å lime inn Velg spørringen inne i subrutinen . Legg til " strSQL =" til begynnelsen av søket ditt og legge end sitater til slutten av søket slik: . .

StrSQL = "SELECT Employees.Company , ansatte [ etternavn ] , ansatte [ fornavn ] FROM Ansatte ; . "
7

Skriv inn følgende for å åpne Velg spørringen og vise resultatene

Set rst = dbs.OpenRecordset ( strSQL )

rst . MoveLast

rst.MoveFirst

mens ikke rst.EOF

Debug.Print rst.Fields ( 0 ) Verdi & . "