Ako ovládať Ďalší program z aplikácie Microsoft Access

Ovládanie iný program z programu Access možno vykonať niekoľkými spôsobmi . Ďalšie aplikácie , vrátane aplikácií Microsoft Word a Excel , môžu byť ovládané prostredníctvom automatizácie objekty , ktoré vystavujú . Príklady takých objektov patrí dokument programu Word a Excel funkcie triedenia . Access môžete vytvárať a spravovať tieto objekty ako rozšírenie programu Access sám . Veci , ktoré budete potrebovať v Microsoft Access a Excel
Zobraziť ďalšie inštrukcie Cestuj 1

Spustite program Microsoft Access a stlačte Alt + F vystaviť " Možnosti " položku menu . Kliknite na túto položku a potom kliknite na " Centrum zabezpečenia " na ľavej strane v dialógovom okne " Možnosti programu Access " . Kliknite na tlačidlo "Nastavenia Centrum zabezpečenia " , potom " Makro Nastavenie " na ľavej strane . Kliknite na " Povoliť všetky makrá " možnosť , zatvorte všetky otvorené dialógové okná stlačením tlačidla ich " OK " .
2

Stlačte Alt + F11 pre vstup Visual Basic integrované vývojové prostredie ( IDE ) . Vyberte " Vložiť " , nasledovaný " modul " na IDE nástrojov , vytvoriť nový súbor , do ktorého chcete vstúpiť do programu ( AKA " makro " ) .
3

vložte nasledujúci program do nového okna kód :

Public Sub SayHelloFromAccess ( ) Dim applicationExcel Ako Excel.ApplicationSet applicationExcel = CreateObject ( " Excel.Application " ) applicationExcel.Workbooks.AddapplicationExcel.ActiveCell = " Dobrý deň , z programu Access " applicationExcel.ActiveWorkbook . uložiť ako ( " c : \\ FromAccess.xls " ) applicationExcel.QuitEnd Sub
4

Kliknite na " Nástroje " a " Referencie" , na paneli nástrojov IDE . Vyhľadávanie v zozname v dialógovom okne " Odkazy " na položku " Microsoft Excel Object Library . " Zaškrtnite políčko Táto položka keď ju nájdete , potom stlačte tlačidlo " OK " pre návrat do IDE prístup ' .
5

Spustite program kliknutím na ľubovoľné miesto vo vnútri , a potom stlačením klávesu F5 . Počkajte , až sa kurzor vráti na ikonu " Ready " , potom, čo sa na jeho ikonu " Busy "
6

Explorer Otvorte Windows a používať ho pre navigáciu k súboru práve vytvorené aplikácie Access makro . : "c : \\ FromAccess.xls " . Dvakrát kliknite na tento súbor otvoriť Excel a kliknite na tlačidlo " Áno " , ak aplikácia Excel sa zobrazí varovanie o formátovanie súboru . Všimnite si , že tabuľka programu Excel zobrazí správu " Hello " z makra
7

Vytvorte nový zošit v programe Excel a uložte ho ako . " C : . \\ Book1.xlsm " Vytvorenie malej stĺpce čísel vzostupne od 1 do 10 , alebo tak , kdekoľvek v aktívnom hárku . Vyberte stĺpec , zadajte " myList " a stlačte " Enter " v programe Excel poli názov ( v blízkosti hornej ľavej časti hlavnej obrazovky aplikácie Excel . )
8

Uložte zošit , v blízkosti Excel , a potom stlačte CTRL + Alt + Delete . Kliknite na tlačidlo " Spustiť správcu úloh , " kliknite na tlačidlo " Procesy " kartu manažér za úlohu . Vyberte každú položku , ktorá číta " Excel " kliknite na tlačidlo " Ukončiť proces " zastaviť Excel . Ukončite Správca úloh .
9

vložte nasledujúci program po poslednom príkazu programu SayHelloFromAccess , ktoré ste zadali predtým .

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

Sub Macro1 ( appXL Ako Excel.Application ) Dim sel ako RangeWith appXL.Application.Goto Referencie : = " mylist " ActiveSheet.Sort.SortFields.Clear.ActiveSheet.Sort.SortFields.Add Key : . = Selection.Columns ( 1 ) _ , Sortony : = xlSortOnValues ​​, Radenie : = xlDescending , _DataOption : . = xlSortNormalWith ActiveSheet.Sort.SetRange Selection.Header = xlGuess.MatchCase = False.Orientation = xlTopToBottom.SortMethod = xlPinYin.ApplyEnd WithEnd WithEnd Sub
10

Umiestnite kurzor na ľubovoľné miesto v podprograme SortExcelList a stlačte kláves F5 . Znovu otvorte súbor " C : \\ Book1.xlsm " . , A všimnite si , že stĺpec čísel je teraz v zostupnom poradí , zoradený podľa svojho nového Access makro

Ak program Access zobrazí chybu po stlačení klávesy F5 , ukončiť všetky aplikácie Excel procesy využívajúce pokyny od kroku 8 , zopakujte tento krok .

• Predchádzajúca strana: Ako môžem exportovať dáta z aplikácie Microsoft Access na SQL Server ? 
• Ďalšia strana: Ako vytvoriť databázu pre personálne súbory s Microsoft Access