AppleScript 编程/示例程序/MS Word 2008

Microsoft Word 2008 及其 Office 兄弟在脚本方面是完全不同的动物。大多数用于编写 Word 脚本的代码来自与 (截至本文撰写之时) 已过时的 Visual Basic for Mac 相同的对象层次结构。

下面的脚本创建一个新的 Word 文档，并插入预定义的文本。然后对文本进行格式化。

-- 这只是我们定义变量 fiHR 的地方，它可以从任何面试中返回，也可以被外部程序拾取并解析。我们通过使用 AppleScripts 内置的语言来预格式化我们的文本而作弊了一些，但是 AppleScript 本身对文本样式（粗体、字体等）一无所知，像 Text Edit 和 MS Word 这样的应用程序却知道。

set fiHR to "Facts" & return & return & return & return & "Issue" & return & return & return & return & "Holding" & return & return & return & return & "Rationale"—告诉 Microsoft Word 启动并置于前台

tell application "Microsoft Word" activate—告诉 MS Word 创建一个新文档，而不是“活动文档”

create new document—这定义了新文档所有文本的区域，开始 0 结束 0 捕获整个文档，对于现有文档，你可以调用段落中的单词、字符、行等。

set myRange to create range active document start 0 end 0—现在我们通过调用之前定义的变量 (fiHR) 来设置整个文档 (myRange) 的文本内容。

set content of myRange to fiHR—这行将光标/插入点设置为文本的末尾。它可以设置为字符、单词、行、段落等。故事是我们已在新建文档中键入的所有内容。我们这样做，因为我们希望格式化应用于从我们的变量中键入的所有文本。

set myRange to change end of range myRange by a story item ¬ extend type by selecting—通过设置字体和字体的样式来开始格式化文本 fiHR

set name of font object of myRange to "Arial"

set italic of font object of myRange to true—告诉 Microsoft Word 我们现在已经停止指挥它。我们没有保存或关闭此文档，但也可以添加这些操作。

end tell

代码由 SolutionArts.net 提供