Hvordan få tilgang en 2007 VBA Kjør spørring

Hvordan få tilgang en 2007 VBA Kjør spørring


Microsoft Access 2007 er Windows databaseprogram med det grafiske søket grensesnitt. Kjører spørringer mot Tilgang 2007 databaser gir brukerne muligheten til å hente og filter data, beregne numeriske data totaler og automat oppdatere eller sletting databasen poster. 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 i databasen Access 2007 ved hjelp av VBA kontroll.

Bruksanvisning

1 Klikk på "Start" -knappen i Windows og velg "Microsoft Office", "Visual Basic for Applications (VBA)".

2 Klikk på "Open" og velg VBA kontroll av rapporten som du vil endre sorteringsrekkefølgen.

3 Legg til følgende kode etter "CurrentDb.Execute strSQL" linje i VBA spørringen:

På Error GoTo err_handler

Dim strSQL As String

strSQL = "SELECT sbqryAdmitDeals.lt

navn" &

"SbqryAdmitDeals.FullName, sbqryAdmitDeals.RoleLeadFK" og CDate (Format (Now (), "Short Date")) - [RepRecd] AS Dager, 2 AS OrderID

"Inn i" [Ditt Variabelnavn]

"FRA sbqryAdmitDeals"

"HVOR sbqryAdmitDeals.RoleLeadFK) ="

DoCmd.SetWarnings falske

DoCmd.RunSQL strSQL

DoCmd.SetWarnings Sann

ExitMySubName:

Exit Sub

err_handler:

DoCmd.SetWarnings True

MsgBox Err.Description, vbExclamation, "Feilnummer:" & err.number

gjenoppta ExitMySubName

End Sub

4 Klikk på "Spørreveiviser" -kommandoen på Access båndet.

5 Skriv inn følgende spørring i tekstfeltet:

VELG sbqryAdmitDeals.lt_name CDate (Format (Now (), "Short Date") - [RepRecd] AS Dager, 2 AS OrderID INTO mtblFSRcvd

Fra sbqryAdmitDeals

HVOR ((sbqryAdmitDeals.RoleLeadFK) = [Forms] [frmReports] [cboPrimaryContact]!);

6 Klikk på "Kjør" -knappen for å kjøre spørringen på Access 2007-database ved hjelp av VBA kontroll.