Sisällysluettelo
Avaa Excel -tiedosto
Tämä alla oleva toiminto avaa Excel -tiedoston, jossa on Access VBA.
Ennen kuin käytät toimintoa, muista lisätä viittaus kohteeseen Microsoft Excelin objektikirjasto menemällä Työkalut> Viitteet ja tarkistaminen Microsoft Excelin objektikirjasto.
Julkinen toiminto OpenExcelFile (strFilePath as String) Booleanina 'Pakollinen: Työkalut> Viitteet: Lisää viittaus Microsoft Excel -objektikirjastoon Dim appExcel kuten Excel.Application Dim myWorkbook Exceliksi.Workbook Set appExcel = CreateObject ("Excel.Application") Aseta myWorkbook = appExcel.Workbooks.Open (strFilePath) appExcel.Visible = Tosi 'Tee jotain tai jätä avoin Aseta appExcel = Nothing Set myWorkbook = Nothing End Function' Käyttöesimerkki Sub OpenExcelFile_Example () Soita OpenExcelFile ("C: \ Users \ StevePC2 \ Downloads \ test.xlsx ") Loppuosa
Avaa Word -asiakirja Access VBA: n avulla
Aseta ensin viittaus Access VBA -ympäristön Word -kirjastoon.
Huomautus: Voit tehdä tämän VBE: ssä siirtymällä kohtaan Työkalut> Viitteet ja valitsemalla Microsoft Word 15.0 Object Library.
Seuraavan koodin avulla voit avata Word -asiakirjasi Accessin avulla:
Himmennä WordDoc objektijoukkona WordDoc = CreateObject ("Word.Application") WordDoc.Visible = True WordDoc.Documents.Open "C: \ Users \ Taryn \ Desktop \ BusinessDocument.docx" Aseta WordDoc = Ei
Tai voit mukauttaa yllä olevaa Avaa Excel -tiedosto -toimintoa luodaksesi toiminnon Word -asiakirjan avaamiseksi Access VBA: sta.
