Inhoudsopgave
Excel-bestand openen
Deze functie hieronder opent een Excel-bestand met Access VBA.
Voordat u de functie gebruikt, moet u een verwijzing toevoegen naar: Microsoft Excel-objectbibliotheek door naar te gaan Hulpmiddelen > Referenties en controleren Microsoft Excel-objectbibliotheek.
Openbare functie OpenExcelFile(strFilePath As String) As Boolean 'Required: Tools > Refences: Add reference to 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 'Doe iets of laat het gewoon open Set appExcel = Nothing Set myWorkbook = Nothing End Function 'Gebruiksvoorbeeld Sub OpenExcelFile_Example() Roep OpenExcelFile("C:\Users\StevePC2\Downloads\ test.xlsx") End Sub
Open Word-document met Access VBA
Stel eerst een verwijzing in naar de Word-bibliotheek voor de Access VBA-omgeving.
Opmerking: Dit doe je in de VBE door naar Tools>References te gaan en Microsoft Word 15.0 Object Library aan te vinken.
Met de volgende code kunt u uw Word-document openen met Access:
Dim WordDoc als object instellen WordDoc = CreateObject("Word.Application") WordDoc.Visible = True WordDoc.Documents.Open "C:\Users\Taryn\Desktop\BusinessDocument.docx" Set WordDoc = Nothing
Of u kunt de functie Excel-bestand openen hierboven aanpassen om een functie te maken waarmee u een Word-document kunt openen vanuit Access VBA.
