Innholdsfortegnelse
Åpne Excel -filen
Denne funksjonen nedenfor åpner en Excel -fil med Access VBA.
Før du bruker funksjonen, må du legge til en referanse til Microsoft Excel Object Library ved å gå til Verktøy> Referanser og sjekker Microsoft Excel Object Library.
Offentlig funksjon OpenExcelFile (strFilePath som streng) Som boolsk 'Obligatorisk: Verktøy> Referanser: Legg til referanse til Microsoft Excel Object Library Dim appExcel As Excel.Application Dim myWorkbook As Excel.Workbook Set appExcel = CreateObject ("Excel.Application") Set myWorkbook = appExcel.Workbooks.Open (strFilePath) appExcel.Visible = True 'Do Something or Just Leave Open Set appExcel = Nothing Set myWorkbook = Nothing End Function' Brukseksempel Sub OpenExcelFile_Example () Ring OpenExcelFile ("C: \ Users \ StevePC2 \ Downloads \ test.xlsx ") Slutt Sub
Åpne Word -dokument ved hjelp av Access VBA
Angi først en referanse til Word -biblioteket for Access VBA -miljøet.
Merk: Du ville gjøre dette i VBE ved å gå til Verktøy> Referanser og krysse av for Microsoft Word 15.0 Object Library.
Følgende kode lar deg åpne Word -dokumentet ditt med Access:
Dim WordDoc som objektsett WordDoc = CreateObject ("Word.Application") WordDoc.Visible = True WordDoc.Documents.Open "C: \ Users \ Taryn \ Desktop \ BusinessDocument.docx" Sett WordDoc = ingenting
Eller du kan tilpasse Open Excel File -funksjonen ovenfor for å opprette en funksjon for å åpne et Word -dokument fra Access VBA.
