Det er mer enn én måte å få data fra Word til Access , men sender data mellom disse to programmene innebærer et konsept som Microsoft dokumentasjon refererer til "automatisering ". Dette ordet refererer til ett program kontrollerer en annen , spesielt gjennom den virtuelle objekter som det kontrollerte programmet eksponerer til andre apps. Ordets programmeringsspråk, Visual Basic for Applications , er verktøyet programmerere bruke til å sende data fra Word til Access . Evnen til å utføre en slik automatisering avslører at et av Office- programmene kan utnytte kommandoer av de andre. Instruksjoner
en

Åpne Microsoft Access og klikk på "Table "-knappen på "Create "-kategorien . Denne handlingen begynner å opprette en tabell som du vil sende Words skjemadata .
2

Type " Felt1 " i cellen ved siden av " ID "-feltet . Denne handlingen skaper en ny kolonne , " Felt1 " i den nye tabellen .
3

Klikk Office- knappen og deretter " Lagre som". Skriv inn "C : \\ myDb.accdb " for filnavnet . Når Access spør etter tabellens navn, type " Tabell 1 ". Dette fullfører sette opp tabellen som Word vil sende sine skjemadata .
4

Lukk Tilgang og deretter åpne Word .
5

Klikk på " Developer "-fanen og deretter Klikk på " Legacy Verktøy"-knappen i " Controls " panel .
6

Klikk på " Text Box" kontroll og dra i dokumentvinduet for å definere en tekstboks for brukerundersøkelser .
Side 7

Gjenta trinn 5 og klikk deretter på " Button" kontroll. Dra musen under tekstboksen for å lage en knapp som brukeren kan sende inn sine tekstboksinnstillingene data .
8

Høyreklikk på knappen og deretter " Vis kode " for å gå inn i Visual Basic -funksjon Ordet vil kjøre når brukeren klikker på knappen .
9

Skriv følgende uttalelse på gjeldende markørposisjon. Denne uttalelsen kaller en annen rutine som vil sende tekstboksen verdi til Access for lagring.

SendToAccess Tekst box1
10

Klikk på " Referanser " element i " Verktøy "-menyen og deretter klikk på " Microsoft Access Objects " boksen . Dette forteller Visual Basic at programmet må ha tilgang til Microsoft Access sin virtuelle objekter .
11

Lim inn følgende program under " End Sub " statement. Dette programmet kjører Tilgang usynlig og forteller det til å sette inn data fra tekstboks i Access-tabellen du opprettet tidligere.

Public Sub sendToAccess ( str1 )

Dim str2

Dim appAccess Som Access.Application

Set appAccess = CreateObject ( " Access.Application ")

appAccess.OpenCurrentDatabase ( "c : \\ myDb.accdb ")

str2 = " sette inn i Table1 ( field1 ) verdier (' " & str1 & " ' )"

appAccess.CurrentDb.Execute str2

appAccess.CurrentDb.Close

appAccess.Quit

End Sub
12

klikk Word -ikonet på oppgavelinjen i Windows for å gå tilbake til Word og klikk deretter på " Design "-knappen for å forlate utformingsmodus. Dette begynner å kjøre den formen du har gjort tidligere . Du er nå effektivt brukeren som du skrev programmet.
13

type tekst i tekstboksen og klikk på knappen under tekstboksen . Knappen vil bli presset for et øyeblikk mens programmet kjører .
14

Åpne Windows Utforsker og naviger til " \\ "-mappen , som er der du lagret " mydb.accdb " database .

15

Dobbeltklikk på " mydb.accdb " for å åpne den, og dobbeltklikk deretter på " table1 " element i navigasjonsruten . Når bordet åpnes vil du se ordet du skrev inn i tekstboksen i Word-skjema dokumentet . Dette forteller deg at programmet var vellykket i å sende skjemadata fra Word til Access .