Forstå hvordan programmet Excel VBA fra Access lar deg skrive programmer som utveksler data mellom de to programmene . Hver søknad har har den andre ikke , men ved hjelp av det Microsoft kaller " Automation ", kan du gi hvert program de VBA verktøy og virtuelle objekter av den andre. Sentrale elementer i automatisering inkluderer virtuelle VBA gjenstander av et program , for eksempel Excel " arbeidsbøker " samling og " ActiveCell " eiendom . VBA uttalelse som gjør Excel er tilgjengelige objekter til Access er " CreateObject . " Instruksjoner
Send data til Excel
en

Open Access , og klikk deretter på " Utvikler " fanen " Visual Basic" -knappen for å gå inn i Visual Basic utviklingsmiljø .
2

Klikk på " Insert " -menyen er " Module" kommandoen for å opprette et nytt vindu for å holde programmet til kontroll Excel , og klikk deretter på "Verktøy "-menyen . Klikk på " Reference "-kommandoen , og klikk på "Microsoft Excel " boksen slik at programmet kan få tilgang til Excel sin virtuelle objekter .
3

Lim inn følgende program i vinduet. Dette programmet skaper et Excel-regneark , setter inn tekst i en av arbeidsbok celler.

Public Sub MadeByAccess ( )

Dim aplExcel Som Excel.Application

Sett aplExcel = CreateObject ( " Excel.Application ")

aplExcel.Workbooks.Add

aplExcel.ActiveCell = " . Hello from tilgang"

aplExcel.ActiveWorkbook.SaveAs ( "c : \\ MadeByAccess.xlsx ")

aplExcel.Quit

End Sub
4

Klikk på" Kjør " -menyen er" Kjør "-kommandoen til å kjøre programmet , og deretter bruke Windows Utforsker til å navigere til mappen "C : \\".
5

Dobbeltklikk på filen " MadeByAccess.xlsx " for å laste filen inn i Excel. Legg merke til den første cellen i det første regnearket viser teksten fra "Hello fra Access ", som dukket opp i programmet.
Les en verdi fra Excel
6

Åpne Excel , og deretter skrive noen tekst i celle "A1" av det første regnearket . Trykk "Ctrl " og " S " samtidig , og skriv "C : \\ ForAccess.xlsx " i " Navn"-boksen . Klikk på " Lagre ", klikk deretter "Control " og " F4 " samtidig for å lukke Excel.
7

Open Access , og klikk deretter på " Utvikler " fanen " Visual Basic" -knappen for å gå inn i Visual Basic programmering miljø .
8

Klikk på " Verktøy"- menyen er " Reference "-kommandoen , og klikk i boksen for " Microsoft Excel " elementet til å aktivere programmet for å kontrollere Excel.
9 < p> Klikk på " Insert " -menyen er " Module "-kommandoen , og deretter lime inn følgende program inn i det nye vinduet som vises. Dette programmet åpner Excel-arbeidsboken du opprettet i trinn 1 , og leser celle " A1 " fra den arbeidsboken .

Public Sub ForAccess ( )

Dim aplExcel Som Excel.Application
< p > Set aplExcel = CreateObject ( " Excel.Application ")

aplExcel.Workbooks.Open ( "c : \\ ForAccess.xlsx ")

MsgBox aplExcel.ActiveCell

aplExcel . ActiveWorkbook.Close

aplExcel.Quit

End Sub
10

Klikk på " Kjør" -menyen er " Kjør"-kommandoen for å kjøre programmet . Tilgang vil vise en meldingsboks viser teksten du skrev inn i Excel regneark celle i trinn en .