რჩევა: სხვა ენები Google- ით თარგმნილია. შეგიძლიათ ეწვიოთ English ამ ბმის ვერსია.
შესვლა
x
or
x
x
რეგისტრაცია
x

or

როგორ ატვირთოთ msg ფაილები ფაილური სისტემადან Outlook- ის საქაღალდეში?

ჩვეულებრივ, შეგიძლიათ იმპორტირება msg ფაილების ფაილური სისტემადან Outlook საქაღალდეში გადმოწერისა და ჩაშვების გზით. ამ სტატიაში, ჩვენ ვაპირებთ გაჩვენოთ მარტივი მეთოდი იმპორტირება ყველა msg ფაილები ფაილური სისტემა მითითებულ Outlook საქაღალდეში.

იმპორტის msg ფაილები ფაილური სისტემადან Outlook- ის საქაღალდეში VBA კოდით


ადვილად შეინახოთ შერჩეული ელფოსტა, როგორც სხვადასხვა ფორმატის ფაილი Outlook- ში:

With Save როგორც ფაილი კომუნალური Kutools ამისთვის Outlook, თქვენ შეგიძლიათ მარტივად გადარჩენა მრავალჯერადი შერჩეული ელ ინდივიდუალური HTML ფორმატში ფაილი, TXT ფორმატი ფაილი, Word დოკუმენტი, CSV ფაილი, ისევე როგორც PDF ფაილის Outlook როგორც ქვემოთ screenshot აჩვენა.

Kutools ამისთვის Outlook: მეტი, ვიდრე 40 მოსახერხებელი Outlook add-ins, უფასო ცდილობენ არ შეზღუდვა in 45 დღე. ჩამოტვირთეთ და უფასო საცდელი ახლა!


იმპორტის msg ფაილები ფაილური სისტემადან Outlook- ის საქაღალდეში VBA კოდით

გთხოვთ, შემდეგნაირად გააკეთოთ msg ფაილების იმპორტი ფაილურ სისტემაში Outlook- ში მითითებულ საქაღალდეში.

1. პრესა Alt + F11 გასაღებები გასახსნელად Microsoft Visual Basic აპლიკაციებისათვის window.

2. In Microsoft Visual Basic აპლიკაციებისათვის ფანჯარა, დააჭირეთ ჩადეთ > მოდულები. შემდეგ VBA კოდის ქვემოთ კოპირება მოდულის ფანჯარაში.

VBA კოდი: იმპორტი msg ფაილები ფაილური სისტემადან Outlook საქაღალდეში

Sub ImportMessagesInFolder () Dim xFSO როგორც Scripting.FileSystemObject Dim xSourceFld როგორც Scripting.Folder Dim xSourceFldPath როგორც სიმებიანი Dim xFileItem როგორც Scripting.File Dim xMSG როგორც ობიექტის Dim xMailItem როგორც MailItem Dim xSaveFld როგორც Outlook.Folder On შეცდომა რეზიუმე შემდეგი Set xFSO = ახალი სკრიფტები. FileSystemObject Set xSelFolder = CreateObject ("Shell.Application"). BrowseForFolder ("საქაღალდის არჩევა:", 0, 0) თუ არა ტიპი (xSelFolder) = "არაფერი" შემდეგ xSourceFldPath = xSelFolder.self.Path + "\" XSourceFladePath = "" xSourceFladePad = "" xSourceFlade = "" xSourceFLD = " შემდეგ ქვედა დასასრული ყოველი xFileItem- ში xSourceFLD.Files უცნობია xMSG = Session.OpenSharedItem (xFileItem.Path) Set xMailItem = xMSG.Copy xMailItem.Move xSaveFld Set xMailItem = არაფერი xMSG.Delete Set xMSG = არაფერი შემდეგი xFileItem Set xFileItem = არაფერი Set xSourceFld = არაფერია მითითებული xFSO = N othing End ქვე

3. პრესა F5 გასაღები აწარმოებს კოდი. გახსნისას დაათვალიერეთ საქაღალდე დიალოგური ფანჯარა, შეარჩიეთ ფოლდერი შეიცავს msg ფაილებს, რომლებიც იმპორტს Outlook საქაღალდეში და შემდეგ დააჭირეთ ღილაკს OK ღილაკი. იხილეთ სკრინშოტი:

4. ახლა ა აირჩიეთ საქაღალდე დიალოგური ფანჯარა ამოძრავებს, გთხოვთ აირჩიოთ Outlook ფოლდერში შენახული იმპორტირებული msg ფაილი, და დააჭირეთ OK ღილაკს.

მაშინ ყველა msg ფაილი თქვენს ფაილში არსებული ფაილში იტვირთება დაუყოვნებლივ მითითებულ Outlook საქაღალდეში.


სტატიები:



რეკომენდებული პროდუქტიულობის ინსტრუმენტები

ოფისის ჩანართი

ოქროს ვარსკვლავი 1 მოიტანეთ ხელსაყრელი ჩანართები Excel და სხვა საოფისე პროგრამებისთვის, ისევე როგორც Chrome, Firefox და ახალი Internet Explorer.

Kutools ამისთვის Excel

ოქროს ვარსკვლავი 1 საოცარი! გაზარდეთ თქვენი პროდუქტიულობა წუთში. არ გჭირდებათ რაიმე განსაკუთრებული უნარები, ყოველდღე ორ საათში გადარჩენა!

ოქროს ვარსკვლავი 1 300 ახალი ფუნქციები Excel, ჩადება Excel ძალიან მარტივი და ძლიერი:

  • უჯრედის / რიგების / სვეტების შერწყმა მონაცემების დაკარგვის გარეშე.
  • მრავალჯერადი ცხრილებისა და სამუშაოების კომბინირება და კონსოლიდაცია.
  • შეადარეთ საზღვრები, დააკოპირეთ მრავალჯერადი საზღვრები, გადაიყვანეთ ტექსტის თარიღის, განყოფილებისა და ვალუტის კონვერტაციის.
  • დათვლა ფერები, Paging Subtotals, გაფართოებული დალაგება და სუპერ ფილტრი,
  • სხვა არჩევა / ჩასმა / წაშლა / ტექსტი / ფორმატი / ლინკი / კომენტარი / სამუშაო წიგნები / სამუშაოები ინსტრუმენტები ...

ეკრანის კადრი Kutools for 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.