Kind Property Example

This example asks the user whether the active document is an e-mail message. If the response is Yes, the document is formatted as an e-mail message.

response = MsgBox("Is this document an email message?", vbYesNo)
If response = vbYes Then
    ActiveDocument.Kind = wdDocumentEmail
    ActiveDocument.Content.AutoFormat
End If

This example updates all warm link fields in the active document.

For Each aField In ActiveDocument.Fields
    If aField.Kind = wdFieldKindWarm Then aField.Update
Next aField