Hvordan sende Microsoft Word skjemadata i Access

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 de virtuelle objekter som styres søknad utsetter for andre programmer. Word 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-programmer kan utnytte kommandoer av de andre.

Bruksanvisning

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

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

3 Klikk Office-knappen, og klikk deretter på "Lagre som". Type "C: \ myDb.accdb" for filnavnet. Når Tilgang ber deg for tabellen navn, skriv "Tabell1." Dette full sette opp tabellen som Word vil sende sine skjemadata.

4 Nær tilgang og deretter åpne Word.

5 Klikk på "Utvikler" fanen, og klikk deretter på "Legacy Tools" -knappen i "Controls" panel.

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

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

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

9 Skriv følgende uttalelse ved gjeldende markørposisjon. Denne uttalelsen krever en annen rutine som vil sende tekstboksen verdi til Access for lagring.

sendToAccess Tekst box1

10 Klikk på "Referanser" element av "Verktøy" -menyen og klikk "Microsoft Access Objects" boksen. Dette forteller Visual Basic at programmet må ha tilgang til Microsoft Access er 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 tekstboksen inn i Access-tabell du opprettet tidligere.

Public Sub sendToAccess (str1)

Dim str2

Dim appAccess Som Access.Application

Sett appAccess = Create ( "Access.Application")

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

Str2 = "setter inn 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 deretter klikker du på "Design" -knappen for å forlate utformingsmodus. Dette begynner å kjøre den formen du har gjort tidligere. Du er nå effektivt brukeren som du har skrevet programmet.

1. 3 Skriv inn eventuell tekst i tekstboksen, og klikk deretter 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 på "Tabell1" 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.