Eine 2007 VBA Abfrage ausführen Zugriff auf

Microsoft Access 2007 ist die Windows-Datenbank-Programm mit der grafischen Abfrage-Schnittstelle. Ausführen von Abfragen in Access 2007-Datenbanken gibt Benutzern die Fähigkeit zum Abrufen und Filtern von Daten, berechnen von Gesamtwerten für numerische Daten und Aktualisierung oder Löschung von Datenbank-Datensätzen zu automatisieren. Die Access-Abfrage-Funktionen basieren auf SQL-Abfragesprache. Das Visual Basic für Applikationen (VBA) unterstützt die SQL-Anweisungen in die VBA-Funktionen. Es erlaubt Benutzern, eine Abfrage für die Access 2007-Datenbank mit dem VBA-Steuerelement auszuführen.

Anweisungen

1 Klicken Sie in Windows "Start" und wählen Sie "Microsoft Office", "Visual Basic für Applikationen (VBA)".

2 Klicken Sie auf "Öffnen" und wählen Sie das VBA-Steuerelement des Berichts auf dem Sie die Sortierreihenfolge ändern möchten.

3 Fügen Sie den folgenden Code nach der Zeile "StrSQL CurrentDb.Execute" in Ihrem VBA-Abfrage:

On Error GoTo err_handler

Dim StrSQL As String

StrSQL = "SELECT sbqryAdmitDeals.ltNamen" &

"sbqryAdmitDeals.FullName, sbqryAdmitDeals.RoleLeadFK" & CDate (Format (Now (), "Short Date"))-[RepRecd] AS Tage, 2 AS Bestell-Nr

"In" [Ihre Variablenname]

"Vom SbqryAdmitDeals"

"Wo sbqryAdmitDeals.RoleLeadFK)="

DoCmd.SetWarnings False

DoCmd.RunSQL strSQL

DoCmd.SetWarnings True

ExitMySubName:

Exit Sub

Err_handler:

DoCmd.SetWarnings True

MsgBox Err.Description, vbExclamation, "Error Number: " & Err.Number

Resume ExitMySubName

EndSub

4 Klicken Sie auf die Access-Multifunktionsleiste "Query-Assistent".

5 Geben Sie die folgende Abfrage in das Textfeld ein:

Wählen Sie sbqryAdmitDeals.lt_name CDate (Format (Now (), "Short Date")-[RepRecd] AS Tage, 2 AS Bestell-Nr in MtblFSRcvd

VON sbqryAdmitDeals

WO ((sbqryAdmitDeals.RoleLeadFK)=[Forms]! [ FrmReports]! [CboPrimaryContact]);

6 Klicken Sie auf "Ausführen", um die Abfrage der Access 2007-Datenbank mithilfe von VBA-Steuerelement auszuführen.