Outlook электрондық поштаңыздағы сөздер арасындағы барлық қосымша кеңістікті қалай автоматты түрде жоюға болады

Қазір бөлісу:

Егер сіз Outlook электрондық поштасын құру кезінде кездейсоқ қосымша бос орындарды жиі терсеңіз, Outlook бағдарламасын сөздер арасындағы барлық қосымша бос орындарды автоматты түрде алып тастауды қалауыңыз мүмкін. Енді, бұл мақала сізге оны жүзеге асырудың ыңғайлы әдісін үйретеді.

Кейде, сіз электрондық пошта хабарламасын жасаған кезде, сөздердің арасына қателіктер жіберіп, қосымша көптеген бос орындарды енгізе аласыз. Олар электрондық пошта мазмұнын бұзады. Осы кезде сіз осы барлық қосымша орындарды алып тастайсыз деп үміттенесіз. Мұны қолмен орындау үшін сіз барлық «([]) [] {1,}» таңбаларын «\ 1» орнына ауыстыру үшін «Табу және ауыстыру» функциясын қолдана аласыз. Бірақ, салыстырмалы түрде, Outlook автоматты түрде жасай алса, әлдеқайда ыңғайлы және тиімді болар еді. Енді, келесілерде біз сізге Outlook бағдарламасын конфигурациялау әдісін ұсынамыз.

Таңбалы таңбаларды пайдаланып табыңыз және ауыстырыңыз

Электрондық поштадағы барлық бос орындарды автоматты түрде жою

  1. Біріншіден, VBA редакторына Outlook бағдарламасында «Alt + F11» пернелер тіркесімін басу арқылы қол жеткізіңіз.

Ескерту: Егер сіз VBA-да жаңадан болсаңыз, менің алдыңғы мақалама сілтеме жасай аласыз «Outlook бағдарламасында VBA кодын қалай іске қосуға болады« бір уақытта.

  1. Содан кейін, «MS Word нысан кітапханасын» «» сәйкес қосыңыз.VBA бағдарламасында объект кітапханасына сілтемені қалай қосуға болады«.
  2. Содан кейін VBA кодын «ThisOutlookSession» жобасына салыңыз
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
 
    'Get current mail
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       Set objMailDocument = objMail.GetInspector.WordEditor
 
       'Remove all extra spaces using wildcards
       With objMailDocument.Range.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            .Text = "([ ])[ ]{1,}"
            .Replacement.Text = "\1"
            .Forward = True
            .MatchWildcards = True
            .Execute Replace:=wdReplaceAll
      End With
    End If
End Sub

VBA коды - Электрондық поштадағы барлық бос орындарды автоматты түрде жою

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

Outlook файлының бұзылуынан қорықпаңыз

Outlook апатқа ұшыраған жағдайда, пайдаланушылар дүрбелеңге түсіп, Outlook файлдары бүлінген деп қорқады. Шындығында, сіз бірнеше сақтық шараларын қолданған кезде, мұндай қиындықтардан оңай арылуға болатын еді. Біріншіден, сіз деректерді қорғауда өте маңызды рөл атқаратын PST файлдарының сақтық көшірмесін үнемі жасап отыруыңыз керек. Сияқты сенімді және күшті сыртқы Outlook жөндеу құралын дайындаған жөн, мысалы DataNumen Outlook Repair, өйткені кіріс жәшігін жөндеу құралы мүмкін емес PST түзету бұл қатаң түрде бұзылады.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. mdf жөндеу және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.