Kontrollere et annet program fra Access kan gjøres på flere måter. Andre programmer, inkludert Microsoft Word og Excel , kan styres gjennom automatisering objektene de utsetter . Eksempler på slike objekter inkluderer et Word- dokument og en Excel slags funksjon. Access kan opprette og administrere disse objektene som utvidelser av Access selv. Du trenger
Microsoft Access og Excel
Vis flere instruksjoner
en

Åpne Microsoft Access og trykk Alt + F for å avsløre "Options " menyen . Klikk dette elementet , klikk deretter på "Trust Center" til venstre for " Tilgang Alternativer" i dialogboksen . Klikk på " Klareringssenter Settings"-knappen , deretter "Macro Settings" element til venstre . Klikk på " Aktiver alle makroer " alternativet, og deretter lukke alle åpne dialogbokser ved å trykke sine " OK" .
2

Trykk Alt + F11 for å gå inn i Visual Basic integrert utviklingsmiljø (IDE ) . Velg " Sett inn ", etterfulgt av " Module" på IDE- verktøylinjen for å opprette en ny fil der du kan skrive et program (AKA "makro ". )
3

Lim inn følgende program inn den nye koden vindu : en

Public Sub SayHelloFromAccess ( ) Dim applicationExcel Som Excel.ApplicationSet applicationExcel = CreateObject ( " Excel.Application ") applicationExcel.Workbooks.AddapplicationExcel.ActiveCell = "Hello fra Access " applicationExcel.ActiveWorkbook . Lagre som ( "c : \\ FromAccess.xls ") applicationExcel.QuitEnd Gå
4

Klikk på " Verktøy " og deretter " referanser ", på den IDE verktøylinjen . Søke i listen i " Referanser " i dialogboksen for elementet "Microsoft Excel Object Library. " Velg at elementet boksen når du finner den, og trykk deretter på "OK" for å gå tilbake til Access "IDE .
5

Kjør programmet ved å klikke hvor som helst inni den, og deretter trykke F5 . Vent til markøren for å gå tilbake til sin "Klar "-ikonet etter det tar på sin " Opptatt "-ikonet
6

Åpne Windows Utforsker, og bruke den til å navigere til filen bare opprettet av Access makro. : " c: \\ FromAccess.xls ". Dobbeltklikk på filen for å åpne Excel , og klikk " Ja" hvis Excel viser en advarsel om filformatering . Legg merke til at Excel regneark viser "Hello " melding fra makroen
7

Opprett en ny arbeidsbok i Excel og lagre det som . "C : . \\ Book1.xlsm " Lag en liten kolonne med tall stigende fra 1 til 10 eller så , hvor som helst i det aktive regnearket . Velg kolonnen , og skriv " minliste " og trykk " Enter" i Excel -boksen ( nær øvre venstre del av de viktigste Excel -skjermen. )
8

Lagre arbeidsboken , nær Excel , og trykk deretter på CTRL + Alt + Delete . Klikk "Start Task Manager ", klikk deretter på Task Manager "Prosesser "-kategorien . Velg hvert element som leser " Excel ", deretter " Avslutt prosess " for å stoppe Excel. Lukk Task Manager.
9

Lim inn følgende program etter den siste setningen av SayHelloFromAccess programmet du angav tidligere.

Public Sub SortExcelList ( ) Dim applicationExcel Som Excel.ApplicationSet applicationExcel = CreateObject ( " Excel.Application ") applicationExcel.Workbooks.Open FileName: = "C : \\ Book1.xlsm " Macro1 applicationExcelapplicationExcel.ActiveWorkbook.SaveapplicationExcel.QuitEnd Sub

Sub Macro1 ( appXL Som Excel.Application ) Dim sel som RangeWith appXL.Application.Goto Referanse: . = " minliste " ActiveSheet.Sort.SortFields.Clear.ActiveSheet.Sort.SortFields.Add Key : = Selection.Columns ( 1 ) _ , SortOn : = xlSortOnValues ​​, Bestilling : = xlDescending , _DataOption : . = xlSortNormalWith ActiveSheet.Sort.SetRange Selection.Header = xlGuess.MatchCase = False.Orientation = xlTopToBottom.SortMethod = xlPinYin.ApplyEnd WithEnd WithEnd Sub
10

Plasser markøren hvor som helst i SortExcelList subrutine og trykk F5 . Åpne filen "C : \\ Book1.xlsm " . , Og legg merke til at kolonnen med tall er nå i synkende rekkefølge , sortert etter din nye Access makro
p Hvis Access viser en feilmelding etter at du trykker F5 , avslutte alle Excel prosesser ved hjelp av instruksjonene i trinn 8, og deretter gjenta dette trinnet .