Hvordan få tilgang VBA å lage et Excel-regneark
Opprette et Excel-regneark i Access kan du spare tid når du trenger å eksportere data til et Excel-regneark. Visual Basic for Applications (VBA) kan være et kraftig verktøy for å automatisere prosesser i Microsoft Office-programmer. Med VBA kan du bruke Microsoft Excel Application objekt for å opprette et Excel-regneark fra Access. Excel programmet objektet er inngangsporten til resten av objektmodellen. Eksportere data raskere til Excel ved å lagre data direkte til et Excel-regneark.
Bruksanvisning
1 Start Microsoft Office Access, klikker du på "Blank Database" og klikk på "Create" knappen for å lage en tom database. Klikk på "Databaseverktøy" og klikk "Visual Basic" for å åpne Microsoft Visual Basic Window. Klikk på "Insert" -menyen og klikk "Module" å sette inn en ny kode modul.
2 Klikk på "Verktøy" -menyen og klikk "Referanser". Scroll ned og merk av for "Microsoft Excel <versjonsnummer> Object Library." Klikk på "OK".
3 Start med å skrive inn følgende VBA-kode for å opprette en ny under prosedyre:
Private Sub createSpreadSheet ()
4 Fortsett ved å skrive følgende kode for å opprette tre nye variable objekter som skal brukes til å opprette Excel-regneark:
Dim newExcelApp As Excel.Application
Dim newWbk Som Excel.Workbook
Dim newWkSheet Som Excel.Worksheet
5 Legg til følgende kode for å starte Excel og vise det:
Set newExcelApp = Excel.Application
newExcelApp.Visible = True
6 Skriv inn følgende for å legge til en ny arbeidsbok og et regneark:
Set newWbk = newExcelApp.Workbooks.Add
Sett newWkSheet = newWbk.Worksheets (1)
7 Legg data til det nye regnearket ved å skrive følgende:
newWkSheet.Cells (1, 1) .Value = "Nytt regneark ..."
8 Lagre den nye arbeidsboken skapt ved å skrive inn følgende kode:
newWkSheet.SaveAs ("C:\myworksheet.xlsx")
9 Redigere banen på forrige trinn, og skriv inn banen og filnavnet for ditt valg.
10 Skriv inn følgende for å avslutte sub prosedyre:
End Sub
11 Trykk "F5" for å kjøre prosedyren og opprette et nytt Excel-regneark.