Word-asiakirjan liittäminen a-muotoon on helppoa PDF tiedosto Outlook-sähköpostiin. Silti, jos haluat liittää useita Word-asiakirjoja nimellä PDF tiedostot sähköpostiin, voit lukea tämän artikkelin. Tässä näytämme sinulle menetelmän erän saamiseksi.
Word-asiakirjan liittäminen nimellä PDF tiedoston Outlook-sähköpostiin, voit ensin avata Word-asiakirjan ja siirtyä Tiedosto-valikkoon. Sitten voit siirtyä Tallenna ja Lähetä -välilehdelle, jossa on Lähetä nimellä PDF”-Painiketta, kuten seuraava kuvakaappaus.
Siten on melko yksinkertaista liittää Word-asiakirja nimellä PDF sähköpostiin. Mutta jos haluat muuntaa ja liittää useita Word-asiakirjoja nimellä PDF tiedostoja postitse, sinun on parempi käyttää seuraavaa tapaa. Sen avulla voit suorittaa sen irtotavarana.
Erä Muunna ja kiinnitä useita Word-asiakirjoja nimellä PDF Tiedostot sähköpostiin
- Sillä kutentart, kerää haluamasi Word-asiakirjat samaan Windows-kansioon.
- Käynnistä sitten Outlook-ohjelma.
- Kopioi seuraavaksi seuraava koodi käyttämättömään projektiin tai moduuliin.
Himmennä objMail nimellä Outlook.MailItem Sub BatchAttachMultipleWordDocumentsAsPDFToEmail () Dim objShell As Ob -kohteena Dim objWindowsFolder As Object Dim strWindowsFolder As String Set objMail = Outlook.Application.CreateItem (olMailItem) 'Valitse tietty Windows-kansio Set objShell = CreateObject ("Shell.Application") Aseta objWindowsFolder = objShell.BrowseFor 0, "Valitse Windows-kansio:", 0, "" "Jos Ei objWindowsFolder ei ole mitään Sitten strWindowsFolder = objWindowsFolder.self.Path &" \ "Call ProcessFolders (strWindowsFolder) objMail.Display End If End Sub Sub ProcessFolders (strPath As String) ) Dim objFileSystem As Object Dim objFolder As Object Dim objFile As Object Dim objWordApp As Word.Sovellus Dim objWordDocument as Word.Document Dim strDocumentName As String Dim strPDF Merkkijonona Aseta objFileSystem = CreateObject ("Scripting.FileSystemObject") Aseta objFolder = objFileSystem.GetFolder (strPath) jokaiselle objFile-tiedostolle objFolder.Files strFileExtension = objFileSystem.GetExtensionName (objFile) Jos LCase (strFileExtension) ) = "docx" Aseta sitten objWordApp = CreateObject ("Word.Application") Aseta objWordDocument = objWordApp.Documents.Open (objFile.Path) 'Muunna asiakirja pdf strDocumentName = Vasen (objWordDocument.Name, (Len (objWordDocument.Name) - Len (strFileExtension)) - 1) strPDF = strPath & strDocumentName & ".pdf"objWordDocument.ExportAsFixedFormat strPDF, wdExportFormatPDF objWordDocument.Close False 'Liitä pdf sähköpostitse objMail.Attachments.Add strPDF Tapa strPDF Loppu, jos seuraava 'Käsittele kaikki kansiot ja alikansiot If objFolder.SubFolders.Count> 0 Sitten jokaiselle objSubfolder-kansiolle ObjFolder.SubFolders If ((objSubfolder.Attributes And 2) = 0) And ((objSubfolder.Attributes And 4) = 0) Sitten ProcessFolders (objSubfolder.Path) End If Next End Jos End Sub
- Siirrä sen jälkeen kohdistin ensimmäiseen aliohjelmaan.
- Suorita tämä makro heti painamalla “F5”.
- Valitse ponnahdusikkunassa Windows-kansio, johon lähde-Word-asiakirjat on tallennettu.
- Samalla luodaan uusi sähköpostiosoite, johon näet liitteenä olevan sähköpostin PDF tiedostot, kuten seuraava ruutuost.
Outlookin ongelmat vaivaavat
Onko sinua häirinnyt erilaiset Outlook-ongelmat? Esimerkiksi Outlook on usein jumissa "ei vastaa" -tilassa tai Outlookin PST-tiedosto ei ole käytettävissä jne. Yleensä voit ensin kokeilla postilaatikon korjaustyökalua, scanpst, korjata PST-ongelmat. Toisinaan ongelmat voivat kuitenkin ylittää sen, mitä sisäänrakennettu työkalu voi tehdä. Siksi kannattaa pitää tehokkaampi ulkoinen apuohjelma lähellä, kuten DataNumen Outlook Repair.
Tekijän esittely:
Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien sql korjaus ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com
1