Microsoft Access 2007 är Windows databasprogram med det grafiska gränssnittet för förfrågningar . Köra frågor mot Access 2007 databaser ger användarna möjlighet att hämta och filtrera data , beräkna numeriska uppgifter summor och automatisera uppdatering eller borttagning databasposter . Access fråga funktioner är baserade på SQL Query Language . Visual Basic for Applications ( VBA ) stöder SQL-satser i VBA-funktioner . Den tillåter användare att köra en fråga om Access 2007-databas med hjälp av VBA -kontroll . Instruktioner
1
Klicka på "Start " -knappen i Windows och välj " Microsoft Office ", " Visual Basic for Applications ( VBA ) " .
2
Klicka på " öppna " och välj VBA kontrollen av rapporten som du vill ändra sorteringsordningen
3
Lägg till följande kod efter . " CurrentDb.Execute strSQL " rad i din VBA fråga :
On Error GoTo err_handler
Dim strSQL As String
strSQL = " SELECT sbqryAdmitDeals.lt_name " & _
" sbqryAdmitDeals.FullName , sbqryAdmitDeals.RoleLeadFK " & CDate ( Format ( nu ( ) , " Kort datum " ) ) - [ RepRecd ] som dagar , 2 AS OrderID
" till " [ Din variabeln]
" FRÅN sbqryAdmitDeals "
" VAR sbqryAdmitDeals.RoleLeadFK ) = "
DoCmd.SetWarnings Falska
DoCmd.RunSQL strSQL
DoCmd.SetWarnings Sant
ExitMySubName :
Exit Sub
err_handler :
DoCmd.SetWarnings Sant
MsgBox Err.Description , vbExclamation , " Error Number : " & Err.Number
Återuppta ExitMySubName
End Sub
4
Klicka på " Query Wizard " kommando på Access- bandet .
5
Ange följande fråga i textfältet :
SELECT sbqryAdmitDeals.lt_name CDate ( Format ( nu ( ) , " Short Date " ) - [ RepRecd ] som dagar , 2 AS OrderID INTO mtblFSRcvd
FRÅN sbqryAdmitDeals
WHERE ( ( sbqryAdmitDeals.RoleLeadFK ) = [ formulär ] [ frmReports ] [ cboPrimaryContact ] ! ) ,
6
Klicka på " kör " knappen för att köra frågan på Access 2007-databas med hjälp av VBA -kontroll .
