Microsoft Access 2007 is de Windows-database programma met de grafische query- interface. Query's tegen Access 2007-databases geeft gebruikers de mogelijkheid om op te halen en filteren van gegevens, berekenen numerieke gegevens totalen en automatiseren bijwerken of verwijderen database records . De Access-query functies zijn gebaseerd op SQL-query language . De Visual Basic for Applications ( VBA ) ondersteunt SQL-instructies in de VBA- functies . Het stelt gebruikers in staat om een query op de Access 2007-database met behulp van de VBA- besturingselement uit te voeren . Instructies
1 Klik op de knop 'Start' in Windows en selecteer de " Microsoft Office ", " Visual Basic for Applications ( VBA ) " . Kopen van 2 Klik op de " Open " en selecteer de VBA controle van het rapport waarop u wilt sorteervolgorde te wijzigen
3 Voeg de volgende code na de . " CurrentDb.Execute strSQL "lijn in uw VBA vraag :
On Error GoTo err_handler Dim strSQL
als Koord strSQL
= "SELECT sbqryAdmitDeals.lt_name " & _ " sbqryAdmitDeals.FullName , sbqryAdmitDeals.RoleLeadFK
" & CDate ( Format ( Now ( ) , " Short Date " ) ) - [ RepRecd ] AS dagen , 2 AS OrderID
" IN " [ Uw Naam variabele ]
" FROM sbqryAdmitDeals "
"WAAR sbqryAdmitDeals.RoleLeadFK ) = " DoCmd.SetWarnings
False DoCmd.RunSQL strSQL DoCmd.SetWarnings
True
ExitMySubName : Exit Sub err_handler
: DoCmd.SetWarnings
True MsgBox Err.Description , vbExclamation
, " Fout nummer : " & Err.Number
Resume ExitMySubName End Sub
4
Klik op de "Query Wizard " commando op de Access- lint .
5 invoeren volgende query in het tekstveld : SELECT sbqryAdmitDeals.lt_name CDate
( Format ( Now ( ) , " Short Date " ) - [ RepRecd ] AS dagen , 2 AS OrderID INTO mtblFSRcvd
vAN sbqryAdmitDeals
WHERE ( ( sbqryAdmitDeals.RoleLeadFK ) = [ Forms ] [ frmReports ] [ cboPrimaryContact ] ! ! ) ;
6 Klik op de " Run" knop om de query uit te voeren op uw Access 2007-database met behulp van VBA -controle .
|
