Συμβουλή: Άλλες γλώσσες μεταφράζονται από την Google. Μπορείτε να επισκεφθείτε το English έκδοση αυτής της σύνδεσης.
Σύνδεση
x
or
x
x
Κανε ΕΓΓΡΑΦΗ
x

or

Πώς να εισαγάγετε αρχεία msg από σύστημα αρχείων στο φάκελο του Outlook;

Κανονικά, μπορείτε να εισαγάγετε αρχεία msg από σύστημα αρχείων σε φάκελο του Outlook μεταφέροντας και αποθέτοντας. Σε αυτό το άρθρο, θα σας παρουσιάσουμε μια εύκολη μέθοδο για την εισαγωγή όλων των αρχείων msg από ένα σύστημα αρχείων σε ένα συγκεκριμένο φάκελο του Outlook λεπτομερώς.

Εισαγωγή αρχείων μηνύματος από το σύστημα αρχείων στο φάκελο του Outlook με τον κώδικα VBA


Αποθηκεύστε εύκολα τα επιλεγμένα μηνύματα ηλεκτρονικού ταχυδρομείου ως διαφορετικά αρχεία μορφής στο Outlook:

Με το Αποθήκευση ως βοηθητικό αρχείο της Kutools για το Outlook, μπορείτε εύκολα να αποθηκεύσετε πολλαπλά επιλεγμένα emailsas ατομική μορφή αρχείου HTML, μορφή αρχείου TXT, το έγγραφο του Word, CSV αρχείο, καθώς και το αρχείο PDF στο Outlook, όπως παρακάτω screenshot έδειξε.

Kutools για το Outlook: με περισσότερα από 40 εύχρηστα πρόσθετα του Outlook, δωρεάν να δοκιμάσετε χωρίς περιορισμούς σε 45 ημέρες. Λήψη και δοκιμή δωρεάν τώρα!


Εισαγωγή αρχείων μηνύματος από το σύστημα αρχείων στο φάκελο του Outlook με τον κώδικα VBA

Κάντε ως εξής την εισαγωγή αρχείων msg από σύστημα αρχείων σε έναν καθορισμένο φάκελο στο Outlook.

1. Πάτα το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε τον κώδικα VBA κάτω από το παράθυρο της ενότητας.

Κωδικός VBA: Εισαγωγή αρχείων μηνύματος από το σύστημα αρχείων στο φάκελο του Outlook

(X) Δημιουργία διαμόρφωσης xfSO = Δημιουργία δέσμης ενεργειών (xml) Δημιουργία αρχείου xFSO = Δημιουργία δέσμης ενεργειών (xml). FileSystemObject Ρύθμιση xSelFolder = CreateObject ("Shell.Application") BrowseForFolder (0, "Επιλογή φακέλου:", 0, 0) Αν δεν πληκτρολογείτε όνομα (xSelFolder) Else xSourceFldPath = "" Έξοδος Υποσελίδας Αν ορίσετε xSourceFld = xFSO.GetFolder (xSourceFldPath) Ορίστε xSaveFld = GetObject ("", "Outlook.Application") GetNamespace ("MAPI" Έπειτα Exit Sub End Αν για κάθε xFileItem Σε xSourceFld.Files Ρυθμίστε xMSG = Session.OpenSharedItem (xFileItem.Path) Ρύθμιση xMailItem = xMSG.Copy xMailItem.Move xSaveFld Ρύθμιση xMailItem = Τίποτα xMSG.Delete Ρύθμιση xMSG = Τίποτα Επόμενο xFileItem Ρύθμιση xFileItem = Τίποτα Ρύθμιση xSourceFld = Τίποτα δεν ορίζεται xFSO = N othing End Sub

3. Πάτα το F5 για να εκτελέσετε τον κώδικα. Στο άνοιγμα Αναζήτηση φακέλου , επιλέξτε το φάκελο που περιέχει τα αρχεία msg που θα εισαγάγετε στο φάκελο του Outlook και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

4. Τώρα α Επιλογή φακέλου το παράθυρο διαλόγου εμφανίζεται, επιλέξτε ένα θέα για να αποθηκεύσετε τα αρχεία εισαγωγής msg και κάντε κλικ στο OK κουμπί.

Στη συνέχεια, όλα τα αρχεία msg σε έναν συγκεκριμένο φάκελο στο σύστημα αρχείων σας εισάγονται αμέσως σε ένα καθορισμένο φάκελο του Outlook.


Σχετικά άρθρα:



Συνιστώμενα εργαλεία παραγωγικότητας

Καρτέλα Office

χρυσό star1 Φέρτε χρήσιμες καρτέλες στο Excel και άλλο λογισμικό του Office, όπως το Chrome, το Firefox και ο νέος Internet Explorer.

Kutools για το Excel

χρυσό star1 Φοβερο! Αυξήστε την παραγωγικότητά σας σε λεπτά 5. Δεν χρειάζεστε ειδικές δεξιότητες, εκτός από δύο ώρες κάθε μέρα!

χρυσό star1 300 Νέες δυνατότητες για Excel, Κάντε το Excel πολύ εύκολο και ισχυρό:

  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων.
  • Συνδυασμός και ενοποίηση πολλών φύλλων και βιβλίων εργασίας.
  • Συγκρίνετε Περιοχές, Αντιγραφή Πολλαπλών Εύρους, Μετατροπή Κειμένου σε Ημερομηνία, Μετατροπή μονάδας και νομίσματος.
  • Καταμέτρηση κατά Χρώματα, Υποσύνολα σελίδας, Σύνθετη Ταξινόμηση και Σούπερ Φίλτρο,
  • Περισσότερα Επιλογή / Εισαγωγή / Διαγραφή / Κείμενο / Μορφή / Σύνδεσμος / Σχόλιο / Βιβλία εργασίας / Φύλλα εργασίας Εργαλεία ...

Εικόνα του Kutools για το Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Amey Thombre · 10 months ago
    This is amazing and just does what i was looking for. just make sure that you have Microsoft System Runtime library selected in the references of the VBA project as Scripting object is from that library.