Outlook бағдарламасы электрондық пошталарға қолтаңбаны автоматты түрде енгізу үшін ғана орнатылатынын ескерген боларсыз. Ол жиналысқа шақыруларға қолтаңбаны автоматты түрде енгізе алмайды. Сондықтан, бұл мақала осы мәселені қарастырады және оған жетудің 2 әдісімен бөліседі.
Outlook бағдарламасын жиналысқа шақыруға қолтаңбаны автоматты түрде енгізу үшін теңшей алмайсыз. Бұл «Автоматты қолтаңба» мүмкіндігі тек электрондық пошта үшін қолжетімді. Сондықтан, шығыс жиналыс сұрауларына қолтаңбаны автоматты түрде енгізгіңіз келсе, басқа құралдарды іздеу керек. Мұнда біз сізге 2 әдісті ұсынамыз.

1-әдіс: Теңшелетін пішін арқылы қол жеткізіңіз
- Ең басында Outlook қосымшасын іске қосыңыз.
- Содан кейін «Ctrl + 2» пернелері арқылы «Күнтізбе» шарлау тақтасына ауысыңыз.
- Содан кейін таспадағы «Жаңа жиналыс» түймесін басу арқылы жаңа жиналысқа шақыруды жасаңыз.
- Жаңа жиналыс терезесінде «Кірістіру» қойындысына ауысыңыз.
- Содан кейін «Қол қою» түймесін басып, жиналысқа енгізілетін қолтаңбаны таңдаңыз.
- Осыдан кейін «Әзірлеуші» қойындысына ауысып, «Бұл пішінді жобалау» түймесін басыңыз.
- Кейінірек, жаңа экранда «Жариялау» > «Пішінді басқаша жариялау» түймесін басыңыз.
- Жаңа тілқатысу терезесінде «Дисплей аты» өрісіне осы пішіннің атын енгізіңіз.
- Содан кейін «Жариялау» түймесін басыңыз.
- Соңында өзгерістерді сақтамай ағымдағы жиналыс терезесін жабыңыз.
- Енді қолтаңбасы бар жаңа жиналыс жасағыңыз келген сайын «Жаңа элементтер» > «Пішінді таңдау» түймесін басып, жаңа пішінді таңдауға болады.
2-әдіс: Outlook VBA пайдалану
- Алдымен Outlook VBA редакторына «Outlook бағдарламасында VBA кодын қалай іске қосу керек» мақаласына сәйкес қол жеткізе аласыз.
- Содан кейін келесі VBA кодын «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
- Әрі қарай, түсініктеме берілген кодты өзіңіздің жағдайыңызға қарай өзгертіңіз.
- Содан бері, сіз шығыс кездесу шақыруын жіберген сайын, алдын ала анықталған қолтаңба соңына автоматты түрде енгізіледі.
Түрлі Outlook ақауларына қарсы тұру
Outlook пайдаланушылары күтпеген апаттан ауыр сыбайлас жемқорлыққа дейін әртүрлі Outlook мәселелерімен ауырады. Жалпы, Outlook қателерін түзету үшін біз ішкі жөндеу құралын – Scanpst қолданбасын пайдаланамыз. Дегенмен, ол тек кейбір ұсақ ақауларды түзете алады. Егер PST файлы қатты зақымдалған болса, бұл құрал көп көмек көрсете алмайды. Бұл жағдайда сіз үшінші тарап бағдарламалық жасақтамасын пайдалануыңыз керек DataNumen Outlook Repair, ол сарапшы PST түзету.
Автордың кіріспесі:
Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. қалпына келтіру кв және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com






