Ako Access VBA vytvoriť tabuľku programu Excel

Vytvorenie tabuľky programu Excel v programe Access vám môže ušetriť čas , kedy budete musieť exportovať dáta do tabuľky programu Excel . Visual Basic for Applications ( VBA ) môže byť mocným nástrojom pre automatizáciu procesov v aplikáciách Microsoft Office . S VBA môžete použiť objekt programu Microsoft Excel vytvoriť tabuľku programu Excel z programu Access . Objekt programu Excel je vstupnou bránou do zvyšku modelu objektu . Export dát rýchlejší Excel ukladanie dát priamo do tabuľky programu Excel . Pokyny dovolená 1

Spustite program Microsoft Office Access , kliknite na tlačidlo " Prázdna databáza " a kliknite na tlačidlo " Vytvoriť " vytvoriť prázdnu databázu . Kliknite na kartu " Databáza Nástroje " a kliknite na " Visual Basic " , otvorte okno Basic Visual Microsoft . Kliknite na " Vložiť " menu a kliknite na " modul " vložiť nový kód modulu .
2

Kliknite na menu " Nástroje " a kliknite na " Referencie " . Prejdite dole a zaškrtnite políčko vedľa " Microsoft Excel Object Library . " Kliknite na tlačidlo " OK " .
3

Začnite tým , zadajte nasledujúci kód VBA vytvoriť nový čiastkové postup :

Private Sub createSpreadSheet ( )
4

Pokračujte zadaním nasledujúci kód vytvoriť tri nové premenné objekty , ktoré budú použité pre vytvorenie tabuľkového procesora Excel :

Dim newExcelApp Ako Excel.Application

Dim newWbk As Excel.Workbook

Dim newWkSheet Ako Excel.Worksheet
5

Pridajte nasledujúci kód na spustenie programu Excel a zobrazí ho :

Set newExcelApp = Excel.Application

newExcelApp.Visible = TRUE
6

Zadajte nasledujúce pridať nový zošit a list:

Set newWbk = newExcelApp.Workbooks.Add

Set newWkSheet = newWbk.Worksheets ( 1 )
7

Pridanie dát do novej tabuľky zadaním nasledujúceho : .

newWkSheet.Cells ( 1 , 1 ) value = " Nový list ... "
8

Uložte nový zošit vytvorený zadaním nasledujúci kód :

newWkSheet.SaveAs ( " C : \\ myworksheet.xlsx " )
9 < p . > Upraviť cestu na predchádzajúcom kroku a zadajte cestu a názov súboru vášho výberu
10

Zadajte nasledujúci na koniec procedúry Sub :

End Sub

11

Stlačte " F5 " spustiť svoj postup a vytvorte nový Excel .

• Predchádzajúca strana: Zoznam základných údajov typy sú k dispozícii v jazyku Visual Basic 
• Ďalšia strana: Ako porovnať rande s VB.NET