Word2003 通用模板 2013-10-22 急救版！！！

413191246se

今天下午刚刚发现别人拿来的一个文档排版时 Word 2003 陷入无响应状态，重复 2 次都是这样。查找原因，原来是“删除段落首尾空格及空行”里面的两行语句惹的祸！
具体是全选后，居中、两端对齐---------代码有 3 种写法，但现在发现，只能用第 3 种写法了，具体代码如下：
    Selection.WholeStory
    Application.Run "CenterPara"
    Application.Run "JustifyPara"
替换为：
    Selection.WholeStory
    CommandBars.FindControl(ID:=122).Execute
    CommandBars.FindControl(ID:=123).Execute
再排版刚才频繁无响应的那个文档，迎刃而解，OK！
由于本人系VBA菜鸟一枚，入门虽两年，但水平很低，对于给各位朋友造成的不便，致以深深的歉意！请多多包涵！（仅改写了上面两行代码，别的没有变化）

请各位朋友们重新下载一下，链接： Word2003 通用模板 2013-10-22 急救版.rar (62.68 KB, 下载次数: 53)

2013-10-24 16:40 上传

点击文件名下载附件

413191246se

补充说明：时间仓促，上面的文件名应为 2013-10-24 才对，但是现在是 2013-10-22。

413191246se

——搞明白了！——原来单位的 WIN7系统上的 Word 2003 是 SP1 版本，我家里的是 SP3 版本；在单位出问题，在家里没有问题。大家都应该用 Word 2003 SP3 版本，SP1 版本有些 VBA 语句就运行不宜。