Slik eksporterer Access Data Med VBA

Det er nyttig å vite hvordan du eksporterer data fra Microsoft Office Access til andre programmer for videre manipulering av data. Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. Visual Basic for Applications (VBA) er en Microsoft programmeringsspråk som ofte brukes for å automatisere oppgaver i Microsoft Office-programmer. I noen få trinn kan du skrive VBA-kode for å eksportere en tabell fra Access til en tekstfil.

Bruksanvisning

1 Start Microsoft Office Access 2007, og klikk "Blank Database" klikk "Opprett". Velg "Databaseverktøy" og klikk "Visual Basic". Velg "Insert" -menyen og velg "Module".

2 Skriv "Private sub exportAccessData" og trykk "Enter" for å lage en ny subrutine.

3 Kopier og lim inn følgende kode inn i den nye subrutine for å opprette en ny tabell, legge til fire poster i tabellen, og eksportere data fra en tabell til en tekstfil.

Dim sQLString As String

sQLString = "CREATE TABLE exportAccessData (CITY TEKST, STATE TEKST)"

DoCmd.SetWarnings falske

DoCmd.RunSQL (sQLString)

strsql = "INSERT INTO exportAccessData VERDIER ( 'FORT WORTH', 'Texas')"

DoCmd.RunSQL (strsql)

strsql = "INSERT INTO exportAccessData VERDIER ( 'ARLINGTON', 'Texas')"

DoCmd.RunSQL (strsql)

strsql = "INSERT INTO exportAccessData VERDIER ( 'LOS ANGELES", "California") "

DoCmd.RunSQL (strsql)

strsql = "INSERT INTO exportAccessData VERDIER ( 'SAN DIEGO", "California") "

DoCmd.RunSQL (strsql)

sQLString = "SELECT exportAccessData.CITY, exportAccessData.STATE INTO dataToExport"

sQLString = sQLString & "Fra exportAccessData"

sQLString = sQLString & "WHERE (((exportAccessData.STATE) =" California "));"

DoCmd.RunSQL (sQLString)

DoCmd.OutputTo acOutputTable, "dataToExport", acFormatTXT, "c: \ dataToExport.txt"

4 Kjør rutine ved å trykke "F5".