Ինչպե՞ս ներմուծել msg ֆայլերը ֆայլային համակարգից Outlook թղթապանակ:
Սովորաբար, կարող եք msg ֆայլեր ներմուծել ֆայլային համակարգից Outlook պանակ ՝ քարշ տալով և գցելով: Այս հոդվածում մենք ձեզ ցույց կտանք հեշտությամբ բոլոր msg ֆայլերը ֆայլային համակարգից մանրամասնորեն ներմուծելու բոլոր msg ֆայլերը:
Ներմուծեք msg ֆայլերը ֆայլային համակարգից VBA կոդով Outlook թղթապանակ
Ներմուծեք msg ֆայլերը ֆայլային համակարգից VBA կոդով Outlook թղթապանակ
Խնդրում ենք վարվել հետևյալ կերպ `msg ֆայլեր ֆայլային համակարգից ներմուծելու համար Outlook- ի նշված պանակ:
1. Սեղմեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո VBA կոդի ներքո պատճենեք Մոդուլի պատուհանում:
VBA կոդ ՝ msg ֆայլերը ներմուծել ֆայլային համակարգից Outlook պանակ
Sub ImportMessagesInFolder()
Dim xFSO As Scripting.FileSystemObject
Dim xSourceFld As Scripting.Folder
Dim xSourceFldPath As String
Dim xFileItem As Scripting.File
Dim xMSG As Object
Dim xMailItem As MailItem
Dim xSaveFld As Outlook.Folder
On Error Resume Next
Set xFSO = New Scripting.FileSystemObject
Set xSelFolder = CreateObject("Shell.Application").BrowseForFolder(0, "Select a folder:", 0, 0)
If Not TypeName(xSelFolder) = "Nothing" Then
xSourceFldPath = xSelFolder.self.Path + "\"
Else
xSourceFldPath = ""
Exit Sub
End If
Set xSourceFld = xFSO.GetFolder(xSourceFldPath)
Set xSaveFld = GetObject("", "Outlook.Application").GetNamespace("MAPI").PickFolder
If TypeName(xSaveFld) = "Nothing" Then
Exit Sub
End If
For Each xFileItem In xSourceFld.Files
Set xMSG = Session.OpenSharedItem(xFileItem.Path)
Set xMailItem = xMSG.Copy
xMailItem.Move xSaveFld
Set xMailItem = Nothing
xMSG.Delete
Set xMSG = Nothing
Next xFileItem
Set xFileItem = Nothing
Set xSourceFld = Nothing
Set xFSO = Nothing
End Sub
3. Սեղմեք F5 ծածկագիրը գործելու համար: Բացման մեջ Թերթիր պանակի համար երկխոսության տուփ, ընտրեք պանակը պարունակող msg ֆայլերը, որոնք դուք կներմուծեք Outlook պանակում, և այնուհետև կտտացրեք այն OK կոճակ Տեսեք,
4. Հիմա ա Ընտրեք թղթապանակը երկխոսության պատուհանը հայտնվում է, խնդրում ենք ընտրել Հեռանկար ներմուծված msg ֆայլերը պահելու համար պանակ և կտտացրեք այն OK կոճակը:
Այնուհետև ձեր ֆայլային համակարգի որոշակի պանակում գտնվող բոլոր msg ֆայլերը անմիջապես ներմուծվում են նշված Outlook թղթապանակ:
Outlook- ում հեշտությամբ պահեք ընտրված էլփոստերը որպես տարբեր ձևաչափի ֆայլեր.
Հետ Kանգվածային խնայողություն օգտակարությունը Outlook- ի համար նախատեսված գործիքներ, Outlook- ում կարող եք հեշտությամբ պահպանել բազմաթիվ ընտրված էլփոստեր `որպես անհատական HTML ձևաչափի ֆայլ, TXT ձևաչափի ֆայլ, Word փաստաթուղթ, CSV ֆայլ, ինչպես նաև PDF ֆայլ, ինչպես ցույց է տրված ստորև ներկայացված ցուցադրումը:
Ներբեռնեք և փորձեք հիմա: (60 օր անվճար երթուղի)
Առնչվող հոդվածներ քանակը:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: