1 Ανοίξτε το Microsoft Word από το κουμπί " Έναρξη " στη γραμμή μενού των Windows . 2
Κάντε κλικ στο λογότυπο της Microsoft στην επάνω αριστερή γωνία του παραθύρου του Word . Κάντε κλικ στο "Popular " και επιλέξτε " Εμφάνιση της καρτέλας Προγραμματιστής στην κορδέλα " για να εμφανιστεί η καρτέλα του έργου .
Εικόνων 3
Επιλέξτε την καρτέλα "Προγραμματιστής " στην κορδέλα και κάντε κλικ στο " Macro ".
Η 4
Τύπος " e-mail " ( χωρίς εισαγωγικά ) στο πεδίο" Όνομα μακροεντολής " πλαίσιο κειμένου και κάντε κλικ στο κουμπί " Δημιουργία ".
5
προστίθεται το ακόλουθο κείμενο κάτω από την γραμμή που περιέχει το κείμενο " Sub email : "
Dim o2007OutlookApp Όπως Outlook.Application
Dim o2007Item Όπως Outlook.MailItem
Set o2007Item = o2007OutlookApp.CreateItem ( olMailItem )
Inputbyuser = InputBox ( " εισαγωγή κειμένου " )
Με o2007Item
. To = " reciever@mail.com "
. Θέμα = " Αποστολή θέμα"
. Σώμα = Inputbyuser
. Αποστολή
End με τη
6
Αποθηκεύστε τις αλλαγές μακρο πατώντας το πλήκτρο " Ctrl + S. " Κάντε κλικ στο κόκκινο " Χ " στην επάνω δεξιά γωνία για να κλείσετε το πρόγραμμα επεξεργασίας μακροεντολών.
Η
7 Κάντε κλικ στο εικονίδιο " Visual Basic" στη γραμμή εργαλείων μακροεντολών για να ανοίξετε το πρόγραμμα επεξεργασίας της Visual Basic . Επιλέξτε την καρτέλα "Εργαλεία" στην κορδέλα και, στη συνέχεια , κάντε κλικ στο "Αναφορές " επιλογή .
8
Μετακινηθείτε στη λίστα των αντικειμένων και να ελέγξετε την καταχώρηση " Microsoft Outlook 12.0 Object Library". Κάντε κλικ στο κουμπί "OK " για να επιστρέψετε στην επεξεργασία της Visual Basic .
Η
9 Πατήστε το πλήκτρο " F5 " για να ελέγξετε το email σας macro . Πληκτρολογήστε το κείμενο του e-mail σας στο πλαίσιο κειμένου που ανοίγει και κάντε κλικ στο κουμπί " OK" . Το Outlook θα στείλει ένα email με το κείμενό σας στο σώμα του .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα