Specify Font Name or Face using VBA Macro in Word
Hello - when I use vba to create an Outlook mail item using Word 2003 as the
email editor, can I specify the font to be used in my vba macro code? Right
now it pulls whatever the user has set as the default in Word under Tools
Options General Email Options Personal Stationary. I tried the code
listed below, but it has no effect. Thanks for any suggestions.
Set oItem = oOutlookApp.CreateItem(olMailItem)
With oItem
..To = "
..Subject = "MySubject"
'Add the document as an attachment, you can use the .displayname property
'to set the description that's used in the message
..Attachments.Add Source:=ActiveDocument.FullName, Type:=olByValue
..Body = ActiveDocument.Content
..Font.Name = "Verdana"
..Send
End With
|