1 Ανοίξτε την εφαρμογή Microsoft Excel από το μενού του προγράμματος .
2
Ανοίξτε το μενού macro χρησιμοποιώντας το \\ " Alt \\" και \\ πλήκτρα " F8 \\" .
εικόνων 3
Πληκτρολογήστε \\ " Macro Test \\ "στο πλαίσιο Όνομα μακροεντολής και κάντε κλικ στο \\ " Δημιουργία \\ " κουμπί
Η 4
Επικολλήστε τον παρακάτω κώδικα ακριβώς κάτω από το κείμενο της \\ ". Sub Test \\ " :
' αναγνωρίσει τη μεταβλητή .
Δημ. oWord Όπως />
« Ορίστε τη μεταβλητή ( τρέχει νέα περίοδο λειτουργίας του Word) .
Set oWord = CreateObject ( \\ " Word.Application \\" )
« Προσθέστε ένα νέο έγγραφο .
oWord.Documents.Add br />
' Προσθέστε κείμενο
oWord.Selection.TypeText \\ " Αυτό είναι ένα κείμενο \\ ".
. " Αποθηκεύστε το έγγραφο
oWord.ActiveDocument.SaveAs αρχείου : . = \\ " c : \\ \\ Mydoc.doc \\ " />
oWord.Quit
« Καταργήστε την μεταβλητή από τη μνήμη .
Set oWord = Τίποτα
5
Επιλέξτε \\ " Εργαλείο \\ " από τη γραμμή μενού και στη συνέχεια επιλέξτε το \\ " Αναφορές \\ "επιλογή . Ελέγξτε το στοιχείο \\ " Microsoft Word 12.0 βιβλιοθήκη αντικειμένων \\ " και στη συνέχεια κάντε κλικ στο κουμπί " OK \\ " \\ για να συνεχίσετε.
Η
6 Πατήστε το \\ " Alt \\ " και το \\ πλήκτρο " F8 \\ " για να ανοίξετε το παράθυρο για να δείτε τις μακροεντολές διαθέσιμες σε αυτό το υπολογιστικό φύλλο . Επισημάνετε τη μακροεντολή \\ "Test Macro \\" και κάντε κλικ στο κουμπί \\ " Run \\ " . Μετά την εκτέλεση της μακροεντολής ένα νέο έγγραφο του Word στο \\ " C : \\ " σκληρό δίσκο που ονομάζεται \\ " Mydoc.doc \\" έχει δημιουργηθεί
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα