在 Outlook 2010 中创建宏,向电子邮件正文添加一行简单文本

在 Outlook 2010 中创建宏,向电子邮件正文添加一行简单文本

我在 MS Word 中创建了这个宏,它运行良好,但是当我将它复制到 Outlook 2010 宏中时它不起作用。如能得到任何帮助我将不胜感激。

Sub Thanks1()
'
' Thanks1 Macro
'
'
    Selection.TypeText Text:="Thank you for the quote."
End Sub

答案1

如果你看看此链接您会发现它是Namespace: Microsoft.Office.Interop.WordWord 特有的一部分。

因此,在 Outlook 中,您首先需要访问 Word 编辑器;因此:

Set objDoc = Application.ActiveInspector.WordEditor 
Set objSel = objDoc.Windows(1).Selection 
objSel.TypeText Text:="Thank you for the quote." 

相关内容