2 būdai, kaip automatiškai įterpti parašą į kvietimus į susitikimą programoje „Outlook“.

Galbūt pastebėjote, kad „Outlook“ galima nustatyti tik automatiškai įterpti parašą į el. Jis negali automatiškai įterpti parašo į susitikimo kvietimus. Todėl šiame straipsnyje bus nagrinėjama ši problema ir pasidalinta 2 būdais, kaip tai pasiekti.

Negalite sukonfigūruoti „Outlook“ automatiškai įterpti parašą į kvietimą į susitikimą. Ši „automatinio parašo“ funkcija galima tik el. paštui. Todėl, jei norite automatiškai įterpti parašą prie išeinančių susitikimų užklausų, turite ieškoti kitų priemonių. Čia mes jums pristatysime 2 metodus.

1 būdas: pasiekite naudodami tinkintą formą

1. Pačioje pradžioje paleiskite „Outlook“ programą.
2. Tada pereikite prie naršymo srities „Kalendorius“ mygtukais „Ctrl + 2“.
3. Tada sukurkite naują kvietimą į susitikimą spustelėdami mygtuką „Naujas susitikimas“ juostelėje.
4. Naujame susitikimo lange pereikite prie skirtuko „Įterpti“.
5. Tada spustelėkite „Parašas“ ir pasirinkite parašą, kurį norite įterpti į susitikimą.
6. Po to pereikite į skirtuką „Kūrėjas“ ir spustelėkite mygtuką „Sukurti šią formą“.
7. Vėliau naujame ekrane spustelėkite „Skelbti“ > „Paskelbti formą kaip“.
8. Naujame dialogo lange įveskite šios formos pavadinimą lauke „Rodomas pavadinimas“.
9. Tada spustelėkite mygtuką „Paskelbti“.
10. Galiausiai uždarykite dabartinį susitikimo langą neišsaugodami pakeitimų.
11. Nuo šiol kiekvieną kartą, kai norite sukurti naują susitikimą su parašu, galite spustelėti „Nauji elementai“ > „Pasirinkti formą“, tada pasirinkti naują formą.

2 būdas: pasinaudokite Outlook VBA

1. Pirmiausia galite pasiekti „Outlook VBA“ redaktorių pagal straipsnį „Kaip paleisti VBA kodą programoje Outlook“.
2. Tada nukopijuokite šį VBA kodą į projektą „ThisOutlookSession“.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMeeting As Outlook.MeetingItem
    Dim strSignatureFile As String
    Dim objFileSystem As Object
    Dim objTextStream As Object
    Dim strText As String
    Dim objTempMail As Outlook.MailItem

   If TypeName(Item) = "MeetingItem" Then
      Set objMeeting = Item
 
      'Change the path to your own signature file
      strSignatureFile = CStr(Environ("USERPROFILE")) & "\AppData\Roaming\Microsoft\Signatures\Test John Smith.htm"
      Set objFileSystem = CreateObject("scripting.FileSystemObject")
      Set objTextStream = objFileSystem.OpenTextFile(strSignatureFile)
      strText = objTextStream.ReadAll
 
      Set objTempMail = Outlook.Application.CreateItem(olMailItem)
      objTempMail.Display
      objTempMail.HTMLBody = strText
 
      objMeeting.Body = objMeeting.Body & vbCrLf & vbCrLf & objTempMail.Body
      objMeeting.Save
 
      objTempMail.Close olDiscard
    End If
End Sub

3. Tada pakeiskite komentuojamą kodą pagal savo atvejį.
4. Nuo tada kiekvieną kartą, kai siunčiate išeinantį susitikimo kvietimą, iš anksto nustatytas parašas bus automatiškai įterpiamas pabaigoje.

Skaitykite įvairias „Outlook“ problemas

„Outlook“ naudotojai susiduria su įvairiomis „Outlook“ problemomis, pradedant netikėta gedimu ir baigiant rimta korupcija. Paprastai mes linkę naudoti integruotą taisymo įrankį – „Scanpst“, kad ištaisytume „Outlook“ klaidas. Tačiau jis gali pašalinti tik kai kuriuos nedidelius nesklandumus. Jei PST failas yra rimtai pažeistas, šis įrankis negali padėti. Tokiu atveju turite naudoti trečiosios šalies programinę įrangą, pvz DataNumen Outlook Repair, kuris yra ekspertas PST taisymas.

Autoriaus įvadas:

Shirley Zhang yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant atkurti sql ir „Outlook“ taisymo programinės įrangos produktai. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com