Kuidas pakettkonverteerida ja lisada mitu Wordi dokumenti PDF Failid Outlooki meilile

Outlooki andmete taastamine, Outlooki lahendused Juuni 7, 2018

Wordi dokumenti on lihtne lisada a PDF faili Outlooki meili. Siiski, kui soovite manustada mitu Wordi dokumenti, kui PDF failid meilile, saate seda artiklit lugeda. Siin näitame teile selle partii hankimise meetodit.

Wordi dokumendi lisamiseks kui PDF Outlooki e-kirja, saate esmalt avada Wordi dokumendi ja minna menüüsse „Fail”. Seejärel saate lülituda vahekaardile „Salvesta ja saada”, millel on „Saada kui PDF” nuppu, nagu järgmine ekraanipilt.

Saada kui PDF

Seega on Wordi dokumendi lisamine kujul üsna lihtne PDF meilile. Kuid kui soovite teisendada ja lisada mitu Wordi dokumenti PDF failid meili, on parem kasutada järgmist viisi. See võimaldab teil seda hulgi täita.

Pakkide teisendamine ja mitme Wordi dokumendi manustamine PDF Failid meilile

  1. Sest nagutart, koguge soovitud Wordi dokumendid samasse Windowsi kausta.
  2. Seejärel käivitage Outlooki programm.
  3. Järgmisena kopeerige järgmine kood kasutamata projekti või moodulisse.
Tume objMail kui Outlook.MailItem Sub BatchAttachMultipleWordDocumentsAsPDFToEmail() Dim objShell As Object Dim objWindowsFolder As Object Dim strWindowsFolder As String Set objMail = Outlook.Application.CreateItem(olMailItem) 'Valige konkreetne Windowsi kaust Set objShell = CreateObject("Shell.Application") ObjseForShellrowB = objWindowsFolderol. 0, "Valige Windowsi kaust:", 0, "") Kui ei ole objWindowsFolder ei ole midagi, siis strWindowsFolder = objWindowsFolder.self.Path & "\" Call ProcessFolders(strWindowsFolder) objMail.Kuva lõpp, kui End Sub ProcessFolders(strPath As String ) Dim objFailisüsteem Objektina Dim objKaust Objektina Dim objFail objektina Dim objWordApp sõnana Word.Application Dim objWordDocument Wordina.Document Dim strDocumentName stringina Dim strPDF Stringina Set objFileSystem = CreateObject("Scripting.FileSystemObject") Määra objFolder = objFileSystem.GetFolder(strPath) iga objekti jaoks kaustas ObjFolder.Files strFileExtension = objFileSystem.GetLCjExtensionlestrlease (strFileExtension ) = "docx" Seejärel määrake objWordApp = CreateObject("Word.Application") Set objWordDocument = objWordApp.Documents.Open(objFile.Path) 'Teisenda dokument pdf
           strDocumentName = Left(objWordDocument.Name, (Len(objWordDocument.Name) - Len(strFileExtension)) - 1) strPDF = strPath & strDocumentName & ".pdf" objWordDocument.ExportAsFixedFormat strPDF, wdExportFormatPDF

           objWordDocument.Close Vale 'Attach the pdf meilile objMail.Attachments.Add strPDF

           Kill strPDF
        End If Next 'Töötle kõiki kaustu ja alamkaustu If objFolder.SubFolders.Count > 0 then For Every ObjSubfolder In ObjFolder.SubFolders If ((objSubfolder.Attributes And 2) = 0) And ((objSubfolder.Attributes And 4) = 0) Siis ProcessFolders (objSubfolder.Path) End If Next End If End Sub

VBA kood – teisendage ja lisage mitu Wordi dokumenti kui PDF Failid meilile

  1. Pärast seda liigutage kursor esimesse alamprogrammi.
  2. Seejärel vajutage selle makro koheseks käivitamiseks klahvi F5.
  3. Hüpikaknas väikeses dialoogiboksis valige Windowsi kaust, kuhu on salvestatud Wordi lähtedokumendid.Valige Windowsi kaust
  4. Korraga luuakse uus e-kiri, milles näete manustatud PDF failid, nagu järgmine screenshost.Lisatud PDF Failid uues meilis

Kimbutavad Outlooki probleemid

Kas teid häirivad mitmesugused Outlooki probleemid? Näiteks jääb Outlook sageli olekusse "ei reageeri" või Outlooki PST-fail muutub kättesaamatuks jne. Üldiselt võite kõigepealt proovida postkasti parandamise tööriista, scanpstPST probleemide lahendamiseks. Kuid mõnikord võivad probleemid ületada seda, mida sisseehitatud tööriist suudab. Seetõttu on parem hoida läheduses võimsamat välist utiliiti, näiteks DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas sql remont ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.