Att förstå hur man programmerar Excel VBA från Access kan du skriva program som utbyter data mellan de två programmen . Varje ansökan har har den andra inte , men genom att använda vad Microsoft kallar " Automation ", kan du ge varje program VBA verktyg och virtuella föremål i den andra . Viktiga delar av automation inkluderar virtuella VBA föremål av ett program , till exempel Excel " arbetsböcker " insamling och " ActiveCell " egendom . VBA uttalande som gör Excel verksamhetsföremål tillgängliga till Access är " CreateObject . " Instruktioner
Skicka data till Excel
1
Open Access , klicka sedan på " Utvecklare " fliken för " Visual Basic " -knappen för att gå in i Visual Basic-utvecklingsmiljön .
2
Klicka på " Infoga " -menyn är " Module " -kommandot för att skapa ett nytt fönster för att hålla ditt program till kontroll Excel , klicka på menyn "Verktyg" . Klicka på " Reference " kommandot , klicka sedan på " Microsoft Excel " kryssrutan så att ditt program kan komma Excels virtuella objekt .
3
Klistra in följande program i fönstret . Detta program skapar en Excel-arbetsbok , sedan infogar text i en av arbetsboken celler .
Public Sub MadeByAccess ( ) katalog
Dim aplExcel Som Excel.Application
Set aplExcel = CreateObject ( " Excel.Application " ) katalog
aplExcel.Workbooks.Add
aplExcel.ActiveCell = " . Hej från Access "
aplExcel.ActiveWorkbook.SaveAs ( " c : \\ MadeByAccess.xlsx " ) katalog
aplExcel.Quit
End Sub
4
Klicka på " Kör " -menyn är" Kör " -kommandot för att köra programmet , sedan använda Windows Explorer för att navigera till mappen " C : . \\ "
5
Dubbelklicka på filen " MadeByAccess.xlsx " för att ladda den filen i Excel . Lägg märke till den första cellen i det första kalkylbladet visas texten från " Hej från Access , " som visades i programmet .
Läs ett värde från Excel
6
Öppna Excel , skriver någon text i cell " A1 " i det första kalkylbladet . Tryck på " Control" och " S " samtidigt , skriv " C : \\ ForAccess.xlsx " i " Name " textrutan . Klicka på " Spara " och tryck sedan på "Control " och " F4 " samtidigt för att stänga Excel .
7
Open Access , klicka sedan på " Utvecklare " fliken för " Visual Basic " knappen för att öppna Visual Basic -programmering miljö .
8
Klicka på " Verktyg " -menyn är " Reference " kommandot , klicka sedan på kryssrutan för " Microsoft Excel " alternativet för att aktivera ditt program för att styra Excel .
9
Klicka på " Infoga " -menyn är " Module " kommandot , sedan klistra in följande program i det nya fönstret som visas . Detta program öppnar Excel- arbetsbok som du skapade i steg 1 , och läser cell " A1 " från arbetsboken .
Public Sub forAccess ( ) katalog
Dim aplExcel Som Excel.Application
Ställ aplExcel = CreateObject ( " Excel.Application " ) katalog
aplExcel.Workbooks.Open ( " c : \\ ForAccess.xlsx " ) katalog
MsgBox aplExcel.ActiveCell
aplExcel . ActiveWorkbook.Close
aplExcel.Quit
End Sub
10
Klicka på " Kör " -menyn är " Kör " -kommandot för att köra programmet . Tillträde kommer att visa en meddelanderuta som visar texten du skrev i Excel -cell i steg ett . Addera
