Outlook 2010 - macro to modify all Hyperlinks in an email body before sending

[gmayor]

the word editor window is not an inspector window, so can not(sic) the properties and methods of an inspector object

Just to muddy the waters a bit. Outlook 2010 does not use Word as e-mail editor The last version to do that was Word 2003. Outlook has its own Word-like editor (which uses a subset of Word) and this can be accessed as an Inspector Window, in fact it is the only way to edit the message body. The code that 'nohra's' pet developer produced (listed and corrected below) uses the inspector to edit the hyperlinks. The following will work with a message currently being created. If you want to edit a message that has already been created, it will need some changes.

Sub HyperLinkChange()
Dim objDoc As Object
Dim tmpLink As Object
    On Error Resume Next
    If ActiveInspector.EditorType = olEditorWord Then
        ' use WordEditor Inspector
        Set objDoc = ActiveInspector.WordEditor
        For Each tmpLink In objDoc.Hyperlinks
            tmpLink.Address = "Hyper Link Removed. Please copy and paste into your browser to view"
        Next tmpLink
    End If
End Sub