Πώς να ανοίξετε ένα έγγραφο του Word από το Excel Χρησιμοποιώντας VBA

Πολλά υπολογιστικά φύλλα του Excel είναι πολύ περισσότερα από απλά πίνακες δεδομένων . Μπορούν να ενεργούν ως τον πίνακα ελέγχου για το σύνολο των δραστηριοτήτων σας, ή ως μια εφαρμογή λογισμικού από μόνα τους , ειδικά όταν έχετε να εκμεταλλευτείτε τη δύναμη της Visual Basic for Applications ή VBA . Μπορεί να υπάρχουν φορές που θα χρειαστεί να ξεκινήσει και, ενδεχομένως, να τροποποιήσει τα έγγραφα του Word από την εφαρμογή του Excel , οι οποίες είναι δυνατό να γίνει με VBA . Οδηγίες
Η 1

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο παράθυρο του επεξεργαστή σας VBA :

Sub OpenWordDoc ( )

Dim wrdApp Όπως Word.Application

Dim wrdDoc Όπως Word.Document

Set wrdApp = CreateObject ( " Word.Application " )

wrdApp.Visible = True

Set wrdDoc = wrdApp.Documents.Open ( " C : \\ όνομα φακέλου \\ Filename.doc " )

wrdApp.Quit «στενή η εφαρμογή του Word

Set wrdDoc = Τίποτα

Set wrdApp = Τίποτα

End Sub 2

Τροποποιήστε τον κώδικα παραπάνω αντικαθιστώντας " C : \\ όνομα φακέλου \\ Filename.doc " . με τη σωστή διαδρομή και το όνομα αρχείου του εγγράφου του Word που θέλετε να ανοίξετε

με 3

Πατήστε το " F5 " για να εκτελέσετε το όνομα Macro σας , και να δείτε το έγγραφο του Word ανοιχτό .
Η
εικόνων