如何在 Outlook 2010 中將傳入郵件正文中的文字替換為超連結？

Question

您試圖自動超連結到錯誤/缺陷追蹤應用程式中的錯誤嗎？

最簡單的方法是修改發送電子郵件的軟體以建立超連結本身...

如果您仍然想手動執行此操作，這裡有一個我編寫的快速指南，它似乎可以工作（經過非常簡單的測試，但它名義上確實完成了其設計的任務）。

步驟1：啟用功能區中的「開發人員」標籤

點選選項：

按一下“自訂功能區”，然後按一下“開發人員”複選框：按一下自訂功能區

第2步：進入VBA並輸入代碼

點選“Visual Basic”：
轉到 Visual Basic

按兩下本期展望會議模組並貼上程式碼如下：放入程式碼

現在，程式碼：

Option Explicit

Sub InsertHyperLink(MyMail As MailItem)
    Dim body As String, re As Object, match As Variant

    body = MyMail.body
    Set re = CreateObject("vbscript.regexp")
    re.Pattern = "#[0-9][0-9][0-9][0-9][0-9][0-9]"

    For Each match In re.Execute(body)
        body = Replace(body, match.Value, "http://example.com/bug.html?id=" & Right(match.Value, 6), 1, -1, vbTextCompare)
    Next

    MyMail.body = body
    MyMail.Save
End Sub

按一下“儲存”圖示或按Ctrl+S。

步驟3：建立執行腳本的自訂規則。

前往管理規則和警報：

點選新建規則...：

按一下“對我收到的郵件套用規則”，然後按一下“下一步”：對我收到的訊息應用規則

如果您只想對某些郵件運行規則，則可以從此處的任何條件中進行選擇。不用擔心過濾正文中包含「#123456」的郵件；我們在程式碼中做到了這一點。因此，如果需要，只需過濾「寄件者：」或主題即可。這是可選的。選擇條件

選擇“運行腳本”。點擊底部框中藍色下劃線的“腳本”文字。運行腳本操作

選擇我們剛剛建立的腳本，由於對話方塊很小，其名稱可能會被截斷，但沒關係。

選擇你的腳本

此時，您只需重複點擊底部的“下一步”和“完成”，直到對話方塊消失即可；你應該完成了。

現在嘗試給自己寫一封電子郵件（或從您期望的寄件者或主題行接收電子郵件，如果您指定了自訂條件）並插入一個數字，例如：

#123456

進入體內，並送出去。

當您收到郵件訊息時，它應該將其作為 URL http://example.com/bug.html?id=123456（其中「123456」替換為您選擇的 6 個數字）。

您可以透過修改程式碼中的 URL 字串來自訂腳本程式碼以指向不同的 URL。您還可以用它做更多奇特的事情來保留或刪除號碼，或各種其他事情。

這個答案花了我整個午餐時間，所以如果你認為值得，請記得投票...如果你有任何困難或問題，請在評論中告訴我。

很有幫助StackOverflow 問題，它至少給了我一個實現這個的可行性方法：在 Outlook 中附加主題標頭 (VBA)

Answer 1