Microsoft Access 2007 er Windows database program med den grafiske forespørgslen interface. Løb forespørgsler mod Access 2007 databaser giver brugerne mulighed for at hente og filtrere data , beregne numeriske datatotaler og automatisere opdatering eller sletning databaseposter. Access forespørgselsfunktioner er baseret på SQL-forespørgsel sprog. Visual Basic for Applications ( VBA ) støtter SQL-sætninger i VBA funktioner . Det giver brugerne mulighed for at køre en forespørgsel på Access 2007-database ved hjælp af VBA kontrol. Instruktioner
1
Klik på "Start " knappen i Windows og vælg " Microsoft Office ", " Visual Basic for Applications ( VBA )."
2
Klik på " Open "og vælg VBA kontrol af den rapport , som du vil ændre sorteringsrækkefølgen
3
Føj følgende kode efter ". CurrentDb.Execute strSQL " linje i din VBA forespørgsel:
Fejl GoTo err_handler
Dim strSQL As String
strSQL = "SELECT sbqryAdmitDeals.lt_name " & _
" sbqryAdmitDeals.FullName , sbqryAdmitDeals.RoleLeadFK "& CDate ( Format (Now () , " Kort Date " )) - [ RepRecd ] AS dage, 2 AS OrderID
" til " [Dit Variable Name]
" FROM sbqryAdmitDeals "
" WHERE sbqryAdmitDeals.RoleLeadFK ) = "
DoCmd.SetWarnings Falske
DoCmd.RunSQL strSQL
DoCmd.SetWarnings Ægte
ExitMySubName : Hej
Exit Sub
err_handler :
DoCmd.SetWarnings Ægte
MsgBox Err.Description , vbExclamation , "Fejl nummer : " & Err.Number
Genoptag ExitMySubName
End Sub
4
Klik på " Query Wizard" kommandoen Access båndet.
5.
Indtast efter forespørgsel i tekstfeltet : Hej
SELECT sbqryAdmitDeals.lt_name CDate ( Format (Now () , "Kort Date" ) - [ RepRecd ] AS dage, 2 AS OrderID INTO mtblFSRcvd
FRA sbqryAdmitDeals
WHERE ( ( sbqryAdmitDeals.RoleLeadFK ) = [ Forms ] [ frmReports ] [ cboPrimaryContact ] ! )
6
Klik på " Kør" knappen for at køre forespørgslen på din Access 2007-database ved hjælp af VBA -kontrol .