Kuidas automaatselt lisada konkreetseid faile Outlookis konkreetsete meilide saatmisel

Outlooki lahendused September 29, 2025

Kas peate Outlookis konkreetsete meilide saatmisel sageli lisama konkreetseid faile? Kui jah, siis võib tunduda, et nende iga kord käsitsi lisamine on tüütu. See artikkel õpetab teile kiiret meetodit selle saavutamiseks Outlook VBA abil.

Oma igapäevatöös pean sageli teatud e-kirjade saatmisel lisama konkreetseid faile. Näiteks pean igal nädalal saatma oma ülemustele meili, et teatada oma iganädalasest tööst. Sellele meilile pean lisama teatud failid, sealhulgas töölogid, mõned andmestatistika aruanded ja nii edasi. Tavaliselt värskendan neid faile igal nädalal. Varem koostasin tavaliselt kõigepealt sõnumi keha ja seejärel lisan need failid käsitsi. Praegu leian aga targema nipi. See kasutab Outlook VBA automatiseerimiseks. Kui teil on sarnased nõuded, lugege edasi, et õppida konkreetseid VBA koode ja üksikasjalikke toiminguid.

Konkreetsete e-kirjade saatmisel lisage automaatselt kindlad failid

  1. Alustamiseks avage Outlook ja minge vahekaardile „Arendaja”.
  2. Seejärel leiate ja klõpsake nuppu "Visual Basic", mis toob korraga välja VBA redaktori akna.
  3. Järgmises aknas peaksite topeltklõpsama vasakpoolses projektiloendis projekti ThisOutlookSession.
  4. Järgmisena peaksite sellesse kopeerima ja kleepima järgmised VBA-koodid.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim strPrompt As String
    Dim nRes As Integer
 
    'Check the email subject and recipient
    If InStr(LCase(Item.Subject), "worklog") > 0 And InStr(Item.To, "frank") > 0 Then
       strPrompt = "Do you want to attach the worklog related files?"
       nRes = MsgBox(strPrompt, vbYesNo + vbQuestion, "Attach Files")
       If nRes = vbYes Then
          'Attach the specific files
          With Item
               .Attachments.Add ("C:\Attachments\WorkLog.docx")
               .Attachments.Add ("C:\Attachments\Data Statistics Report 1.xlsx")
               .Attachments.Add ("C:\Attachments\Data Statistics Report 2.xlsx")
          End With
       End If
    End If
End Sub

VBA-koodid – konkreetsete e-kirjade saatmisel lisage konkreetsed failid automaatselt

  1. Pärast seda peate uuele projektile määrama digitaalse sertifikaadi.
  • Kõigepealt klõpsake tööriistaribal nuppu "Tööriist" ja valige "Digiallkiri".
  • Seejärel klõpsake dialoogiboksis "Digitaalne allkiri" nuppu "Vali",
  • Seejärel saate valida olemasoleva sertifikaadi.
  • Lõpuks klõpsake selle edukaks määramiseks nuppu "OK".Digitaalne allkiri
  1. Hiljem peate muutma makro sätteid, et lubada lihtsalt digitaalselt allkirjastatud makrosid.
  2. Lõpuks saate proovida.
  • Kui klõpsate "Saada", et saata konkreetne kiri, mis sisaldab konkreetseid sõnu teemas või saadetakse konkreetsele kontaktile, näete sõnumikasti, nagu alloleval pildil.Sõnumikast
  • Pärast seda saate saadetud meili kontrollida. Eelseadistatud failid leiate kindlasti saadetud kirjast.Kontrollige saadetud e-kirja

Ärge kunagi lükake Outlooki vigade parandamist edasi

Mõnikord, kuigi näete Outlookis tõrketeadet, võite pärast sõnumi sulgemist siiski tööd jätkata. Kuid tegelikult pole see soovitatav tegevus. Mida peaksite tegema, on need võimalikult kiiresti kõrvaldada, selle asemel et need kõrvale jätta. Probleemide kuhjumine toob kaasa tõsise krahhi. Kui teie Outlook jookseb kokku, satuvad teie Outlooki PST andmed ohtu. Sa peaksid seda teadma rikutud Outlooki PST-andmed on üsna sõlmeline. Sel ajal ei jää muud üle, kui kasutada kogenud ja mainekat remonditööriista, nt DataNumen Outlook Repair.

Autori sissejuhatus:

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

Kommentaarid on suletud.