Wie eine Access-Abfrage in Excel mit VBA Speichern. Access ist ein relationales Datenbank- Management-System häufig für kleinere und lokale Datenbanken verwendet. Excel ist ein Tabellenkalkulationsprogramm häufig verwendet, um große Mengen von Daten zu analysieren. Beide Anwendungen sind in der Microsoft Office-Suite enthalten. Visual Basic für Applikationen , die auch als VBA bekannt ist, wird verwendet, um Routine-Prozesse wie Exportieren von Daten aus Access nach Excel zu automatisieren. Anleitung
1
Öffnen Sie Microsoft Office Access 2007 , wählen Sie " Database Tools " klicken Sie dann auf " Visual Basic ". Wählen Sie das Menü "Einfügen" und klicken Sie auf "Module ".
2
Kopieren Sie den folgenden in das neue Modul .
Private Sub ExportAccessDataToExcel () Dim
SqlString As String
SqlString = " CREATE TABLE testMeasurements ( TestName TEXT , TEXT -Status ) "
DoCmd.SetWarnings Falsch
DoCmd.RunSQL ( SqlString )
< p > SqlString = " INSERT INTO testMeasurements VALUES (' Mittlere Leistung ', ' PASS ') "
DoCmd.RunSQL ( SqlString )
SqlString = " INSERT INTO testMeasurements VALUES ( 'Power Vs Time' " FAIL " ) "
DoCmd.RunSQL ( SqlString )
SqlString =" SELECT testMeasurements.TestName , testMeasurements.Status INTO exportToExcel "
SqlString = SqlString & " VON testMeasurements "
SqlString = SqlString & " WHERE ((( testMeasurements.TestName ) = ' Durchschnittliche Power' ) ); "
DoCmd.RunSQL ( SqlString )
DoCmd.TransferSpreadsheet acExport , acSpreadsheetTypeExcel7 , _
" exportToExcel ", "G : \\ TestMeasurements.xls ", True , " A1: G12 "
End Sub
3
Führen Sie das Unterprogramm mit der Taste " F5 ".