Tilgang Visual Basic for Applications ( VBA ) er programmeringsspråket som Microsoft Office- utviklere bruke til å utvide tilgangen ' funksjoner . Alle kommandoer tilgjengelig i standard Access- grensesnitt er også tilgjengelig i VBA , inkludert kommandoer som henter eksterne data . Ved hjelp av VBA for å få eksterne data innebærer å bruke en funksjon med parametere du angir i Access integrerte utviklingsmiljø ( IDE ) . Ved hjelp av Access VBA for å få eksterne data , frigjøre deg ditt arbeid lagets dataregistrering personell fra å måtte hente eksterne data manuelt . Du trenger
Microsoft Access
Vis flere instruksjoner
Hent eksterne data fra en database
en

Open Access , og klikk på "Create "-menyen overskriften , så klikk på "Table " element .
2

type " Titler " i den nye tabellen første kolonneoverskriften og " Forfattere " i overskriften til høyre for " Tittel ". Disse kolonneoverskriftene representerer felt for en liten bøker database , som du vil bruke som en ekstern database til å importere med VBA .
3

Type noen eksempler boktitler og forfattere i tabellens rader , og trykk deretter "Ctrl + S." . Type "bøker" når du blir bedt om tabellens navn
4

Klikk på " File" -menyen er " Lagre som "-kommandoen , skriv " c: \\ books.accdb " for databasen filnavn . Klikk på " File" -menyen er " Close database "-kommandoen for å lukke databasen.
5

Trykk "Ctrl + N " for å opprette en ny database , og trykk deretter på "Alt + F11 " for å gå inn i VB IDE .
6

Klikk på " Module" kommandoen under "Insert" -menyen for å opprette et nytt vindu for å legge inn programkode.
7

Paste følgende subrutine inn i det nye kode vinduet. Denne subrutine kaller Tilgang er " DoCmd "-metoden for å åpne en ekstern database - . Det du gjorde i trinn 1 til 4

Public Sub importData ( )

DoCmd.TransferDatabase acImport , " Microsoft Access ", _

" C : \\ books.accdb " , actable , " bøker "," books2 "

End Sub
8

Klikk en uttalelse i subrutine du nettopp limte inn , og trykk "F5 " for å kjøre subrutine .
9

trykk " Alt- 11 " for å returnere til Access , og deretter lukke og åpne navigasjonsruten på skjermen igjen ved å klikke på top " << "-knappen . Navigasjonsruten vil vise en ny tabell , " books2 . "
10

Dobbeltklikk på " books2 " element for å vise den samme listen over bøker du skrev inn i trinn tre . Den " importData " subrutine du kjørte tidligere importert den opprinnelige bøkene database til en ny tabell i den gjeldende databasen .
Hent eksterne data fra tekstfil
11

Åpne Notisblokk eller et annet tekstbehandlingsprogram og skrive noen tekst i filen
12

Lagre filen som . "c : \\ textfile.txt "
13

Open Access , trykk "Alt- F11 , "og deretter lim inn følgende kode inn i koden vinduet : en

Public Sub GetExternalText ( )

Dim strText

Åpne " c : \\ textfile.txt "For Input As # 1

Mens Not EOF ( 1 )

Linje Input # 1 , strText

Debug.Print strText

Loop

Lukk # 1

End Sub
14

Klikk noen uttalelse i programmet , og trykk "F5 " for å kjøre programmet .
15

trykk " Ctrl + G "for å åpne IDE er" Immediate "-vinduet , som vil vise teksten data programmet hentet fra den eksterne tekstfil .