Πρόσβαση στο VBA - Ανοίξτε το αρχείο Excel

Ανοίξτε το αρχείο Excel

Αυτή η παρακάτω λειτουργία θα ανοίξει ένα αρχείο Excel με Access VBA.

Πριν χρησιμοποιήσετε τη λειτουργία, βεβαιωθείτε ότι έχετε προσθέσει μια αναφορά στο Βιβλιοθήκη αντικειμένων του Microsoft Excel πηγαίνοντας στο Εργαλεία> Αναφορές και τον έλεγχο Βιβλιοθήκη αντικειμένων του Microsoft Excel.

Public Function 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 'Κάνε κάτι ή απλά άφησε το Open Set appExcel = Τίποτα δεν ορίζει myWorkbook = Τίποτα δεν τελειώνει τη λειτουργία' Παράδειγμα χρήσης Υπο OpenExcelFile_Example () Κλήση OpenExcelFile ("C: \ Users \ StevePC2 \ Downloads \ test.xlsx ") Τέλος υπο

Ανοίξτε το έγγραφο Word χρησιμοποιώντας την Access VBA

Πρώτα ορίστε μια αναφορά στη Βιβλιοθήκη Word για το περιβάλλον Access VBA.

Σημείωση: Θα το κάνατε στο VBE πηγαίνοντας στο Εργαλεία> Αναφορές και σημειώνοντας το Microsoft Word 15.0 Object Library.

Ο ακόλουθος κώδικας θα σας επιτρέψει να ανοίξετε το έγγραφο του Word χρησιμοποιώντας την Access:

Dim WordDoc As Object Set WordDoc = CreateObject ("Word.Application") WordDoc.Visible = True WordDoc.Documents.Open "C: \ Users \ Taryn \ Desktop \ BusinessDocument.docx" Set WordDoc = Τίποτα

Or μπορείτε να προσαρμόσετε τη λειτουργία Άνοιγμα αρχείου Excel παραπάνω για να δημιουργήσετε μια λειτουργία για να ανοίξετε ένα έγγραφο Word από την Access VBA.