Зміст
Відкрийте файл Excel
Ця функція нижче відкриє файл Excel із Access VBA.
Перед використанням функції обов’язково додайте посилання на Бібліотека об’єктів Microsoft Excel перейшовши на Інструменти> Посилання і перевірка Бібліотека об’єктів Microsoft Excel.
Загальнодоступна функція OpenExcelFile (strFilePath As String) Як Boolean 'Необхідно: Інструменти> Перегляди: Додати посилання на бібліотеку об'єктів Microsoft Excel Dim appExcel як Excel.Application Dim myWorkbook As Excel.Workbook Set appExcel = CreateObject ("Excel.Application") Встановити myWorkbook = appExcel.Workbooks.Open (strFilePath) appExcel.Visible = True 'Зробити щось або просто залишити відкритим Набір appExcel = Нічого не встановлено myWorkbook = Нічого не закінчити функцію' Приклад використання Sub OpenExcelFile_Example () Виклик OpenExcelFile ("C: \ Користувачі \ StevePC2 \ Завантаження \ test.xlsx ") End Sub
Відкрийте документ Word за допомогою Access VBA
Спочатку встановіть посилання на бібліотеку Word для середовища Access VBA.
Примітка: Ви повинні зробити це у VBE, перейшовши до Інструменти> Посилання та поставивши галочку Бібліотека об’єктів Microsoft Word 15.0.
Наступний код дозволить вам відкрити документ Word за допомогою Access:
Затемнити WordDoc як набір об’єктів WordDoc = CreateObject ("Word.Application") WordDoc.Visible = True WordDoc.Documents.Open "C: \ Users \ Taryn \ Desktop \ BusinessDocument.docx" Set WordDoc = Nothing
Або ви можете адаптувати функцію «Відкрити файл Excel» вище, щоб створити функцію відкриття документа Word із Access VBA.
