Det finns mer än ett sätt att få data från Word till Access , men skickar data mellan dessa två ansökningar innebär ett koncept som Microsofts dokumentation hänvisar till " automation ". Detta ord avser en ansökan kontrollerar en annan , särskilt genom de virtuella föremålen som kontrollerad tillämpning exponerar till andra appar . Word programmeringsspråk , Visual Basic for Applications , är verktyget programmerare använder för att skicka data från Word till Access . Förmågan att utföra sådan automatisering visar att något av Office- programmen kan utnyttja kommandona för de andra. Instruktioner
1
Öppna Microsoft Access och klicka på " Tabell " -knappen på " Skapa "-fliken . Denna åtgärd börjar att skapa en tabell som du skickar Word formulärdata .
2
Type " Field1 " i cellen bredvid " ID " fältet . Denna åtgärd skapar en ny kolumn , " Field1 " i den nya tabellen .
3
Klicka på Office- knappen och klicka sedan på " Spara som . " Skriv " C : \\ myDb.accdb " till filnamnet . När Tillträde frågar efter tabellens namn , typ " Tabell1 . " Detta fullbordar inrätta bordet som Word kommer att skicka sina formulärdata .
4
Stäng Access och öppna sedan Word .
5
Klicka på " Utvecklare " fliken och sedan Klicka på " Legacy Tools " knappen i " Kontroller " panel .
6
Klicka på " textruta " kontroll och sedan dra i dokumentfönstret för att definiera en textruta för inmatning .
7
Upprepa steg 5 och klicka sedan på "Button " kontroll . Dra musen under textrutan för att skapa en knapp med vilken användaren kan skicka sina uppgifter textrutan.
8
Högerklicka på knappen och klicka sedan på " Visa kod " för att gå in i Visual Basic-funktion att Word ska köras när användaren klickar på knappen .
9
Skriv följande uttalande vid den aktuella markörpositionen . Detta uttalande kallar annan rutin som kommer att skicka textrutan värde till Access för lagring .
SendToAccess Text box1
10
Klicka på " Referenser " post i menyn "Verktyg" och sedan klicka på " Microsoft access Objects " kryssrutan . Detta talar Visual Basic att ditt program måste ha tillgång till Microsoft Access : s virtuella objekt .
11
Klistra in följande program under " End Sub " uttalande . Detta program körs Tillträde osynligt och berättar det för att infoga data från textrutan i Access- tabellen du skapade tidigare .
Public Sub sendToAccess ( str1 ) katalog
Dim str2
Dim appAccess Som Access.Application
Set appAccess = CreateObject ( " Access.Application " ) katalog
appAccess.OpenCurrentDatabase ( " c : \\ myDb.accdb " ) katalog
str2 = " infoga i Tabell1 ( fält1 ) värden ( ' " & str1 & " ' ) "
appAccess.CurrentDb.Execute str2
appAccess.CurrentDb.Close
appAccess.Quit
End Sub
12
klicka Word ikon i aktivitetsfältet i Windows för att återgå till Word och klicka sedan på " Design " -knappen för att lämna designläge . Detta börjar köra formuläret du gjorde tidigare . Du är nu i praktiken den användare som du skrev programmet .
13
typ valfri text i textrutan och klicka sedan på knappen under textrutan . Knappen kommer att stanna intryckt en stund medan programmet körs . Och
14
Öppna Windows Utforskaren och sedan navigera till " \\ " -mappen , som är där du sparade " mydb.accdb " databas .
15
Dubbelklicka på " mydb.accdb " för att öppna den och dubbelklicka sedan på " Tabell1 " post i navigeringsfönstret . När tabellen öppnas , ser du det ord du skrev i textrutan i Word-formulär dokumentet . Detta talar om för dig att ditt program var framgångsrik i att skicka formulärdata från Word till Access .
