如何自動刪除Outlook電子郵件中單詞之間的所有多餘空格

立即分享:

如果您在編寫Outlook電子郵件時經常不小心輸入多餘的空格,則可能希望Outlook自動刪除單詞之間的所有多餘空格。 現在,本文將教您一種方便的方法來實現它。

有時,撰寫電子郵件時,您可能會錯誤地在單詞之間輸入許多額外的空格。 他們會使電子郵件內容混亂。 此時,您希望刪除所有這些多餘的空間。 要手動完成此操作,可以使用“查找並替換”功能,用通配符將所有“([[]] [] {1,}”替換為“ \ 1”。 但是,相比之下,如果Outlook能夠自動執行此操作,它將更加方便和有效。 現在,在以下內容中,我們將向您介紹一種配置Outlook的方法。

使用通配符查找和替換

自動刪除電子郵件中單詞之間的所有多餘空格

  1. 首先,通過在Outlook中按“ Alt + F11”來訪問VBA編輯器。

請注意: 如果您是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 受到嚴重損害。

作者簡介:

Shirley Zhang是的數據恢復專家 DataNumen,Inc.是數據恢復技術的全球領導者,包括 維修MDF 和Outlook修復軟件產品。 欲了解更多信息,請訪問 萬維網。datanumen.COM

立即分享:

評論被關閉。