Saber como salvar os dados do Microsoft Office Access para Microsoft Office Excel pode ajudá-lo a economizar tempo quando você precisa exportar dados para o Excel. Access é um sistema de gerenciamento de banco de dados relacional , muitas vezes usado para bancos de dados menores e locais. Excel é um aplicativo de planilha comumente usado para analisar grandes quantidades de dados. Ambos os aplicativos estão incluídos na suíte Microsoft Office. Visual Basic for Applications , também conhecido como VBA, é usado para automatizar os processos de rotina, tais como a exportação de dados do Access para o Excel. Instruções
1
Abra o Microsoft Office Access 2007 , selecione " Ferramentas de banco de dados " e clique em "Visual Basic". Selecione o menu "Inserir" e clique em " Módulo ".
2
Copie e cole o seguinte em seu novo módulo.
Private Sub ExportAccessDataToExcel ()
Dim SqlString As String
SqlString = "CREATE TABLE ( testMeasurements TestName texto, texto Estado ) "
DoCmd.SetWarnings Falso
DoCmd.RunSQL ( SqlString )
SqlString = " INSERT INTO testMeasurements VALUES (' potência média ', ' PASS ' ) "
DoCmd.RunSQL ( SqlString )
SqlString = " INSERT INTO testMeasurements VALUES ( 'Power Vs Time' ' FALHA ') "
DoCmd.RunSQL ( SqlString )
SqlString =" SELECT testMeasurements.TestName , testMeasurements.Status INTO exportToExcel "
SqlString SqlString = &" DE testMeasurements "
SqlString SqlString = &" WHERE ( ( ( testMeasurements.TestName ) = 'Power Média ')); "
DoCmd.RunSQL ( SqlString )
DoCmd.TransferSpreadsheet acExport , acSpreadsheetTypeExcel7 , _
" exportToExcel ", " G: \\ TestMeasurements.xls ", True , "A1: G12 "
End Sub
< br > 3
Execute o sub-rotina com a tecla " F5 ".