Oprettelse af et Excel-regneark i Access kan du spare tid, når du har brug for at eksportere data til et Excel-regneark . Visual Basic for Applications ( VBA ), kan være et effektivt redskab til at automatisere processerne i Microsoft Office-programmer . Med VBA kan du bruge Microsoft Excel Application objekt for at oprette et Excel-regneark fra Access . Excel ansøgning objektet er indgangen til resten af objektet model. Eksportere data hurtigere til Excel ved at gemme data direkte til et Excel-regneark . Instruktioner
1

Launch Microsoft Office Access , klik på " Tom database " og klik på "Opret" -knappen for at oprette en tom database. Klik på " Database Tools " fanen og klik på " Visual Basic " for at åbne Microsoft Visual Basic vindue. Klik på " Indsæt" menuen og klikke på " Modul " for at indsætte en ny kode modul.
2

Klik på menuen "Funktioner" og klik på " Referencer". Rul ned og marker afkrydsningsfeltet ved siden af ​​" Microsoft Excel Object Library". Klik på "OK".
3

Start med at skrive følgende VBA-kode til at oprette en ny sub procedure : Hej

Private Sub createSpreadSheet ()
4

Fortsæt ved at skrive følgende kode til at oprette tre nye variable objekter , der skal bruges til at oprette Excel-regneark :

Dim newExcelApp som Excel.Application

Dim newWbk som Excel.Workbook < br >

Dim newWkSheet Som Excel.Worksheet
5

Føj følgende kode til at lancere Excel og vise det : Hej

Set newExcelApp = Excel.Application

newExcelApp.Visible = Sand
6

Skriv følgende for at tilføje en ny projektmappe og et projektark : Hej

Set newWbk = newExcelApp.Workbooks.Add

Set newWkSheet = newWbk.Worksheets (1)
7

Tilføj data til din nye regneark ved at skrive følgende : .

newWkSheet.Cells ( 1, 1) Værdi = " nyt regneark ... "
8

Gem den nye projektmappe skabt ved at skrive følgende kode : Hej

newWkSheet.SaveAs ( " C: \\ myworksheet.xlsx " )
9 < p > Rediger sti på det foregående trin , og skrive stien og filnavnet på dit valg
10

Skriv følgende for at afslutte sub procedure : .

End Sub
< br > 11

Tryk på " F5 " for at køre din procedure og oprette et nyt Excel-regneark .