Veta hur man snabbt skapar en fråga i Microsoft Access och sedan använda den med Visual Basic for Applications ( VBA ) kan du spara tid . Access är en relationsdatabas management system som ingår i Microsoft Office-paketet . En fråga används för att hämta data från en databas tabell . VBA är en dator programmeringsspråk som används för att automatisera rutinuppgifter i Access och andra Microsoft Office-program . I några få steg kan du skapa en subrutin med VBA att söka data från tabellen Anställda i Northwind -databasen . Saker du behöver
Microsoft Office Access
Visa fler instruktioner
1
Öppna Northwind Access-databas . Northwind-databasen ingår i Microsoft Office-paketet .
2
Klicka på " Skapa " och välj " Query design . " Välj " Tabeller ", välj "Anställda" och klicka sedan på " Lägg till ". Välj " Stäng ".
3
Dubbelklicka på " Company ", " Efternamn " och " förnamn " för att lägga till fält . Välj " SQL View " i " Resultat " rutan . Tryck på " Ctrl " och " C " för att kopiera urvalsfrågan .
4
Klicka "Database Tools " och välj sedan " Visual Basic . " Skriv följande för att skapa en ny subrutin : " . Ange "
Private Sub createVBAQuery ( ) katalog
Tryck
5
Skriv följande för att deklarera dina variabler :
Dim strSQL As String
Dim rst Som Recordset
Dim dbs som databas
Set dbs = CurrentDb
6
Press " Ctrl " och " V " för att klistra urvalsfrågan inuti subrutinen . Lägg " strSQL = " i början av din fråga och lägga end citat i slutet av din fråga på följande sätt : . .
StrSQL = " SELECT Employees.Company , Anställda [ Efternamn ] , Anställda [ förnamn ] FROM Anställda ; . "
7
Skriv följande för att öppna din urvalsfråga och visa resultaten
Set rst = dbs.OpenRecordset ( strSQL ) katalog
RST . MoveLast
rst.MoveFirst
Gör visserligen inte rst.EOF
Debug.Print rst.Fields ( 0 ) Standard & . "
