Importieren die Ergebnisse einer Microsoft Access-Abfrage in Excel kann auf verschiedene Arten , einschließlich eines Ansatzes mit dynamischen Links , für Benutzer von Excel 2007 oder später erfolgen. Benutzer von Excel 2003 oder früher können den Import durch die Verwendung eines Access-Makro , das mit Microsoft Office Automatisierung Objekte funktioniert abzuschließen. Things You
Microsoft Excel und Access , Version 2003 oder höher
brauchen anzeigen Weitere Anweisungen
1
Open Access und erstellen Sie die folgende Tabelle mit Beispieldaten , die Feld Namen in der oberen Reihe. Klicken Sie auf \\ " Erstellen> Table \\ ", um die Tabelle zu erstellen.
Spiel , Verkaufsdatum , totalsale
Beben 12/1/2009 , 6,01 $
Beben 12/3/2009 , $ 7,98
guitar hero , 12/5/2009 , $ 4,98
guitar hero , 12/6/2009 , $ 5,98
< ; br /> Speichern Sie die Tabelle (durch Drücken von \\ "control - s \\" ) mit dem Namen \\ " Spiele \\ ".
2
erstellen Sie eine neue Abfrage für den Spieltisch indem Sie \\ " erstellen> Abfrageentwurfstools , \\ " mit der rechten Maustaste auf die \\ " Query1 \\ " text in der Abfrage -Registerkarte, und klicken Sie \\ " SQL-Ansicht. \\ "
< br /> Geben Sie die folgende Anweisung in der SQL- Code-Fenster: .
Spiele SELECT * INTO myqueryres
von Games
WHERE ( ( ( games. Spiel ) Like ' * tar * '))
GO
Speichern Sie die Abfrage ( von pressnig \\ "control -s \\") als \\ " MeineAbfrage . \\ "
3
Führen Sie die Abfrage durch einen Doppelklick auf \\ " MeineAbfrage \\ " im Navigationsbereich , und schließen Sie Access und öffnen Sie Microsoft Excel.
4
Klicken Sie auf \\ " Data \\ " , und wählen Sie \\ " Von Access. \\ " In der \\ " Select Data Source \\ " Dialogfeld öffnen Sie die Access- Datenbank, die Sie erstellt den Spieltisch in. Wählen Sie die Tabelle \\ " myqueryres \\ " aus dem \\ "Select Tisch \\ " wählen, dann drücken Sie \\ " OK \\ " auf der \\ "Import Data \\ " Dialogfeld . Beachten Sie, dass Excel hat die Abfrage.
5
schließen Excel , importiert die Erinnerung an die Dateinamen , wenn Sie die Datei zu speichern. Re -open Access. Überarbeiten \\ " MeineAbfrage \\ " in \\ " SQL View \\ " zu lesen , wie folgt: .
Spiele SELECT * INTO myqueryres
von Games
WHERE ( ( ( games.Game ) Like ' * ua * '));
6
speichern und starten Sie die Abfrage , schließen Sie Access und öffnen Sie die Excel- Datei, die Sie erstellt die Tabelle Link in. Select \\ " Data \\ " , und wählen Sie \\ "Verbindungen \\", und drücken Sie dann die \\ " Aktualisieren \\ " in der \\ " Workbook Connections \\ " Dialogfeld . Schließen Sie den Dialog und feststellen, dass die Ergebnisse der Abfrage geändert haben.
7
( Für Benutzer von Excel 2003 ) Führen Sie die Schritte 1 und 2 . Run \\ " MeineAbfrage \\", und drücken Sie dann \\ " alt \\ " + \\ " F11 \\ ", um den Visual Basic integrierten Entwicklungsumgebung ( IDE) in Kraft. Presse \\ "Einfügen \\ " , und wählen Sie \\ "Module \\", dann das folgende Programm -Code in den neuen Code -Fenster einfügen :
Public Sub sendToExcel ()
'''''' '''''' '''''' '''''' '
Set curdb = CurrentDb < ; br /> Set recs = curdb.OpenRecordset ( \\ " myqueryres \\ " )
st = \\ " Spiel \\ " & \\ " , \\ " & \\ " Verkaufsdatum \\ " & \\ " , \\ " & \\ " totalsale \\ " & vbCr
Set xlApp = CreateObject ( \\ " Excel.Application \\ " )
xlapp.Workbooks.Add r = 1: c = 1
xlapp.ActiveSheet.Cells (r, c ) = st
r = 2
st = \\ "\\"
Do While Not recs.EOF
st = st & recs ! [game ] & \\ " , \\ " & _ < ; ! br /> recs [ Verkaufsdatum ] & \\ " , \\ " & recs [ totalsale ] & vbCr
xlapp.ActiveSheet.Cells (r, c ) = st
; recs.MoveNext
r = r + 1
st = \\ "\\"
Schleife recs.Close : curdb.Close
; xlapp.ActiveWorkbook.SaveAs ( \\ " c: \\ \\ accessquery.xls \\ " )
xlApp.Quit
End Sub
8
Klicken Sie auf \\ " tools \\ " , und wählen Sie \\ " Referenzen \\", dann überprüfen Sie das Kontrollkästchen \\ "Microsoft Excel Objekte \\ " , damit Ihr Makro kann erkennen, die Funktionen , die Excel zur Verfügung.
9
Führen Sie das Makro , indem Sie den Cursor in der sendToExcel Unterprogramm und Pressen \\
10
Doppelklicken Sie auf die Datei \\ " c " F5 \\ . ": \\ \\ accessquery.xls \\ "aus dem Windows Explorer , und beachten Sie das Ergebnis der Abfrage in Microsoft Excel , wenn sie sich öffnet.