拼写检查用VBA在Outlook 2007中指定的语言

Question

我想拼写检查，并使用下面的宏发送Outlook电子邮件：

Sub SpellIt() 
Dim oMail As Outlook.MailItem 
Dim oDoc As Word.Document 

Set oMail = Application.ActiveInspector.CurrentItem 
Set oDoc = Application.ActiveInspector.WordEditor 

oMail.Save  
oDoc.Content.LanguageID = wdGerman 

oDoc.CheckSpelling 

oMail.Save 

oMail.Send 
End Sub 

---

我需要能够设置语言显式地德语，我发现它可以使用Content.LanguageID，但这不包括主题行。我如何设置主题行的语言？当然，如果能够为整个文档设置它会更好，但是我无法将语言ID应用于.Document

任何想法？

谢谢， 雷托

Answer 1

的wordeditor在电子邮件的主体中使用（在某些条件下这将是空以及）。所以你不能这样工作。

oMail.Subject会给你主题文本我想你可以将它复制到一个新的文件和拼写检查，然后将其复制回来？或者将它插入到您已知的范围内，然后检查并设置主题删除原始范围等。