Kako automatski ukloniti posebne znakove u predmetu e-pošte putem Outlook VBA

E-poruke koje sadrže posebne znakove obično se blokiraju kao neželjena pošta. Stoga biste trebali izbjegavati posebne znakove u temama odlazne e-pošte. Sada, u ovom članku, naučit ćemo vas da dozvolite Outlooku da automatski uklanja posebne znakove u predmetu e-pošte.

Moj prethodni članak “Kako dobiti upozorenje kada pokušavate da unesete posebne znakove u temu Outlook e-pošte” je uveo način izbjegavanja posebnih znakova prilikom sastavljanja e-pošte. Međutim, neki korisnici žele da Outlook automatski ukloni posebne znakove u predmetu kada kliknu na dugme „Pošalji“ da bi poslali e-poštu. Fokusirani na ovaj zahtjev, ovdje ćemo izložiti još jedan dio VBA koda. To može shvatiti s lakoćom bez napora.

Automatsko uklanjanje posebnih znakova u predmetu e-pošte

1. Prvo pokrenite Outlook program.
2. Zatim pristupite VBA editoru prema “Kako pokrenuti VBA kod u vašem Outlooku".
3. Zatim, u VBA editoru, omogućite “Microsoft VBScript Regular Expressions” u odnosu na “Kako dodati referencu biblioteke objekata u VBA".
4. Nakon toga, stavite sljedeći kod u projekt “ThisOutlookSession”.

'Occurs when sending an email
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As Outlook.MailItem
    Dim objRegExp As RegExp
    Dim strSubject As String
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       'Get the mail subject
       strSubject = objMail.Subject
 
       'Find special characters via regular expression
       Set objRegExp = New RegExp
       With objRegExp
            .MultiLine = False
            .Global = True
            .IgnoreCase = True
            .Pattern = "[^a-zA-Z0-9]"
       End With
 
      'Replace special characters with space
      If objRegExp.test(strSubject) = True Then
         strSubject = objRegExp.Replace(strSubject, " ")
         objMail.Subject = strSubject
      End If
    End If
End Sub

5. Zatim zatvorite VBA editor.
6. Od tada, svaki put kada pokušate poslati e-poruku čija tema ima posebne znakove, Outlook će ih automatski ukloniti, kao što je prikazano na sljedećem snimku ekrana.

Čuvajte nekoliko kopija vaših Outlook datoteka

Kako se nosite sa svojim Outlookom u svakodnevnom radu? U stvarnosti, toplo se preporučuje da zadržite nekoliko kopija vaših Outlook datoteka. Cilj mu je pomoći da se riješite bolnog gubitka podataka u Outlooku. Zamislite samo sljedeći scenario. Na primjer, vaš Outlook se iznenada ruši i otvorene datoteke postaju nedostupne. U ovom slučaju, ako ste zadržali druge kopije, ne morate brinuti. Ipak, ako nemate, od vas se traži popravi Outlook i oporavite oštećene Outlook podatke u najvećoj mogućoj mjeri. U ovom trenutku, potrebno je da uzmete pomoć električnog alata, kao što je DataNumen Outlook Repair.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući sql oporavak i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com