文字自动化：邮寄标签答案

【问题标题】：Word Automation: Mailing Labels文字自动化：邮寄标签
【发布时间】：2013-01-08 16:22:44
【问题描述】：

我正在尝试自动化 Word 2010 以在 VBScript 中创建邮件标签。到目前为止，我有以下内容：

Set word = CreateObject("Word.Application")
word.Visible = True
word.Documents.Add
word.MailingLabel.CreateNewDocument "5162"

我收到错误“命令失败”(800A1066)。输出 word.MailingLabel 给出错误，“对象不支持此属性或方法。” MSDN's documentation for MailingLabel 表示这是正确的用法。我做错了什么？

【问题讨论】：

Word 本身也无法生成标签，我刚刚注意到。它会告诉我，“您尝试使用的标签信息有问题。”修复的要点如下： (1) 在 Office 安装文件夹中重命名 PAGESIZE（以创建备份）。 (2) 使用添加/删除程序中的修复选项修复 Office。将创建一个新的 PAGESIZE 文件夹，Word 应该能够再次生成标签。
嗨，埃里克。如果您发布评论作为答案，那就太好了。您甚至可以在一段时间内接受自己的答案。
@Remou：谢谢提醒。新用户的等待限制使我最初不愿发布答案而不是评论。

【解决方案1】：

我注意到，Word 本身也无法生成标签。它会告诉我，“您尝试使用的标签信息有问题。”

修复的要点是：

将创建一个新的 PAGESIZE 文件夹，Word 应该能够再次生成标签。

【讨论】：