【发布时间】：2013-04-21 18:27:51
【问题描述】：
我的宏包含
WordBasic.SelectSimilarFormatting
这条线工作了多年，甚至在 Word 2007 中，但现在它开始产生以下错误：
Run-time error '509':
This command is not available.
我有两个问题：
- 一直正常工作的生产线突然停止工作会怎样？
- 如何在 VBA 中重写这一行而不使用 WordBasic？
【问题讨论】：
-
此错误编号与您提到的描述不同-
Application-defined of object-definded error。这并不意味着您错了，调用该错误号可能有不同的上下文。重新启动 Word 后，您是否尝试使用新文档？是不是经过大量的word操作后才发生的？请检查是否在任何打开的文档中都没有SelectSimilarFormatting的副本。回答您的最后一个问题 - 这是可行但困难的，您需要检查格式参数，然后在整个文档中搜索它们 (.Range.Find)... -
您最近是否在处理模板中的代码？这是一个很长的尝试，但我发现，非常偶尔，完美的代码会停止工作，需要“重新编译”；基本上，您必须在该行之后放置一个空格，或者按 Enter 或其他东西，然后重新保存模板。 Enum 声明比其他任何事情都更频繁地发生这种情况，但它有点神秘，所以可能值得一试。