Microsoft Access 2007 er Windows database program med grafisk spørring grensesnitt. Kjører spørringer mot Access 2007 databaser gir brukerne muligheten til å hente og filtrere data , beregne numeriske data totaler og automatisere oppdatering eller sletting databasen postene. Access spørring funksjoner er basert på SQL spørrespråk . Visual Basic for Applications ( VBA ) støtter SQL-setninger i VBA-funksjoner . Den tillater brukere å kjøre en spørring på Access 2007-database ved hjelp av VBA kontroll. Instruksjoner
en
Klikk på "Start "-knappen i Windows og velg " Microsoft Office ", " Visual Basic for Applications ( VBA )" .
2
Klikk på " åpne "og velg VBA kontroll av rapporten som du vil endre sorteringsrekkefølgen
3
Legg til følgende kode etter . " CurrentDb.Execute strSQL "-linjen i VBA- spørring:
On Error GoTo err_handler
Dim strSQL As String
strSQL = "SELECT sbqryAdmitDeals.lt_name " & _
" sbqryAdmitDeals.FullName , sbqryAdmitDeals.RoleLeadFK "& CDate ( Format ( Now () , " Short Date ")) - [ RepRecd ] AS dager, 2 AS OrderID
" til " [Ditt Variable navn]
" FRA sbqryAdmitDeals "
" HVOR sbqryAdmitDeals.RoleLeadFK ) = "
DoCmd.SetWarnings falske
DoCmd.RunSQL strSQL
DoCmd.SetWarnings Ekte
ExitMySubName : en
Exit Sub
err_handler :
DoCmd.SetWarnings Ekte
MsgBox err.Description , vbExclamation , "Feil nummer :" & err.number
Resume ExitMySubName
End Sub
4
Klikk på " Query Wizard" -kommandoen på Access- båndet.
5
Angi følgende spørsmål i tekstfeltet : en
SELECT sbqryAdmitDeals.lt_name CDate ( Format ( Now () , " Short Date" ) - [ RepRecd ] AS dager, 2 AS OrderID INTO mtblFSRcvd
FRA sbqryAdmitDeals
WHERE ( ( sbqryAdmitDeals.RoleLeadFK ) = [Skjemaer ] [ frmReports ] [ cboPrimaryContact ] !) ;
6
Klikk på " Kjør"-knappen for å kjøre spørringen på Få tilgang til 2007 database ved hjelp av VBA kontroll.