Vide hvordan man kan spare Microsoft Office Access- data til Microsoft Office Excel kan hjælpe dig med at spare tid, når du har brug for at eksportere data til Excel. Access er en relationel database management system ofte anvendes til mindre og lokale databaser. Excel er et regnearksprogram almindeligvis anvendes til at analysere store mængder data. Begge disse programmer er inkluderet i Microsoft Office-pakken. Visual Basic for Applications , også kendt som VBA , der bruges til at automatisere rutinemæssige processer såsom eksportere data fra Access til Excel. Instruktioner
1
Åbn Microsoft Office Access 2007 , skal du vælge " Database Tools " og derefter klikke på " Visual Basic ". Vælg "Indsæt " menuen og klik på " Modul ".
2
Kopier og indsæt følgende i din nye modul .
Private Sub ExportAccessDataToExcel ()
Dim SqlString As String
SqlString = " CREATE TABLE testMeasurements ( TestName TEKST , Status TEXT )"
DoCmd.SetWarnings False
DoCmd.RunSQL ( SqlString )
< p > SqlString = " INSERT INTO testMeasurements VALUES ( ' Gennemsnitlig Power ', ' 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 &" FRA testMeasurements "
SqlString = SqlString &" WHERE ((( testMeasurements.TestName ) = ' Gennemsnitlig Power « )), "
DoCmd.RunSQL ( SqlString )
DoCmd.TransferSpreadsheet acExport , acSpreadsheetTypeExcel7 , _
" exportToExcel ", " G : \\ TestMeasurements.xls " Sandt nok, "A1 : G12 "
End Sub
< br > 3
Kør subrutine ved at trykke på " F5 ".